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The Creator 



I'M GOING TO GIVE YOU this 
$295 software package for 10 
bucks. If you don't want to 
spend $10, you'll find the 
source code in this magazine. 
It's yours to type in and use. I'm 
doing this because I want to 
make a statement. If this pro- 
gram is worth $10, then what 
should some others be selling 
for? Most commercial software 
is vastly overpriced. I want to 
make a splash, set a standard, 
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TRS-80 IS A TRADEMARK OF RADIO SHACK, A DIVISION OF TANDY CORP. 



More and more hardware and communications services are allowing speeds up to 1200 baud. Soon, some may be going 
faster than that. Today's terminal software simply can't keep up. But now there is an alternative. Micro-Systems Software in- 
troduces Micrbferm, the highspeed terminal. 

Model III MicroTerm will communicate, without insertion of null characters, at 4800 baud. Guaranteed. No cop-outs, 
no question. MicroTerm is so fast that you can exit from the terminal to the main menu, adjust video width, open the buffer] 
turn on the printer, or any one of dozens of other functions, and return to the terminal model without missing a thing! 

MicroTerm continues to input from the RS232, even while at the main menu. This is the only terminal capable of such 
an astounding feat. MicroTerm offers you most of the features that "Brand X" smart terminals have, plus it gives you: • Ultra high 
baud rate operation (up to 9600 in certain cases). • Input while at menu. • Easy to use translation tables. • Easy to use phone 
number listings. • Maximum auto dial support — most major brands. • Direct file transfer companion program included at no 
exta cost (compatible with DFT). • DOS commands from n\enu without exiting program. • Over 34K of capture buffer (in a 48K 
TRS-80). • Can be setto automatically dial telephone and transmit buffer at presettime without any operator intervention. 

And many, many more great features, MicroTerm is so fast you must see it to believe it. The various menus are displayed 
so fast, they seem tojump out atyou. Status ofvarious functions can be displayed and altered in split seconds. 

For the computerist who wants the ultimate, state-of-the-artterminal software, there is no other choice. 

MicroTerm retails for $79.95, but registered DOSPLUS owners can purchase it for only $59.95. $20.00 off the retail price! 
MicroTerm comes complete with the terminal program, the direct file transfer program, some standard translation tables, and 
documentation. 

Don't delay, order yours today! Specify when ordering: Model I or III and whether you want rt on 40 or 80 track media, 
luires a 16K TRS-80 with one disk drive. We recommend 48K for serious communications work. MicroTerm will be available 
beginning June 30, 1982. 
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SOFTWARE, INC, 

4301 -18 Oak Circle 
Boca Raton, FL 33431 
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With Reliable Hard-Line Thinking 



Let's cut through all the "compu-babble" about hard-disk systems with some hard-line 
thinking. 

You want a hard-disk system for your TRS-80* Model III for some fairly basic reasons: 

• More storage capacity than your present 
system 

• Faster retrieval and storage of information 
•Accurate processing with reliable hardware and 

software 
PERCOM DATA was pioneering critical, reliable data separation functions for micro 
systems long before many of today's companies even began. PERCOM DATA'S solid 
industry reputation is your promise of hard-disk performance, from a drive with speci- 
fications equal to or superior to your own system. 

PERCOM DATA 5% inch PHD's ,M are your easy, hard-line answer. These units are 
available in 5, 10, 15 and 30 megabyte models. The First Drive unit has a micro- 
processor-based drive controller, permitting you to add up to 3 more hard-disk PHD's. 
And PHD series prices begin at under $2500. 

So, if you're ready to expand your TRS-80 Model III, do it with PERCOM DATA'S PHD. 
Our hard-line thinking of more than half a decade means you get a reliable, high-quality 
PERCOM DATA peripheral, backed by the PERCOM DATA Performance Promise. 

Take a hard-line of your own today! Call one of our Sales Consultants for more 
information and specifications or for the name of your close-by PERCOM DATA Dealer. 

PERCOM DATAs Hard-Line Hotline is 1-800-527-1222 



PEFQCM QATA 



ORATION 



panding Your 



Vision 



DRIVES 



NETWORKS 



SOFTWARE 



11220 Pagemill Road Dallas, Texas 75243 (214) 340-7081 
1-800-527-1222 



•TRSflO is a registered trademark of Tandy Aadio Shack Corporation 
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74. The Creator 

Some myths die hard, such as the 
quickest way to riches is to write a 
super program. 
Bruce Tonkin 



100. Forthwrite 

The second generation of word pro- 
cessors is upon us. One newcomer, 
Forthwrite, deserves to be ranked 
with the best of them. 
Wynne Keller 

104. Selling Your Software 

So you've decided to put your pro- 
gram on the market. Should you sell 
it through a publishing house? Neil 
tells you how to begin. 
We/7 J. Salkind 
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117. The Art of Documentation 

Here's a step-by-step explanation of 
how to write clear, concise manuals 
for your programs. 
G. Michael Vose 

154. How to Copyright 

You've spent a lot of time and effort 
writing and debugging a program. Of 
course you want to protect your idea 
from theft, but how? 
Anthony T. Scarpelli 

156. Planetary Orbit 

|- ^g| If you're interested in knowing a 
planet's location at sometime in the 
past or future, use this program to 
calculate its position. 
Don Carrera 



Articles 



110. The Great Beyond 

This version of Basic is much more 
powerful than Microsoft's. Use it to 
write sleeker code. 
Terry Kepner 

126. Mailing List Compiler 

Your Color Computer can be used to 
produce address labels and main- 
tain mailing lists. 
Gerald Sprouse 

132. Hardware Hacker— Part IV 

In his finale, Philip M. Van Praag ties 
together three devices to make up a 
powerful Peripheral Support Inter- 
face. 
Philip M. Van Praag 

146. A Pascal for All Seasons 

If procedure-oriented languages in- 
trigue you, Alcor Pascal may be the 
answer to your needs. 
Bruce Powel Douglass 

178. Block Titles for the Mod II 

Print block letter titles on your fan- 
fold printouts to make them more 
readable. 
George Berman 

180. The Garbage Collector 

The price you pay for strings with var- 
iable lengths can be a bargain if you 
collect your garbage efficiently. 
Bob Snapp 

188. Lunar Lander 

Games are rarely written for the 
Model II, but here's one that lets you 
make a lunar landing. 
Nat R. Koch 




192. Dogfight 

Envision yourself as a flying ace sit- 
ting in a cockpit shooting the 
enemy's biplanes. 
Ralph White 



197. Partially Disabled Break 

When you invoke the executioner in 
TRS-80 unintentionally, you'll beglad 
to have this program on hand. 
Stephen Mills 

200. New Tricks for an Old Dog 

I ■:• .1 In the early days of 80 Micro, you 
might have punched in a word pro- 
cessor by Delmer D. Hinrichs. If you 
did, these mods should be a cinch. 
Duane Hope 

216. Outbreak 

ISO A Basic version of the popular ar- 
cade game featuring the amazing 
bouncing ball. 
Tom Hanson 

221. Judge 80 

GrD Stu's son failed to qualify in the Pine 
Wood Derby when his racer was mis- 
judged. So Stu didn't get mad; he re- 
placed the judge with his 80. 
Stuart Cole 

227. Denominational Computation 

You don't have to be a Reverend to 
benefit from this financial statement 
program. 
Gerald Sprouse 

232. DSAVE 

E5S A way to take the risk out of saving 

disk files to tape. 

John Hodgson 

238. Windchill Determiner 

G=D Now you have a way to determine 

K oto sol ' ' 

just how cold you will be on those 
frosty winter mornings. 
John L. Cranmer, Jr. 

242. Getting the Most 
from the Model II 

Use supervisor calls and other tricks. 
La Verne E. Olney 

252. CC Monitor 

Tired of machine language forcing 
you to PEEK and POKE your Color 
Computer to death? Read on! 
Sergio Zigras 
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258. Interrupt Your 80 

Without a hardware mod, your 80 is 
immune to rude interruptions. 
Douglas C. Fisher 

268. Building a Better Adventure 

ygy Knowing about parsing can help you 
create The Great Microcomputer 
Adventure Game. 
Dan Cataldo 

270. Optimize Your Code 

Make your favorite programs run 
faster with a little help from a stop- 
watch. 
Robert W. McTernan 




276. PEN RAM 

U|y A machine-language utility to edit 
random access memory. 
Roxton Baker 

292. Repairing a Disk Crash 

If one of your Color Computer disks 
crashes, you could lose several pro- 
grams. To rescue them, try the steps 
outlined in this article. 
Philip Martel 

298. Discipline for the DIR Command 

Confused by the order your Color 
Computer prints the directory? This 
utility makes your directory look the 
way you want it to. 
Gerry Schechter 

302. APL Primer— Part II 

Vectors were your favorite part of 
high school physics class, right? 
This month, Margaret tells you how 
to use them in APL on your 80. 
Margaret M. Grothman 

310. Cassette Merge 

You can combine old Color Comput- 
er programs with new ones. This 
technique tells you how, and you 
won't have to retype anything. 
John Nicolettos 

316. Bit Smitten— Part VI 

L^J Good looking title and credit pages 



for your programs are easy to set up 
with this utility. 
Jay Chidsey 

324. Tape File Manager 

The four routines of Tape File Man- 
ager will increase the speed with 
which your buffer can read and write 
data to and from the tape. 
Roger W. Faulds 

342. DROSSDOS/8E 

I —J Since operating systems can be in- 
advertently frustrating, KTI's faithful 
observer asks, "Why not stop the 
pretense and make them purposeful- 
ly frustrating?" 
David Busch 

348. When OK Isn't 

Tired of the same old prompt? 
Ed Deming 

352. BASTEP 

G=y Catching bugs a step at a time. 
Alan D. Smith 

358. A Port-Mapped A/D Converter 

Monitor your freezer and play Pong, 

too! 

M. Parris 



Departments 



8. Remarks 

The need for more secure computer 
systems and a call for better TRS-80 
graphics. 
Wayne Green 

12. Proof Notes 

Custer's Revenge invades the sanc- 
tity of Microdom. 

16. Input 

Disgruntled Model II owner who 
wants a hard disk. A call for a Super- 
Scripsit printer driver for an Epson. 
Let's have more Line Printer VII ar- 
ticles. Praise of the Word Machine. 
Knock on MONEY DOS. 

30. Debug 

Colorful Computer fixes. Escape 
from SuperMaze. Curing jack o'lan- 
tern drool. 

34. Aid 

Credit union software. Smith-Corona 
and Scripsit. Request for govern- 
ment general ledger program. LEX 1 1 
schematic. 



37. Commander 80 

The ghost of Thomas Wolfe haunts 
Jake as he returns to his home (in 
what he unfondly calls "Gray" Bri- 
tain) and discovers the Dragon. 
Jake Commander 

40. The Gamer's Cafe 

The odyssey ends up in Vegas. 
Rodney Gambicus 




410. Reload 80 

412. Fun House 

Leap Year. Sands of Time. Perpetual 

Calendar. 

Richard Ramella 




425. Applications 

Putting the final touches on the 
build-your-own LNW. 
Dennis Kitsz 

366. Calendar 

435. Index to Advertisers 

436. New Products 

TDK floppy disks and cassettes. 
Telex communications for CP/M 
owners. CO Mailer. Medical lab soft- 
ware. Model I expansion mainframe. 
Computer-Assisted Home Energy 
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The left bracket, [, replaces the up arrow 
used by Radio Shack to indicate exponen- 
tiation on our printouts. When entering 
programs published in 80 Micro, you 
should make this change. 

80 formats its program listings to run 
64-characters wide, the way they look on 
your video screen. This accounts for the 
occasional wrap-around you will notice in 
our program listings. Don't let it throw 
you, particularly when entering assembly 
listings. 

Article submissions from our readers 
are welcomed and encouraged. Inquiries 
should be addressed to: Submissions 
Editor, 80 Pine Street, Peterborough, NH 
03458. Include an SASE for a copy of our' 
writers' guidelines. Payment for accepted 
articles is made at a rate of approximately 
$50 per printed page; all rights are pur- 
chased. Authors of reviews should con- 
tact the Review Editor, 80 Pine Street, 
Peterborough, NH 03458. 



Management. Nutritional manage- 
ment software. Color III conversion 
plans. Brevi-T abbreviation utility. 
Educational Software Library. C for 
Model 16. Bazul's Quest. 

450. 1982 Index to Articles 

460. 1982 Index to Reviews 

465. Index to LOAI)80s 

45. Reviews 

Pac-Droids. C.C. Mailer and C.C. 
Merger. Make your computer talk 
with Chatterbox. Trashman, a string- 
cleaning utility. Options-80, a stock- 
market utility. Log Electronic Note- 
book. Rental Property Investment 
Program. Black Death, a gem of 
garage-punk programming. Super- 
Scripsit. 

72. Review Digest 

Address Factory for the Color Com- 
puter. PrintCC allows your TRS-80 
act as a buffer for your parallel 
printer. Astro-Blast, not just another 
space game for the Color Computer. 
The Moses Lightpen. Color Comput- 
er Katerpillar. 

370. News 

Enter the Dragon, a new 6809 micro 
taking Britain by storm. Tandy's 
scheme to market its color machine 
outside the Radio Shack chain hits 
some rough water. The Source offi- 
cially opens its new computer 
center. 



394. The 1982 Readers' Choice Awards 

May we have the envelope, please. . 




396. The 80 Micro Hall of Fame 

Wherein immortal software is en- 
shrined. 




400. Feedback Loop 

A program to forecast the weather. 
Unmodified Model I word process- 
ing. Okidata ribbons. Model II Scrip- 
sit and Epson woes. Epson tractor- 
feed problems. SuperScripsit-Epson 
incompatibility. 
Terry Kepner 
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SWITCH T0 57 8"D0UBLE DENSITY 

IXDoublerS/s 



FEATURES 

• 5- and 8-inch* disk drives 

• Single- & double-density 

• Any size and density in any mix 

• Read Model I, II* and III disks 

• 5- or 8-inch* system disk 

• Single & double sided disk drives 

• DOS+ 3.3.9 included, with Disk 
BASIC. 

• 6 month warranty 

• Up to 3.75 megabytes online 

• Easy installation - plug-in & run 

• Analog phase lock loop data 
separation 

• Precision write precompensation 

• Regulated power supply 

• Guaranteed operation at 4MHz 

• All contacts gold plated 

• Solder masked & silk screened 

• Runs under DOS+ 3.3.9, TRSDOS 
2.3, NEWDOS 2.1, NEWDOS/80 
1.0, LDOS, NEWDOS/80 2.0 r 
and ULTRADOS 

• Reads 40- and 35-track disks on 
80-track drives 

• FD1791 controller + your FD1771 

• Fits Model I expansion interfaces 

• Fits LNW expansion interfaces 

• Track configurations to 80-tracks 

• 5 inch disk storage increased to: 

161,280 bytes - 35-track SS/DD 
322,560 bytes - 35-track DS/DD 
184,320 bytes - 40-track SS/DD 
368,640 bytes - 40-track DS/DD 
368,640 bytes - 80-track SS/DD 
737,280 bytes - 80-track DS/DD 

• 8 inch disk storage increased to: 



591,360 bytes - 77-track SS/DD 
1,182,720 bytes - 77-track DS/DD 
SS: single-sided DS: double-sided 
SD: single-density DD: double-density 

COMPLETE - The LNDoubler 5/8, 
switches your Model I or LNW-80 
into the most versatile computer you 
can own. The LNDoubler's switch 
allows you to boot from 5- or 8-inch 
system disks, and it's accessible from 
outside the interface. The LNDoubler 
5/8 comes with a double-density disk 
operating system (DOS+ 3.3.9), 
complete with BASIC and utility 
programs . . . ready to run your 
software NOW! 

VERSATILE - Whether you want 
single-sided, double-sided, single- or 
double-density, 5- or 8-inch operation, 
complete versatility is here today! 
Any combination of 5- and 8-inch disk 
storage is possible with the 
LNDoubler 5/8. Each of your present 
40-track, single-sided 5-inch drives 
will store up to 184,320 bytes 
(formatted storage) - that's an 80% 
increase in storage capacity for only 
half the cost of just one disk drive. 
With three 8-inch double-density, 
double-sided drives your Model I will 
have 3.75 Megabytes of online storage 
- that's more storage than a Model II 
or Model III! 

ADVANCED - The LNDoubler 5/8 
is the most technically advanced, 
tested and reliable double-density 



board you can buy. The LNDoubler 
5/8 has more features, more options 
and more software support than any 
other product of its kind. 

EASY TO INSTALL - The 

LNDoubler 5/8 is easy to install. 
There are no traces to cut, no wiring 
to do, just a screwdriver and a few 
minutes of your time is all that is 
required. The instructions are fully 
illustrated for all interfaces. In 
minutes you will be 'up-and-running', 
and enjoying your computer as never 
before. 

COMPARE - Compare features, 
compare quality, compare value, and 
make the SWITCH today! 
Immediate delivery from stock - at 
your dealer NOW for only 

219.95 

DEALERS - You too can 
make The Switch. 




IjNffyRESEARCH CORPORA TION 



2620 WALNUT Tustin, CA. 92680 (714)544-5744 (714)641-8850 

•8" drive operation requires special cable. 8" double-density requires 3.55MH/. CPU speed-up modification or LNW-80 4MHz computer. TRS-80 is a trademark of Tandy Corporation. 



REMARKS 



by Wayne Green 



As a key person in a small business, 
you may not have thought much 
about security for your computer. Oh, 
you may want to keep payroll informa- 
tion confidential, but why should you 
worry about your mailing list, customer 
information, supplier information, 
sales records, and so on? 

You're right — this is not a major 
problem so far. But in the longer run, 
you may want to keep in mind the need 
for establishing an ever more secure 
computer system. 

We are heading toward the time 
when even smaller businesses are going 
to have executives communicating with 
the office computer while on business 
trips. Salesmen and reps are soon going 
to be getting sales data and placing 
orders over the phone via computers. 
Indeed, more and more of our business 
and records will be accessible over the 
phone, and thus prone to interception 
or even malicious interference. 

Few people who have not worked for 
the phone company have even a hint of 
the extensive monitoring of calls that 
Ma Bell does. Your calls are being 
monitored. The system is set up so that 
calls can be monitored from anywhere 
in the country without giving you a hint 
that anything is amiss. Now, how are 
we to know that Ma won't start setting 
up to automatically record every digital 
communication going over her lines? 
There's no serious problem technically. 
Then Ma's minions can check what is 
going over the lines when it is conven- 
ient and, if it is interesting, look back 
through months or even years of re- 
corded data. 

With an increasing amount of Ma's 
communications going by microwave, 
we know from recent articles in the 
technical magazines that it's easy to in- 
tercept these communications without 
leaving any trace. The interception and 
recording of all digital communications 
by firms interested in selling business in- 
formation to your competitor could be 
a growth industry. Government agencies 
can also listen in to these calls and get a 
good inside look at what is going on. 

One malicious employee with access 
to your computer can raise holy hell 
with sales records, customer files, pay- 
roll, and so on. Do you really want to 
have your business computer system 
working on the basis that no one is ever 
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The need 
for more 
security 



going to get mad and try to get even? 

All of this leads up to the obvious 
need for security. To some degree, we 
are in a similar situation to that faced by 
the software firms in that no known se- 
curity system seems to be really secure. 
Worse, the more you try, the more your 
computer is tied up with the security 
system and the more frustrating the 
whole thing can be to use. 

The first step is to recognize the im- 
portance of the problem. The next is to 
start tackling it. We can do this best via 
articles by those few people who have 
already been working in the field. This 
will help the rest of us understand what 
work has been done so far so we won't 
waste a lot of time redoing it. This will 
also spark some original ideas in the rest 
of us. I suspect that the very complexity 
of ICs that can be designed today may 
hold the key to a relatively simple en- 
cryption/decryption device. 

One of the difficulties of encryption 
keys is the ability of a computer to try 
an incredible number of keys in a short 
time. This might be nullified with a sys- 
tem similar to a combination lock, 
wherein a. time delay accompanies each 



failed try, thus defeating the speed of 
the computer. I'm sure that if we have 
enough brains working on the project, 
we'll come up with some fine solutions. 
We're going to need them. 

The State of Graphic Arts 

Computer graphics are moving ahead 
so fast that most of us can't keep up 
with the developments. They've been 
making the consumer magazines in re- 
cent weeks, spurred on by their use in 
Tron and other recent films. I really 
didn't need to go to still another com- 
puter show, yet how could I stay away 
from one right down in Boston, just a 
bit over an hour away? 

It must be excessively depressing for 
the higher management at Tandy to go 
to shows like this and see how far com- 
puter graphics have developed, yet to 
have so little available via the TRS-80 
systems. The uses for color graphics for 
business are so manifest that the hand- 
writing on the wall really can't be ig- 
nored. There were Apple computers all 
over the place at the show, but only one 
TRS-80 that I saw. 

The Color Computer has a lot of 
promise for such applications, if Radio 
Shack would provide their stores with 
the documentation, accessories, and 
programs to back up the system. I am 
hearing rumors that there are some 
cracks appearing in the xenophobic ar- 
mor at Tandy and that at least a few of 
the people there are fighting to change 
age-old tradition and allow the sale of 
support products from outside firms. 

The powers at Tandy realize all too 
well that the computer sales are the 
only thing that has kept the firm grow- 
ing. They see these sales getting to be 
more and more of the total Tandy sales. 
This is a two-edged sword. With no end 
in sight for computer sales, it is a 
firm foundation for keeping the whole 
firm growing. But with increasing com- 
petition from a growing number of 
firms with better computers, better soft- 
ware, and more accessories, the bubble 
could burst. 

If you add up the support Radio 
Shack has in the form of peripherals 
and software from outside firms, no 
other system can approach it. But 
Radio Shack customers have to go out- 
side . . . generally by mail order ... to 
reach this market. 



META TECHNOLOGIES^*** 

26111 Brush Avenue. Euclid Ohio 44132 l^S? 

FOR ORDERS ONLY CALL 1-800-321-3552 ^ 

IN OHIO and all other inquiries call (21,6) 289-7500 
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DISKETTES 

MTC's 

Bremium Single-Sided, Soft-Sectored 
OUBLEDENSITY, 5%-inch diskettes with 
reinforcing HUB-RINGS. Individually 100% 
ERROR-FREE certified. Invest in GOLD! 

PARAGON MAGNETICS GOLD $24.95 



VERBATIM 

Soft-Sectored Diskettes 

5-1/4" 1S/DDen(MD525-01) $26.95 

5-1/4"2S/DDen(MD550-01) $39.95 

5-1/4" 2S/4Den(MD557-01) $51.50 

8" 1S/DDen(FD34-8000) $43.95 

Hard-Sectored Diskettes 

5-1/4" 1S/DDen10-sector (MD525-10) $26.95 

5-1/4" 2S/DDen10-sector(MD550-10) $39.95 

5-1/4" 2S/4Den10-sector(MD557-10) $51.50 

Head Cleaning Kit S12.50 

Refills (10 Cleaning Disks) S 2.00 

HUB RING KIT for 5V*" disks $10.95 

HUB RING KIT for 8" disks $12.95 

REFILLS (50 Hub Rings) $ 5.95 

SVi-inch diskette case $3.50 

8-inch diskette case $3.95 

5 'A -inch File Box for 

50 diskettes $24.95 

8-inch File Box for 

50diskettes $29.95 



S19.95 
.$24.95 
.$28.95 
$29.95 
$28.95 

$10.95 



DIShlTJU 

MODEL III DISK UPGRADE 

Features 

• Uses Micro Main Frame Finest 
Disk Controller 

• Gold Plated Edge Connectors 

• Switching Power Supply 

• Supports 5" or 8" Drives 

• 40/80 Track Supported 

• Single/Dual Head Supported 

• Metal Disk Drive Brackets 

• All Hardware and Cables for 
Two Disk Drives 

• 1 Hour or Less for Installation 

• 100% Compatible 

• No Soldering Needed 

• 180 Days Warranty on Controller 




DEALER INQUIRIES WELCOME 

DISKIT III is a trademark of MDS 



DISKIT III 

W/Out Drives 

$27900 



DISKIT III 

W/One Tandon 
Disk Drive 

$47900 



DISKIT III 

W/Two Tandon 
Disk Drives 

$69900 



PRACTICAL PERIPHERALS 

MICROBUFFER™ IN-LINE 



TRS-80, HEATH, IBM, APPLE, ZENITH 
DISK DRIVES 

Model I & III Complete 

Tandon 40 Track $279.00 

Tandon 80 Track $ CALL 

BARE TANDON 

T100-1 40 Track $209.00 

T100-2 40/40 Track $ CALL 

T 100-3 80 Track $ CALL 

8 INCH MODELS 

Seaman 77 Track s/s-d/d . $339.00 

NEW TANDON 'THIN LINE'" 8 INCH 

848- 1 Single Side . $399.00 

848-2 Dual Side $499.00 

APPLE Add-On Disk Drive $359.00 



BOOKS 

OTHER MYSTERIES 

TRS-80 DISK 

Microsoft Basic Decoded 
The Custom TRS-80 . 
Basic Faster & Better . . 
The Custom Apple 

1001 Things To Do With 
Your Personal Computer 



FOR ALL COMPUTER/PRINTER OR 
COMPUTER/MODEM COMBINATIONS 

The Microbuffer In-Line is a stand-alone printer buffer with a minimum of 32K. It is easily 

upgraded to 64K with four user-installed RAM chips. It can be further user-upgraded, 64K 

at a time, to up to 256K by adding low-cost memory expansion modules. 

Both the parallel and the serial versions can be used with virtually any computer (including 

TRS-80, Atari, IBM, Apple, Osborne, NEC, etc.) and any printer (including Epson, Centronics 

NEC, C. Itoh, IDS, Anadex, Qume, Diablo, Tl-180, etc.) 

Microbuffer In-line requires no user modification of software — it installs easily, in seconds 

MICROBUFFER II 

16K Parallel $259.00 

32K Parallel $299.00 

16K Serial $259.00 

32K Serial $299.00 

MICROBUFFER/E 

MBP-16K Parallel $159.00 

MBS-8K Serial $159.00 

MICROBUFFER IN-LINE 

32K Parallel $ CALL 

64K Parallel $ CALL 

32K Serial $ CALL 

64K Serial $ CALL 

64K Memory Expansion Modules $ CALL 



MODEL I / III SOFTWARE 

Apparat's NEWDOS/80 V2 + MTC Que Card™ $129.95 

Electric Pencil Version II - Disk Version $ 79.95 

Electric Pencil Version II - Tape Version $ 69.95 

Introduction to TRS-80 Assembly Programing 

Remassem-1 (Tape Version) $ 69.95 

Remassem-1 (Disk Version) $ 74.95 

Remassem-3 (Tape Version) $ 74.95 

Remassem-3 (Disk Version) $ 79.95 

.Remdisk-1 (Disk I/O Techniques) $ 29.95 



APPLE Is a registered trademark 

ol Apple Computer Inc. 

TRS 80 is a trademark ol the 

Radio Snack Division ol Tandy 

Corporation. DATALIFE is a 

tradomark ol VERBATIM. PLAIN 

JANE. PARAGON MAGNETICS 

are trademarks ol MTC. 

■ 1982 by m.i. Technologies 

Corporation 
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WE ACCEPT 
•VISA 

• MASTER CHARGE 
•CHECKS 

• MONEY ORDERS 
•C.O.D. 



T 



Add S3.00 for shipping 
& handling. 
•$2.00 EXTRA for U.S. 
Mail delivery. 

• $5.00 EXTRA for C.O.D 

• Ohio residents add 6.5% 
sales tax. 



REMARKS 



The announcement that Tandy will 
be selling the Color Computer through 
independent computer stores could 
bring some relief, yet considering the dis- 
couraging discount schedule, this may 
not turn into a significant outlet. It 
could get some action if computer 
stores carrying the Color Computer 
start stocking up on third-party acces- 
sories and software. That could turn 
out to be a significant market, with the 
software and accessories bringing in the 
profits rather than the computer itself. 

You know, I get letters now and then 



from readers who wonder why I don't 
toady to Radio Shack instead of taking 
them to task. I try, as best as I can, to 
reflect the educated opinions in the 
marketplace, not just my own. I talk 
with Radio Shack-owned stores, with 
independent Radio Shack store owners, 
and with many people in the industry. 
From all this, I get a fair idea of what is 
really going on, not just what Tandy 
sends out for PR or publishes in their 
pamphlet, which is generally self-serv- 
ing. I don't go out of my way to be criti- 
cal of Tandy, but then I don't avoid it 



either. I try to call it as I see it. If some 
readers have facts of which I'm not 
aware, I'm open to getting them and re- 
vising my ideas. The Tandy people are 
extremely secretive, which, of course, 
begs for guessing. I know of no other 
firm in the industry that even comes 
close to Radio Shack in that aspect. 

Will Radio Shack notice what's hap- 
pening with color and get cracking with 
some good advanced color computers? 
Or are we going to see the color graphics 
battle won by Japan with entries such as 
the Sony SMC-70 and the new NEC? ■ 



GAMESTER SOFTWARE 



16K COLOR COMPUTER 

#402 SPIDER a fast-action $19.95 T 

graphic arcade game! 
by Chromatic Software 

#403 PAC-DROIDS the best $19.95 T 

color game available! 
by The Programmers Guild 

#404 DRAGONQUEST challenging $19.95 T 
adventure! Ext. basic req. 
by The Programmers Guild 

#405 TOWER OF FEAR a classic $19.95 T 
adventure! Ext. basic req. 
by The Programmers Guild 

#406 THUNDER ROAD a FUN $19.95 T 

adventure! Ext. basic req. 
by The Programmers Guild 

#407 LOST DUTCHMAN'S GOLD an $19.95 T 
adventure! Ext. basic req. 
by The Programmers Guild 

16K COLOR MISADVENTURES 

extended basic not needed 
#501 MADAM ROSA'S MASSAGE $15.00 T 
PARLOR 
Fun! Slightly risque' 

#502 WET T-SHIRT CONTEST $15.00 T 

Wet and Wild Adventure! Fun! 

#503 SEWERS OF MOSCOW $15.00 T 

Challenging Misadventure! 

#504 CASINO OF PLEASURE $15.00 T 

Take the ultimate gamble! 

#505 NAKED NIGHTMARE $15.00 T 

ready 1-10-83 NEW! 

#506 SUPER HERO MISADVENTURE $15.00 T 
ready 2-16-83 NEW! 



DOHNE' BUGG is our best-selling ADVEN- 
TURE-DECODER! Are you STUCK in a 
machine-language ADVENTURE GAME? This 
program will display on the screen all VERBS 
that interact in the game, all LOCATIONS & 
OBJECTS you will find, and all ACTIONS that 
result! A MUST FOR THE SERIOUS ADVEN- 
TURER! 



LEAPER: now with voice; new; 



Joystick compatable! 1 
MACHINE LANGUAGE! 
available! 



or 2 players. 
Best 1 -board 



Fast-action 
'frog-game" 




9 Southmoor Circle, Kettering, Ohio 45429 [513] 294-3383 
Mail & Phone Orders [from 12-6] accepted [COD, VISA/MASTER CARD, Check]. 
Usually same-day shipment! Dealer Inquiries invited. We pay postage! 

16K MODEL I AND III 

#301 DOHNF BUGG $15.00 T 

an adventure-decoder! 

#302 BLOCK BREAKER $14.95 T 

by Cedar Software 
best "break-out type game" 
available! 

#303 LEAPER $15.95 T 

by Cedar Software 

Now with VOICE! NEW! $19.95 D 

This is the best single-board 
"frog" game available! 

#304 DEMON SEED $19.95 T 

by Computer Shack - NEW! 
arcade fun - amazing game! $24.95 D 

#305 CYBORG by Computer Shack $19.95 T 
The galaxy's ultimate sport! $24.95 D 

#306 BOUNCEOIDS $15.95 T 

by Comsoft Group 
Crazy Fun. ..go for it! $19.95 D 

#307 FROGGER by Comsoft Group $19.95 T 
Authorized version! $21.95 D 

GREAT MUSIC! 

#308 CRAZY PAINTER $19.95 T 

by Comsoft Group 
What else can we say 
but WOW! $21.95 D 

#309 MICRO CORD $19.95 T 

by Comsoft Group 
Easy! Two-tone harmony! Make 
your own beautiful music - and 
save it on tape or disk! $24.95 D 





tit+tc 




Jim 




^ 




Our MISADVENTURE SERIES consist of 
CHALLENGING and FUN "adventure-type" 
programs that may occasionally be a bit 
naughty! 

MISADVENTURE SERIES 

$15.00 each 16K Model I or III 

#1 MADAM ROSA'S MASSAGE PARLOR 

#2 WET T-SHIRT CONTEST 

#3 SEWERS OF MOSCOW 

#4 CASINO OF PLEASURE 

#5 NAKED NIGHTMARE ,,379 

#6 SUPER HERO ADVENTURE 

#7 coming soon! 

NOTE: Radio Shack refused to Include our 
first Misadventure [MADAM ROSA'S 
MASSAGE PARLOR] in their Sourcebook 
due to our description of the game! We 
appreciate the publicity - thanks! 
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META TECHNOLOGIES^ 

26111 Brush Avenue. Euclid Ohio 44132 WS? 

CALL TOLL FREE 1-800-321 -3552 TO ORDER ^S 

IN OHIO, call (216) 289-7500 (COLLECT) 
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A Few Words About 

The NEW AIDS-I 

by SofTrends, Inc. 

1. TRUSTWORTHY. A bad diskette or an independable machine can ruin your 
whole day. The NEW AIDS-III checks itself. If something's wrong, it tells you, in- 
stead of turning on you like a mad dog. 

2. GENEROUS. The NEW AIDS-III doesn't use BASIC. But it does use the 
memory BASIC uses. And to make the most out of that extra memory, it selec- 
tively compresses bytes into tiny bits. It all adds up to more usable data records. 
Up to 3 times as many.* 

3. THOUGHTFUL. The NEW AIDS-III never treats you harshly. If one keystroke 
will do, it won't ask for two. The NEW AIDS-III remembers things like report for- 
mats, search strategies and file names. So you don't have to. It even reminds you, 
gently, to save your important data. 

4. INTELLIGENT. The NEW AIDS-III is smart. It doesn't waste your time with 
questions about record sizes, field counts and other technical mumble-jumble. A 
new system can be created, or an old one modified, in a couple of minutes. Even 
if your name isn't Albert Einstein. 

5. KIND-The NEW AIDS-III is always ready to help. It says so, on every screen 
display. HINTS™ (Help INdexed To Screen) tells you on which page in the NEW 
AIDS-III manual to look for more information. The manual is easy to understand 
and easy on the eyes. 

6. QUIET, if you hit the wrong key, you won't hear any annoying buzzes, clicks 
or chirps. Instead, FLAWS™ (FLash-Annunciated Warning System) will create a 
striking visual effect. But only for an instant. And without affecting any of the 
text on the screen. Guaranteed to catch the eye of the fastest touch-typist. 

7. ALERT.|f the NEW AIDS-III is left alone, it lets you know it missed you. It wor- 
ries about your important data. After several minutes of no activity, the NEW 
AIDS-III creates a striking visual display to get your attention. Touch any key to 
let it know you're still there, and it stops. For a little while, anyway. 

8. LEAN. There's no fat in the NEW AIDS-III. That's because it uses SofTrends' 
proprietary PMX™ system architecture. Small, lightning-fast, reliable. Lean? 
Yes. Mean? Definitely not. 

9. FAST. Searches and sorts hundreds of records in seconds. Screens are 
displayed in the blink of an eye. Disk access rates approach one-thousand char- 
acters per second. No waiting for "garbage collection". The NEW AIDS-III lives 
fast. Up to 10 times as fast.* 

10. REASONABLE. At only $79.95, the NEW AIDS-III is very reasonable. Down- 
right inexpensive, if you value your time. Join the thousands of AIDS owners I 
around the world. Order yours today and put the N EW AIDS-I 1 1 data management 
system to work for you. 

• As compared to MTC AIDS-III, Version 1.0 

Specify Model I or Model III $79.95 

** CALL REGARDING UPGRADE POLICY ** 

CALCS-IV (ADVANCED CALCULATION SUBSYSTEM) has the 
ollowing features: 

• All the capabilities of CALCS-III. 

• SAVE REPORT FORMATS on disk for EDITING, as required. 

• More than TWICE the COMPUTATIONAL POWER of CALCS-III. 

• Non-interpretive report execution for FASTER EXECUTION. 

• Reports can be run by a NOVICE. 

ONLY $20 when purchased with AIDS-lll/Version 2.0! 
Specify Model I or Model III $39.95 



NEW AIDS SUBSYSTEMS 

by SofTrends, Inc. 

VISAPLEX™ 

Interfaces AIDS-III and VisiCalc*. Use AIDS-III 
for data entry, sorting and selection. Then load 
the data into VisiCalc', perform computa- 
tions, summations, etc. Like what you see? 
Change the data back into AIDS-III format for 
future processing. Remarkably easy to use. 
Comprehensive documentation complete with 
examples. 

Specify Model I or Model III $39.95 



ADEPT 7 



M 



This module is ideal for entering large batches 
of data into AIDS-III. Features include pre- 
defined field values, definition and expansion 
of abbreviations, transposition of entries, 
range checking, entry of data from previous 
record, expanded validation and more! Type as 
fast as you can ... no problem! Use with 
VISAPLEX™(above) to provide a comprehen- 
sive data entry facility for VisiCalc*. Complete 
documentation with examples. 

Specify Model I or Model III $29.95 



If you own Apparat's 

NEWDOS/80-Version 2.0 

you need 

BREVI-T™ 

by SofTrends, Inc. 

If you have trouble remembering command for- 
mats, want to simplify use of DOS, do a lot of 
program development or just want to be more 
effective with your TRS-80 ,U . then BREVI-T is 
for you. Abbreviations can be defined for both 
DOS and BASIC. These are automatically ex- 
panded as part of the command line pro- 
cessor. Optionally, parameters may be defined 
as part of an abbreviation. For example, "F 1" 
might be used to FORMAT drive 1 . Change the 
1 to a 2 and FORMAT drive 2. It's that simple. 
Complete with easy-to-follow instructions, ex- 
amples and a sample abbreviation file. 

Specify Model lor Model III $19-' 



Let your TRS-80™ Test Itself With 

THE FLOPPY DOCTOR & 
MEMORY DIAGNOSTIC 

by David Stambaugh 

A complete checkup for your MODEL I or 
MODEL III. THE FLOPPY DOCTOR-Version 3 
completely checks every sector of single or 
double density 35-. 40-. 77-. or 80-track disk 
drives. Tests motor speed, head positioning, 
controller functions, status bits and provides 
complete error logging. THE MEMORY 
DIAGNOSTIC checks for proper write/read, 
refresh, executability and exclusivity of all ad- 
dress locations. Includes both diagnostics and 
complete instruction manual. 

SYSTEM DIAGNOSTICS $24.95 
For MODEL III $29.95 



TRS-80 is a trademark of tho 
Radio Shack Division of Tandy 

Corporation. VisiCalc is a 

trademark of Visi Corp. PLAIN 

JANE. AIDS I, AIDS-III. CALCS-III. 

CALCSIV. MERGE-lllare 

trademarks of MTC. 

1982 by Meta Technologies 
Corporation 
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Mail delivery. 
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Ohio residents add 6.5% 
sales tax. 
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The headline read, "Atari outraged 
by video-pom." The object of the 
company's wrath was Custer's Re- 
venge, a video game that involves rap- 
ing an American Indian woman tied to 
a post. 

The company's solution was to an- 
nounce a law suit against American 
Multiple Industries, the makers of 
Custer's Revenge. 

Apparently, Atari's people have been 
in the game room so long that they've 
forgotten what the real world is like. 

You cannot mention a medium in 
which pornography doesn't have a sub- 
stantial piece of the market. Literature, 
art, film, cable TV, video recorders, 
magazines — in each case, somebody 
has found a way to make a buck from 
sleaze. 

Computer games will be no different, 
and there is nothing Atari can legally do 
about it. 

That's the way it should be. Consum- 
ers do not need a Big Brother telling 
them what's good for them. And Atari 
has no right to impose its moral sensibil- 
ities on the public, however justified 
their outrage might be. 

Atari's intent is obviously to protect 
their wholesome family image. Custer's 
Revenge offers it an easy vehicle to 
prove how moral and righteous it is. But 
Atari's anger serves only to evade a 
much more important point. 

Games like Custer's Revenge appeal 
to racist and sexist attitudes that are 
engrained in American culture. And 
while the computer industry may not 
actively encourage those attitudes, it has 
done little to alter them. 

How many computer games seek to 
create positive images of oppressed and 
minority groups? How many arcade 
games — many of which are Atari's — 
provide anything more than vicarious, 
sensual entertainment? And how do the 
violent microworlds those games create 
help to foster a peaceful, more tolerant 
society? 

Atari is correct to excoriate cheap 
junk like Custer's Revenge. But its 
moral indignation would carry a lot 



Video porn 

is here 

for good 



more weight if it also took some steps 
toward bettering its own products. Pac- 
Man may not have raped any Indian 
women lately, but he also hasn't done 
much to improve the world we live in. 

— EM. 

***** 

Model II owners may not make up a 
large part of 80 Micro's readership, but 
they sure are vocal. Hardly a week goes 
by when we don't receive some mail 
pleading for more Model II material. 

Well, we've taken some steps to cor- 
rect the situation. Starting in April, 
we'll be publishing conversion tables for 
some of our Model I/HI programs. 
This will let Model II people share in the 
wealth of useful and interesting soft- 
ware they've heretofore only been able 
to look at. 

Naturally, we encourage and wel- 
come original Model II programs. 
***** 

Next month promises to be an inter- 
esting issue. Our "To Copy or Not to 
Copy" letter has inspired a number of 
our readers to express in no uncertain 
terms how they feel about software pro- 
tection and piracy. We'll be printing a 
batch of those letters, along with reac- 
tions from several software manufac- 
turers. 

Also, we'll be publishing the results 
of our first Young Programmers Con- 
test. The contest has been successful be- 
yond our expectations, both in numbers 
and in quality. We're sure you'll be as 
open-mouthed as we are about what 
America's youth is producing at their 
computers these days. ■ 
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If you can find 

lower prices than ours, 

read their fine print. 



Our fine print: 



We guarantee every-thing lor 30 days. No returns 
alter 30 days. Defective soltware will be replaced 
Iree. other soltware returns are subject to a 15% 
restocking (ee and must be accompanied by RMA 
slip. No returns on game soltware. 

VISA and MasterCard accepted on all orders — 
no extra charge. COO orders accepted up to $300. 

shipping CHARGES: S3 lor all prepaid orders, 
actual shipping charges lor non-prepaids: $3 for 
COD orders under 25lbs. (S6 for over) plus a $4 
surcharge: add 15% for foreign. FPO and APO 
orders. Calilornians add 6% sales tax. in L.A. 
County add 6'/>%. 

Prices quoted are lor slock on hand and subject 
to change without notice. 

That's It. 



PRINTERS 

COMREX CR-1 PARALLEL 839.00 

COMREX CR-1SERIAL 859.00 

C-ITOH F-10 40 CPS PARALLEL 1390.00 

C-ITOH F-10 40 CPS SERIAL 1390.00 

C-ITOH 8510 PROWRITER PARALLEL.. .480.00 

C-ITOH 8510 PROWRITER SERIAL 590.00 

EPSON MX-80 III W/GRAFTRAX + JCALL 

EPSON MX-80 III F/T W/GRAFTRAX +$CALL 
EPSON MX-100 III W/GRAFTRAX + ....SCALL 

IDS MICROPRISM 480 SCALL 

NEC 8023A 485.00 

NEC SPINWRITER 3530 P.RO 1995.00 

NEC SPINWRITER 7710 S.RO 2595.00 

NEC SPINWRITER 7730 P.RO 2595.00 

OKIDATA MICROLINE 80 389.00 

OKIOATA MICROLINE 82A 460.00 

OKIDATA MICROLINE 83A 700.00 

OKIDATA MICROLINE 84 1170.00 

OKIGRAPH 82 49.95 

OKIGRAPH 83 49.95 

EPSON ACCESSORIES 

MICROBUFFER; MBS-8K 159.00 

MICROBUFFER* MBP-16K 159.00 

MICROBUFFER IN-LINE 32K 299.00 

MICROBUFFER IN-LINE 64K 349.00 

GRAFTRAX PLUS 60.00 

MX-80 RIBBONS 8.95 

MX-80 PRINTHEAD 40.00 

MX-100 RIBBONS 24.00 

MX-100 PRINTHEAD 49.00 

EPSON SERVICE MANUAL 20.00 



16K RAM SPECIAL13.95 

Set ol 8 NEC 4116 200ns Guaranteed one year. 

MODEL I, III 
SOFTWARE 

PROSOFT NEWSCRIPT/LABELS MOD 1. 111.109.00 
OMNITERM SMART TERMINAL MOD I. III. 89.95 

MAXI-MANAGER MOD I. Ill 89.95 

DOS PLUS 3.4 MOD I. Ill 89.00 

LOOS 5.1 MOD I. Ill 119.00 

MICROSOFT EDITOR ASSEMBLER 

+ MOD I (DISK) 44.95 

MICROSOFT FORTRAN MOD 1 80.00 

DISKETTES 

ALPHA DISKS 21.95 

Single sided, certified Double Density 40 Tracks, 
with Hub-Ring. 8ox ol 10. Guaranteed one year. 

SCOTCH 3M 

S.S.D.DEN 40 TRK 23.50 

D.S.D.DEN 40 TRK 36.50 

VERBATIM 

MO 525-01. 10. 16 26.50 

DISKETTES STORAGE 

5'/4" PLASTIC LIBRARY CASE 2.50 

8" PLASTIC LIBRARY CASE 3.50 

PROTECTOR 5%" 21.95 

PROTECTOR 8" 24.95 

TRS-80 HARDWARE 

PERCOM DATA SEPARATOR 27.00 

PERCOM DOUBLER II W/ DOS 3.4 159.00 

TANDON 80 TRK DISK DRIVE W/ P.S..345.00 
TANDON 40 TRK DISK DRIVE W/ P.S.. 289.00 

LNW DOUBLER W/ DOSPLUS 3.3 138.00 

LNW DOUBLER 5/8 W/ DOSPLUS 3.4. .171.00 

ISOLATORS 

IS0-1 3-S0CKET 53.95 

IS0-2 6-S0CKET 53.95 

MODEMS 

NOVATION CAT ACOUSTIC 135.00 

NOVATION D-CAT DIRECT CONNECT.... 156 00 
NOVATION AUTO-CAT AUTO ANSWER.. 219.00 
HAYES SMART MODEM (300 BAUD)... .227.00 
HAYES SMART MODEM (1200 BAUD). .540.00 

LEXICON LEX-11 119.00 

SIGNALMAN MODEM W/ RS-232C 85.00 

FAN FOLD PAPER 

(Prices F.O.B. S.P.) 

9'/; x 11 181b WHITE 3.000 CI 29.00 

14 7/8 x 11 181b WHITE 3.000 d 39.00 



MODEL III DISK DRIVE KITS 

CONTROLLER KIT INCLUDES ALL BOARDS ASSEMBLED ANO TESTED. INTERNAL CONTROLLER. 
MOUNTING BRACKETS. SWITCHING POWER SUPPLY. AND INSTALLATION INSTRUCTIONS. 
HANDLES 4 DRIVES 360 00 

KIT #1: CONTROLLER KlI AND 2 TM 100-3 
SINGLEDSIDED. 80 TRACK DRIVES 875.00 
KIT *2: CONTROLLER KIT AND 2 TM100-4 
D0U8LESIDE0. 80 TRACK DRIVES 1060.00 



KIT #3: CONTROLLER KIT AND 2 TM100-1 
SINGLED-SIDED. 40 TRACK DRIVES. 720.00 
KIT #4: CONTROLLER KIT AND 2 TM 100-2 
OOUBLE-SIDEO. 40 TRACK DRIVES 850 00 



SUPPLIES 

AVERY TABULABLES 

1.000 ZVz x 15/16 8.49 

3.000 3'/i x 15/16 14.95 

5.000 3'/* x 15/16 19.95 

SPECIALS 

SPECIAL N0.1 

TRS-80 DISK AND OTHER MYSTERIES. BOX OF 
VERBATIM DISKS. PLASTIC LIBRARY CASE... 
44.50 

SPECIAL N0.3 

NEWDOS/80 2.0. BOX OF VERBATIM DISKS. 
PLASTIC LIBRARY CASE 149.00 

SPECIAL N0.4 

MICROSOFT BASIC COMPILER. BOX OF VER- 
BATIM DISKS. PLASTIC LIBRARY CASE 

179.00 

SPECIAL N0.5 

MICROSOFT BASIC DECODED AND OTHER 
MYSTERIES. BOX OF VERBATIM DISKS. PLASTIC 
LIBRARY CASE 49.95 

DOUBLE DENSITY SPECIAL 

PERCOM DOUBLER II. NEWDOS/80. BOX OF VER- 
BATIM DISKS. PLASTIC LIBRARY CASE 

279.00 

COMMUNICATION SPECIAL 
MOD I & II 

NOVATION MODEM. OMNITERM TERMINAL 
SOFTWARE. 

ACOUSTIC SPECIAL (CAT) 219.00 

DIRECT CONNECT SPECIAL (D-CAT).. ..239.00 
SERIAL CABLE 25.00 

DISK LIBRARY SPECIAL 

RACET DISKCAT CATALOGING PROGRAM. FLIP 
SORT (50 DISK CAPACITY). 50 STICK-ON D X 
LABELS 59. ! J5 

BOOKS 

BASIC BETTER & FASTER DEMO OISK... 18.00 

THE CUSTOM TRS-80 24.95 

MICROSOFT BASIC FASTER & BETTER... 24.95 

CUSTOM I/O MACHINE LANGUAGE 24.95 

TRS-80 DISK & MYSTERIES 16.95 

MICROSC'T 8ASIC DECODED 24.95 

TRS-80 GAMES 

All games are disk versions. Cassette versions 
may not be available. 

TEMPLE OF APSHAI 31.35 

HELLFIRE WARRIOR 31.35 

STAR WARRIOR 31.35 

RESCUE AT RIGEL 23.36 

CRUSH. CRUMBLE ANO CHOMP 23.36 

INVADERS FROM SPACE 17.95 

PINBALL 17.95 

MISSILE ATTACK 18.95 

STAR FIGHTER 24.95 

Z-CHESS III 24.95 

ADVENTURE NO. 1. 2. & 3 34.95 

ADVENTURE NO. 4. 5. & 6 34.95 

ADVENTURE NO. 7. 8. & 9 34.95 

DUEL-N-DROIDS 17.95 

STARFLEET ORION 21.95 

INVASION ORION 21.95 

OLYMPIC DECATHLON 24.95 

MONTY PLAYS MONOPOLY 31.95 

SARGON II 31 95 

BLACKJACK MASTER 27.95 

ROBOT ATTACK 17.95 



GALAXY INVASION 17.95 

SUPER NOVA 17.95 

TUESDAY MORNING QUARTERBACK 26.95 

LUNER LANDER 18.95 

THE MEAN CHECKER MACHINE 21.95 

SPACE ROCKS 18.95 

PIGSKIN 17.95 

ZOSSED IN SPACE 18.95 

ARCADE-80 21.95 

SPACE INTRUOERS 17.95 

MORTONS FORK 26.95 

SCARFMAN 17.95 

CALL OUR MODEM LINE 
FOR WEEKLY SPECIALS. 



lb order or for 

information call 

InNewVbrk; 
(212)509-1923 

In Los Angeles: 
(213)706-0333 

In Dallas: 
(214)744-4251 

By Modem: 
(213)883-8976 
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31245 LA BAYA DRIVE 
WESTLAKE VILLAGE, CA 91362 
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SCARFMAN ARMORED PATROL REARGUARD STRIKE FORCE 



This incredibly popular game craze 
now runs on your TRS-80! It's eat or 
be eaten. You run Scrartman around 
the maze, gobbling up everything in 
your path. Try to eat it all before nasty 
monsters devour you. Excellent high 
speed machine language action game 
from the Cornsoft Group. With sound. 
Price: A 



♦♦♦♦♦♦♦♦♦♦•Hfr 



H I i i'H i i i 



'J 



# flffl 



o C : 



A realistic tank battle simulation. 
Your view is a 3-D perspective of an 
alien landscape. Maneuver your T-36 
tank to locate and destroy enemy 
tanks and robots that lay hidden, 
ready to assault you. Clever graphics 
create the illusion of movement and 
dimension. From Adventure Inter- 
national. With sound. Price: B 

BOUNCEOIDS 

Huge boulders careen off the walls. 
You're in the middle, in danger oil 
being flattened. Keep your wits about 
you as you blast these "bounceoids*' 
from the screen. Large ones break into 
many small ones. Clear a screen, and 
enter a fast-paced challenge stage 
with a chance for big bonus points. I 
From the Cornsoft Group. Price: A 

CATERPILLAR I 

An arcade favorite! Stop these multi- 
sectioned crawlers before they creep 
down through the mushrooms. Zap 
one and it splits into two smaller bugs, 
each with its own sense of direction. 
There are moths and tumble bugs too. 
It all adds up to lots of fun for kids and 
adults alike. From Soft Sector Market- 
ing. With sound. Price code: A 

DEFENSE COMMAND 

The invaders are back! Alone, you 
defend the all important nuclear fuel 
canisters from the repeated attacks of 
thieving aliens, repeatedly. An alien 
passes your guard, snatches a 
canister and flys straight off. Quick! 
You have one last chance to blast him 
from the sky! With sound and voice. 
Price: A 

CRAZY PAINTER 

You have to paint the floor white. We 
give you the paint and brush. Sounds 
easy? Hah! You'll be confounded by 
stray dogs, snakes, sloshing buckets 
of turpentine, even a ravenous "paint 
eater." A crazy, imaginative new 
game with ten selectable levels of skill 
for new or seasoned game players. 
Lot's of laughs. Price: A 

SUPER NOVA 

Asteroids float ominously around the 
screen. You must destroy the 
asteroids before they destroy you! (Big 
asteroids break into little ones). Your 
ship will respond to thrust, rotate, 
hyperspace and fire. Watch out for 
that saucer with the laser! As 
reviewed in May 1981 Byte Magazine. 
Price: A 



Deadly waves of enemy Cyborg craft 
attack your fleet from the rear. You are 
the Mothership's sole defender. You 
have unlimited firepower but the 
Cyborgs are swift, nimble attackers. 
Your abilities are tested hard in this 
game or lightening fast action and 
lively sound from Adventure Inter- 
national. Price: B 



As the primary defender of a world of 
cities under deadly alien attack, your 
weaponry is the latest: rapid fire 
missiles, long range radar, and 
incendiary "star shells." Your force 
field can absorb only a limited number 
of impacts. A complex game ot 
strategy, skill and reflexes from 
Melbourne House. Price: A 



'It you purchase Alpha's 
Joystick you get the ex- 
quisite pleasure of enjoy- 
ing (action games) to the 
limit of arcade-style 
realism." 

\ -80 Microcomputing 
} 80 Reviews. Jan '82 



POWER 



THE 

ALPHA 

JOYSTICK 



ONLY 



+ Features the famous Atari Joystick 
* Works with all Model I or ill systems 
+ Compaiibie .Niih any other accessories 
-i- Saves your keyboard trom abuse 
+ Experiment in BASIC UseA = INPiO) 
+ Complele. ready to plug in and use 
+ Model I plugs into KB oi 6/1 
+ Model III plugs mm 5Q urn I- bus 

Price includes Joystick + Alpha Interlace 
+ Instructions + Demo Program listing 
Please specify Model I or III. 



© 1982 Mi alpha Products 14 DAY MONEY BACK GUARANTEE 




METEOR MISSION II 

As you look down on your view, 
astronauts cry out for rescue. You 
must maneuver through the asteroids 
and meteors. (Can you get back to the 
space station?) Fire lasers to destroy 
the asteroids, but watch out, there 
could be an alien Flagship lurking 
Includes sound effects! Price: A 



OUTHOUSE 

You are the mighty protector of this 
small (but important) wooden 
structure. For reasons unknown, a 
bizarre gang of miscreants wish to 
vandalize, loot and otherwise destroy 
the little "half moon house." Your 
patrol craft has lasers and smart 
bombs to deal with this terror. 
From SSM with sound. Price: A 



Toll Free Order Line 
800-221-0916 

Orders Only, NY & Info call (212) 2965916. Hours: 9-5 E.S.T. 



TAPE: For Model I + III, 16K Level II 
DISK: For Model I + III, 32K, 1 Disk 
All games are joystick compatable 
or may be played using the arrow 
keys. 



GAME PRICES 

A: TAPE: $15.95 • DISK: $19.95 
B: TAPE: $19.95 • DISK: $24.95 
C: TAPE: $24.95 • DISK: $24.95 
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PANIK 

Trapped at an enemy building site, 
your fate seems certain. Your laser is 
empty and evil Mzors are closing in. 
You'll have to climb ladders and think 
one step ahead ot the various 
monsters. A challenging game for 
agile minds. From Fantastic Software 
with voice (Disk has larger vocabulary). 
Price: B 



SEA DRAGON 

Your submarine, the U.S.S. Sea 
Dragon, penetrates a mined enemy 
channel. Armed with missiles and 
torpedos. you engage the enemy while 
navigating unknown waters. Succeed 
or come to a salty end in this game. 29 
screens of horizontally scrolling sea- 
scrape and sound from Adventure 
International. Price: B 



As you can see, all the best games from the top 
producers are joystick compatible. These 
games are fun without the joystick but we hope 
that you are one of the many thousands who 
enjoy the advantage of real joystick action. 

Now you can deduct up to 20% on the price of 
games: buy any 2 games deduct 10%, buy any 3 
games deduct 15%. buy any 4 games deduct 
20% from game prices. 

' TOP TEN 

1 . SCARFM AN All time favorite 

2. ARMORED PATROL- Super 3D graphics 

3. PENETRATOR Rave reviews 

4. STELLAR ESCORT Fast and Challenging 

5. CRAZY PAINTER Unique game concept 

6. PANIK Remarkable Voices 

7. DEFENSE COMMAND Tough struggle 

8. CATERPILLAR Good rendition 

9. ROBOT ATTACK With voice 

10. SEA DRAGON Amazing "Seascape" 
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GALAXY INVASION LASER DEFENSE 



The sound of the klaxon is calling you! 
Invaders have been spotted warping 
toward Earth. You shift right and left 
as you fire your lasers. A few break 
formation and fly straight at you! You 
place your finger on the fire button 
knowing that this shot must connect! 
With sound effects! Price: A 



In this game of ICBM's, high-energy 
lasers and particle beams, you control 
the U.S. strategic defense satellite 
system. From your viewpoint high 
above the globe, you intercept Soviet 
nuclear missiles in flight and attempt 
to destroy their scattered missile 
silos. With sound from MED Systems. 
Price: B 




STELLAR ESCORT 



The latest super action game from Big 
Five. As the Federation's top space 
fighter you've been chosen to escort 
what is possibly the most important 
shipment in Federation history. The 
enemy will send many squadrons of 
their best fighters to intercept. With 
sound. Disk version has voices. 
Price: A 

ROBOT ATTACK 

[ Talks without a voice synthesizer, 
through the cassette port. With just a 
hand laser in • a remote space station. 
[ you encounter armed robots. Some 
; march towards you, more wait around 
corners. Careful, the walls are 
electrified. Zap as many robots as you 
dare before escaping to a new section. 
More robots await you. Price: A 

LUNAR LANDER 

As a vast panoramic moonscape 
• scrolls by, select one of many landing 

sights. The more perilous the spot, the 
i more points scored -- if you land 

safely. You control LEM main engines 

and side thrusters. One of the best 
I uses of TRS-80 graphics we have ever 
(seen. From Adventure International. 

With sound. Price: A 



CHICKEN 

Will the chicken cross the road? 
That's up to you. Can you guide these 
helpless little chicks across the 
perilous 10 lane super highway to 
safety? Or will you bumble, littering 
the blacktop with a storm of chicken 
feathers? A humourous yet chal- 
lenging game of nerves from SSM with 
sound. Price: A 




PENETRATOR 

Soar swiftly over jagged landscape, 
swooping high and low to avoid 
obstacles and enemy missiles attacks. 
With miles of wild terrain and tunnels 
to penetrate, you're well armed with 
bombs and multiple forward missile 
capability. From Melbourne House. 
Features sound, trainer mode and 
customizing program. Price: C 
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ALPHA LF"Lf(0)(o 

79-04 Jamaica Ave., Woodhaven, NY 11421 



ADD S2.00 PER ORDER FOR SHIPPING AND HANOLING. 

WE ACCEPT VISA. MASTERCARD. CHECKS. M.O. 

C.O.D. ADD $3.00 EXTRA. 

NY RESIDENTS ADD SALES TAX. 

OVERSEAS, FPO. APO: ADD 10%. 

DEALER DISCOUNTS AVAILABLE. . r 
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Hard Disk for Model II 

I have been led down the primrose 
path by Tandy in buying a Model II. I 
was under the impression that a reason- 
ably-priced hard disk unit would soon 
be on the market. 

Can anyone tell me what it would 
take to replace my single disk drive in 
the Model II with two thinline types 
such as the Tandon TM848-2? 

I'm not in favor of adding an extra 
expansion box for them. I would like to 
see them built in, as in the Model 16. I 
have a Model II service manual and it 
appears that the disk controller could 
support such a drive, but I'm not cer- 
tain about the power requirements. 

I am certainly not the only Model II 
owner with this ambition. With so 
many in-cabinet upgrades available for 
the Model III, why can't someone do it 
for the Model II? 

Tom Chaapel 

Ronco C&E Inc. 

41 E. Market St. 

Corning, NY 14830 

The hard/soft disk system (HSDS) 
from Racet Computes modifies 
TRSDOS 2. Oa to work with many hard- 
disk units. — Eds. 



Lots of Problems 

Your September and October "Re- 
load 80" sections contain an outstand- 
ing utility. When combined, the two 
short programs become one utility in- 
valuable for Assembly-language rou- 
tines or subroutines. Many conversion 
programs have appeared in the maga- 
zine in the past, but none as comprehen- 
sive as this. It's a real gem. 

As a novice Assembly-language pro- 
grammer one thing has eluded me (and I 
suspect others as well). When source 
listings are given you need the hexadeci- 
mal starting address, hexadecimal end- 
ing address, and hexadecimal entry 
point to change memory locations. 

How do I read a source listing to de- 
termine the above-mentioned ad- 
dresses? 

I just purchased Radio Shack's disk- 
based Series-I Editor/Assembler (Cat. 
#26-2013) that includes a version of 
TRSDOS 2.3B which is not compatible 
with TRSDOS 2.3. This upgrade utility 
does not permit the Basic command to 

16 • 80 Micro, January 1983 




Please do not submit any letters 
longer than 300 words for the Input, 
Aid, and Debug columns. 80 Micro 
reserves the right to edit any letters 
submitted. — Eds. 



return to Basic to set the number of files 
or to set memory. 

All my machine-language utilities 
that operte under TRSDOS 2.3 will not 
run under TRSDOS 2.3B.To quote 
from the pages that come with the Edi- 
tor/Assembler, "Old TRSDOS disk 
used under the new TRSDOS must be 
upgraded before use. Once upgraded, a 
system or data disk becomes a new 
TRSDOS data disk." 

When I contacted Radio Shack I was 
told that they don't know how to enter 
Basic through this TRSDOS version, 
and that TRSDOS 2.3B is unsupported 
by Radio Shack and no manuals are 
planned for its use. I was told that this 
version of TRSDOS was written specifi- 
cally for the Series-I Editor/ Assembler. 

Does anyone have anything to offer 
regarding using TRSDOS 2.3B? 

Jerry Reiser 

93 Scotland Hill Road 

Spring Valley, NY 10977 



Write Your Own Driver 

The new SuperScripsit Word Proces- 
sor has some interesting features to rec- 
ommend it over the standard Scripsit. 
Its modular construction (much like 
TRSDOS, where a resident supervisory 
module calls in various overlays to do 
specific tasks) offers a choice of six spe- 
cific printer drivers, plus a serial printer 
driver; but, of course, only Radio 
Shack printers are provided for. 

An appendix in the manual on "How 
to Write Your Own Driver for a Non- 
Radio Shack Printer" does nothing to 
dispel the confusion. 

Has anyone put together a driver for 



the Epson MX-80 to interface it with 
SuperScripsit? 

Paul Martin 

P.O. Box 1331 

Punta Gorda, FL 33951 

New Sound Routine 

In the modifications to "Space 
Chase" by Charles E. Gillen (80 Mi- 
cro, October 1982, p. 31) he states, 
"The modified program should work 
equally well on Models I and III..."; 
this is not quite accurate. The sound 
routine in this program is one com- 
monly used; I have found it in several 
game and music programs in 80 Mi- 
cro. Unfortunately, this routine does 
not work on the Model III. 

I've developed a routine to modify a 
number of these programs. It gives ap- 
proximately the same results from the 
same USR input values and works with 
either the Model I or III. 

DATA 243,205,127,10,62,1,14,0,69,238,3, 
211,255,13,40,4,16,251,24,244,37,32,246,251, 
201 

This routine has only 25 bytes instead 
of the 29 in the original routine. This 
means that you must reduce the limits 
of the For... Next loop that reads the 
data by four. Also, if you POKE the 
data into a string, you must reduce the 
length of the string. 

For example, in Mr. Gillen 's modi- 
fied program: 
Line 50— Change "ZZ$ = STRINGS 
(29,0)" to "ZZ$=STRING$(25,0)" 
Line 60— Change "FOR ZZ = Z3 TO 
Z3 +28" to "FOR ZZ = Z3 TO 
Z3+24" 

Some of the programs use CMD'T" 
to remove the buzzing sound from the 
notes. That is not necessary with this 
routine since the interrupts are disabled 
at the start of the routine and enabled 
again before the return to Basic. 

David H. Siebenthaler 

54 W. Maplewood Ave. 

Dayton, OH 45405 



WP Comparison 

Mr. Robinson's insight into the de- 
tails of word processing, and his ability 
to explain them to the reader, are most 
evident. However, I believe he missed 



NOW MODEL I AIMO MODEL III ! 



Now Model III users can take advantage of the ALPHA I/O system too. Our new 
MOD III/I BUS CONVERTER allows most port based Model I accessories (such as 
our ANALOG-80, INTERFACER 2 and INTERFACER-80) to connect to the Model III 
bus. MOD III/I BUS CONVERTER, complete with all connectors, only $39.95. 
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PRINTSWITCH 

Have 2 printers on line ai all limes and selecl primer I or 
2 by means ol a conveniently locaterj switch. End the problem 
of consianiiy plugging and unplugging primer cables PRINT- 
SWITCH is a compact module that plugs omo ihe pareliei primer 
port ol your TRS-80 and provides an edge conneclor lor each 
ol your Iwo printers. II works wilh any two lypes ol primers: 
dot matrix, daisy wheel, plotters. TRS-80 converted seleclrics. 
etc. Assembled, tested, ready lo use with conneclor and in- 
structions. For Model I or III (please specify). ONLY . . S59 00 



OE^ ) 40PH8- {p CABLES 

@od 34PK42- ra ra 

©a 34P*v54-ra m ra ra 

©HID 34P*i,2ft rp 
®ED 34 Pin, 4ft Fp 

© §£D 40 Ptn, 2 or 4 ft ("J 3 



SUPERIOR QUALITY REPLACEMENT & EXTENSION CABLES 
Highest quality cable and high (orce. gold plated contacts 

ensure Ihe utmost in connection reliability 

O KEYBOARD TO EXPANSION INTERFACE S2 1 

© DISK DRIVE CABLE FOR 1 OR 2 ORIVES . . . S32 
© DISK DRIVE CABLE FOR 3 OR 4 DRIVES . .. .S4S 

O DISK DRIVE CABLE EXTENDER $22 

© PRINTER CABLE EXTENDER S24 

© 40 PIN BUS EXTENDER - 2 II. . S22 4 It . $24 
Custom cable configurations are also available Call us 
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ANALOG-80 A WORLD OF NEW APPLICATIONS POSSIBLE 
3 O'GiIAi MULTIMETERS PLUGGED WTO YOUR TRS-SO'" 
Measure Temperature Voltage Coirtnl light Pressure etc 
Very easy lo use for example let s >e»e :nput channel M !0 
OUT s Selects input »4 and also Sluts we conversion ?o 
■". :W0> Puis me result in vanaoie A Vona' 
Specifications input range O-'jV lo C-iOOV Each channel 
cm ae set lo a dilleren; scale 

Resolution ?0mvion5V range ■ Accuracy 8bnsi 5%i Port 
Access jumper selectable Plugs into keyboard tius Or E/l 
(sreen printer DO'ti Assembled and tested 90 day warranty 
Complete with power supply, connector manual $139 



TIMEOATE 80: REAL-TIME CLOCK/CALENDAR MODULE 

Keeps quart/ accurate time tor 3 years on ? replaceable 
AAA batteries inot included' tiiues MO 'DATE YR DAY 0: 
WEEK MR WIN SfC and AM/PM Features IMELL'GINI 
CAii-NOAR ,:nd even provides tor leap Year itus compact 
module Simply plugs wlo rear ot Keyboard or side ol 
fxp,:nsion Interlace imay he s-ippea msioe ill Includes 
cassette sollwa'e lor Milling 1 lock and patching to any DOS 
including NEVVDOS 80 ? ■ Optron.il Y connector al.ows 
lOl lurtllOt expansion For Model I Fully assembled .HIC 
tester: C:m :>n:le with instruction:, ,im! CiSSirtle ONI Y 
5 00 v option add Si 2 00 

power relays undei 

your 




DISK DRIVE EXTENDER CABLE. FREE YOUR MINI-DRIVES. 

End Ihe daisy-chain mess once and lor all Fits all mini- 
dnves. Percom. Aerocomp. Shugarl. Micropolis. MTI. Visia. 
Pertec. Siemens. BASF East to install. |ust remove the drive 
cover, plug in ihe EXTENDER CABLE and replace Ihe cover 

Now you can change and move your drives without dis- 
assembly Keep the cover on and the dust out High reliability 
gold plated contacts, computer grade 34 conductor cable 
Tesledand guaranteed 

Get one for each drive ONLY S8 9b 



INTERFACER-80: the most BOwcrlu: Sense • Control module 
•8 industrial grade relays single a-oie double throw isolated 
contacts 2 Amp ;,, 125 Volts II L latcnec D-iip-is are also 
dccessioie to onve externa.- solid slate relays 
.8 convenient i (.(is constantly display the relay slates 
Simple OU' co-'ii'arids 1 in basic I control :'t 8 relays 
• 8 oplicailyisoiated inputs for easy direct interlacing to 
external switches photccei-s keypacs sensors etc 
Simple imp' co-~manas 'eac tne status 0; trie 8 inputs 
Selectable port add'ess Clean compact enclosed design 
Assembled tesicd. 90 days warranty Price includes power 
supply, cable connector supero user's manual $159 




YOU ASKEO FOR IT: "EXPANDABUS" XI. X2. X3 AND X4. 
CONNECT ALL YOUR TRS-80 DEVICES SIMULTANEOUSLY 
on the 40 pin TRS-80 bus Any device that normally plugs 
mio the keyboard edge connector will also plug into tne 
EXPANDABUS' The X4" is shown with protective 
covers (included) ine TRS-80 keyboard contains the bus 
drivers (74LS367) lor up to 20 devices, more than v ou will 
ever need Using the E/l it plugs either between K8 and E/l 
or in the Screen Printer port Professional ouahiy gold 
plated contacts Computer grade 40 conductor ripoon cable 
X2. S29 X3 S44 X4 $59 Xb S74 

Custom configurations are also available can -js 



GREEN SCREEN 

WARNING 

IBM and all the biggies aie using green screen monitors 

its advantages are now widely advertised We leei mat every 

TRS-80 user should enjoy the benehis it provides But 

WARNING: al 1 Green Screens are nol created equal Here is 

what we lound 

•Several are just a Hal piece of standard colored lucite The 

green lini was nol made for this purpose and is judged by 

many 10 be loo dark Increasing ihe brightness control will 

result in a fuzzy display 

•Some are simply a piece of mm piasnc film taped onto a 

cardboard Irame The color is satisfactory but me wobbly litm 

gives il a poor appearance 

•One "optical lilter" is in lad plain acrylic sheeiing 

•False claim: A lew pretend to reduce glare" in fact their 

Hal and shiny surfaces (both lilm and Lucite type) ADD their 

own reflections 10 ihe screen 

•A lew laughs One ad claims lo "reduce screen contrast ' 

Sorry gentleman but it's just tne opposite One ol ihe Green 

Screen's major benelits is lo increase the contrast between 

Ihe lexi and the background 

•Drawbacks Most are using adhesive strips to fasten their 

screen to me monitor Tins method makes it awkward to 

remove lor necessary periodical cleaning AM lexcepi ours) 

are Hat Light pens win not work reliably because ol me big 

gap belween ihe screen and the lube 

Many companies have been manufacturing video filters lor 

years We are nol the lirsl (some think ihey are). Out we have 

done our homework and we think 'we manufacture the best 

Green Screen Here is why 

•it his right onto the picture tube like a skin because it is me 

only CURVEO screen MOLDED exactly 10 me picture lube 

curvature It is Cut precisely 10 cover ihe exposed area of the 

picture tube Ihe In is Sucn thai the sialic electricity is 

sufficient 10 keep il m place' We also include some invisible 

reusable lape lor a more secure fastening 

•The finer material mai we use is iusi righl not 100 dark nor 

loo iigm Ihe result is a really eye pleasing display 

We are so Sure thai you will never lake your Green screen oil 

that we offer an unconditional money-back guaranty try our 

Green Screen lor 14 days if for any reason you are not 

delighted wilh It. return it (or a prompt relund 

A las: word We think thai companies like ours, who are 

selling mainly by mail should «iist their street address»have a 

phone number (lor questions and orders)«accepi CODs. nol 

every one likes 10 send checks to a PO box»oller ihe 

convenience ol charging iheir purchase 10 major credit cards 

How come we are Ihe only green screen people doing if 

Order your ALPHA GREEN SCREEN today SI ? 50 



LJE ALPHA Products 



A00 S2 50 PER ORDER FOR SHIPPING AND HANDLING 

ALL ORDERS SHIPPED FIRST CLASS MAIL 

WE ACCEPT VISA. MASTER CHARGE CHECKS MO 

COD ADOS? 00 EXTRA 

OUANTITYOISCOUNTS AVAILABLE "f 

N Y RESIDENTS AOD SALES TAX ma 



79-04 Jamaca Ave., Woodhaven, N.Y. 1142t «5? info and order. (212)296-5916 
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the point of the Word Machine's real 
utility. 

I have been interested in, working 
with, and fascinated by word processors 
and text editors for years. This includes 
WP/34 for the IBM, WordStar, Select, 
Scripsit, and Electric Pencil. I have also 
observed the reactions of clerks and sec- 
retaries in offices when told that they 
would have to learn to use a word pro- 
cessor. The reaction is generally nega- 
tive. It takes a good secretary about a 
month to lose the fear of using this 
thing. It takes another month to gain 
some confidence, and then it's mostly a 
matter of how much the secretary is 
willing to put into it to get more out of 
it. The majority of users don't need or 
use up to 80 percent of what these word 
processing programs offer. Yet they 
have to go through the initial ordeal to 
learn to use the 20-50 percent that they 
do use. 

I believe much software on the mar- 
ket today is the result of contests be- 
tween first-rate programmers. These 
results approach programming perfec- 
tion, but do not give the user what he 
really needs. The average secretary, 
hobbyist, or home user uses a word pro- 
cessor mainly for letters and notes, 
memoranda, small reports, and one or 
two-page advertising text. 

The Word Machine is designed for 
these people. It takes about ten minutes 
to be able to use this menu-driven pro- 
gram. The screen is self-prompting, and 
the choices are clear and simple. 

The Word Machine is written in Ba- 
sic, which, as Mr. Robinson points out, 
is not as fast as Assembly language. In- 
dividual routines in the Word Machine 
can take longer than in the more expen- 
sive programs. We do, however, invite 
comparison with any of the Assembly- 
language programs on the market. 

We have designed the Word Machine 
for use with the TRS-80 Models I and 
III, with Centronics (Radio Shack line 
printers) or Epson MX printers. The 
Model I owner without the lowercase 
hardware modification can even get 
lowercase printout if his printer has a 
lowercase font. The Epson version al- 
lows variable line spacing. I am con- 
vinced that these features satisfy 100 
percent of the requirements of 99 per- 
cent of the people who want to reap the 
rewards of a word processor. 

Gary Himler 

P.O. Box 3322 

Granada Hills, CA 91344 
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Dan Robinson Replies 

Choice of a word processing program 
is a personal matter. My personal belief 
is that a word processor written in Basic 
can 't compete with a machine-language 
program. Basic 's editing commands can 
hardly be simpler for a secretary to 
learn than those of a well-written pro- 
gram like Scripsit. Moreover, in the 
Word Machine's tape version, having 
to make substitutes for every comma or 
colon can hardly make the work 
easier. — Dan Robinson 



Impartial Reviews 

Bruce Powel Douglass' review of 
Newscript 7.0, by Prosoft (80 Micro, 
October 1982) is a glowing report of 
that program's virtues and capabilities. 
On looking further through the maga- 
zine, I found on page 215 an ad for a 
game called Regilian Worm by Bruce 
Powel Douglass, and marketed by Pro- 
soft. In my mind, this raises a question 
concerning the objectivity of the reviews 
in your magazine. 

While a product review by someone 
having a business relationship with the 
product's supplier can be fair and im- 
partial, 80 Micro has an obligation to 
inform readers of any known business 
relationship between a reviewer and the 
company that markets the product be- 
ing reviewed. 

R. B. Ormsby 

135 Marshglen Point, N. W. 

Atlanta, GA 30328 

At the time Bruce Douglass' review 
was accepted, Regilian Worm was not 
yet being marketed by Prosoft. We are, 
however, sensitive to the kinds of con- 
flicts of interest you mention. While we 
can 't claim a track record of 100 per- 



cent, we try to screen out reviews by 
people with vested interests. — Eds. 

Trying Harder 

As a Radio Shack computer service 
technician, I take exception to Wayne's 
"Remarks" (80 Micro, October 1982), 
that state, "... otherwise, you are help- 
less at the hands of the Tandy service 
people, who seem to have little respon- 
sibility to the stores that work with 
them — or to the customers." 

It is unfair to condemn all service 
people as uncaring based on a few ex- 
periences. With any product or service, 
there are going to be unhappy custom- 
ers, especially from the service end. 
However, many of us strive to provide 
customers with the fastest, most courte- 
ous service at the lowest possible price. 

We are not the only company selling 
microcomputers. So if our customers 
put their faith and money into our 
products, it's only fair that they be 
treated in a proper manner. If it weren't 
for them, I, and many others, would be 
out of a job. 

Paul Gaitanis 

461 Westover Hills Blvd. 

Richmond, VA 23225 

Model III Dialer 

The article "Telephone Dialer" by 
Jim Hickey (80 Micro, June/ July 1982) 
works fine on a Model I, but the Model 
III cassette port operates differently. 
The dialer uses the remote control for 
the cassette deck. When a 4 is output to 
port number 255, the contacts on the 
jack close to complete the circuit and 
turn on the relay. Likewise, a sent to 
the same port turns off the relay. The 
Model III controls the remote through 
port 236. 



40 OUT 236,2 

60 OUT 236,16 

400 RESTORE:PRINT CHR$ ( 28) ;: PRINT 6128, "COMMAND : 

";CHR$(30);:L=20:GOSUB 800:IN$=W$ 

405 PRINT CHR$(31); 

410 IFIN$ "LIST" THEN CLS:PRINT:GOTO490 

490 READNA$,NO$:IFNA$ "END"THENPRINT: PRINT: LINEINPUT"Press 

ENTER to continue";A$:PRINT@,CHR$(31);:GOTO 

400ELSEPRINTA$, ; : GOTO 4 90 

511 IFNO$ "0*THEN520 

610 OUT236,2:FORLP 1TO300:NEXT:OUT236,16:GOTO400 

800 LINEINPUTW$: RETURN 

Program Listing 1 



From Computer Plus to YOU . . . 
PLUS a«e, PLUS after PLUS 




Color Computer 16K $249 

w/16K Ext. Basic $335 
W/32K Ext. Basic $449 




Color Computer Disk Drive 
Drive $470 Drive 1 $315 



BUY DIRECT 



COMPUTERS 

Model II 64K 
Model III 4K LEV I 
MODEL III 16K 
MODEL III 32K 

'MODEL III 32K 
MODEL III 48K 

'MODEL III 48K 
Model III 48K 
2 Disk & RS232 c 
Color Computer 16K 
Color Computer 16K 
w/extended basic 
Color Computer 32K 
w/extended basic 

tColor Computer 32K-64K 
w/extended basic 
Pocket Computer 2 
ModeM61DR128K 
ModeM62DR128K 
DT-1 Data Terminal 
PT-210 Portable Terminal 




$2999 
599 
799 
856.50 
831.50 
914 
864 

1899 
249 

335 

449 

510 
230 
4199 
4799 
599 
779 



Here are just a few of our fine offers . . 
call TOLL FREE for full information. 

MODEMS 

Lynx Direct Connect Ml/Mill 



Hayes Smart Modem II 
R.S. Acoustic Coupler AC-3 
R.S. Modem I D.C. 
R.S. Modem II D.C. 
PRINTERS 
Daisy Wheel II 
DWP-410 

Smith CoronaTPI Daisy Wheel 
Epson MX80 
Epson MX80 FT 
Epson MX100 
CGP-115 
DMP-100 
DMP-200 
DMP-400 
DMP-500 
Microline 80 
Microline 82A 
Microline 83A 
Microline 84 Parallel 
P. C. Plotter Printer 



235 
235 
134 
130 
210 

1715 

1335 

599 

599 

549 

735 

199 

315 

599 

1029 

1569 

325 

425 

679 

1029 

199 



We have the lowest possible 
Fully Warranteed Prices AND 
a full complement of Radio Shack 
Software. 



Prices subject to change without notice. 
Not responsible for typographical errors. 
TRS-80 is a registered trademark of Tandy Corp. 



DISK DRIVES 

R.S. Model III 1ST-Drive 
Tandon 40 Track Ml 
Color Computer Drive 1 
Color Computer Drive 
Primary Hard Disk Mil 
Primary Hard Disk Mill 
ETC. 

CCR-81 recorder 
C.C Joysticks 

16K RAM N.E.C. 200 N.S. chips 
64K Ram Chips 
Color Computer Flex D.O.S. 
Brand Name Software • 

Send for listing. 
R.S. Software 10% off list 

•Computer Plus New Equipment, 
with NEC RAM installed. 
180 Day Computer Plus Warranty. 

fColor Computer 64K requires 
Disk and Flex D.O.S. 

TOLL FREE 
1-800-343-8124 



679 
289 
315 
470 
3999 
1999 

52 
22 
25 
75 
99 





com 



plus 



P.O. Box 926 

480 King Street 

Littleton, MA 01460 ■ Wrlt « for V° ur 

61 7-486-31 93 u " catalog 
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The flashing cursor routine at line 
800 can be replaced on disk systems 
(Disk Basic) by a Line Input; this saves 
memory and is more efficient. 

Change or delete the lines in Program 
Listing 1 to make a dialing program 
work on a Model III. 

Tom Lake 

15 Silver Lane 

Chappaqua, NY 10514 

Hexagon Speaks 

I was impressed by the comprehen- 
sive review of word processing pro- 
grams in your September issue. As 
the author of Hexspell 2, 1 would like to 
comment on your Spelling Checker 
section. 

Mr. Robinson commented he found 
Hexspell "a bit slow." No doubt with 
many programs to review he could not 
spend a long time with Hexspell — 
otherwise, he would have found it 
speeds up in use. Hexspell reorders its 
word list to bring the most-frequently 
used words to the front, where they are 
found fastest. This leads to a noticeable 
increase in speed. Hexspell was de- 
signed for people who wish to read 
through a document before sending it 




The DOSPLUS II Model II operat- 
ing system, listed in our November 
1982 New Products section, is a joint 
creation of PowerSOFT (1 1500 Stern- 
mons Freeway, Suite 125, Dallas, TX 
75229) and Micro-Systems Software 
Inc. (4301-18 Oak Circle, Boca Raton, 
FL 33431). PowerSOFT's contribu- 
tion was inadvertently omitted.— Eds. 



Regarding my Patch for Scrip 
Patch that you published in your Oc- 
tober 1982 issue (Input, p. 22), I apol- 
ogize for not being more explicit. The 
Basic address of 26347 wasn't a direct 
conversion from 66DFH (26335), 
which is what you printed. 26335 
causes a load file format error. * 

Bill Geib 

8185 State Road 

North Royalton, OH 44133 



out. As such, it runs only at the user's 
reading speed, and contains provisions 
to slow down. 

The choice of a word list for a spell- 
ing checker is difficult. Mr. Robinson 
favors difficult-to-spell words in place 
of words like cat and dog. Some people 
would be upset to hear that such words 
are incorrect every time they run a spell- 
ing check. Mr. Robinson points out that 
all spelling checkers miss some obvious 
words. A large dictionary contains 
some 500,000 words, so even the largest 
TRS-80 spelling checker misses 85-90 
percent of possible words. 

Choosing the perfect word list is such 
a personal matter that Hexspell avoids 
it. Instead, Hexspell concentrates on 
adapting its original word list to the 
user's requirements. It does this by 
learning new words, and rearranging its 
list according to frequency of use. 

While comparative reviews are useful 
they don't give the reviewer a chance 
to spend more time with a complex 
program. 

Bernard J. Hughes 

Manager — Hexagon Systems 

P.O. Box 397, Station A 

Vancouver, BC 

Canada V6C2N2 

Dan Robinson Replies 

Mr. Hughes has an excellent program 
in Hexspell 2, and I tried to convey that 
fact when describing the program 's fea- 
tures in my review. Construction of the 
master word list and the spelling correc- 
tion procedures are perhaps more a 
matter of taste and style than efforts to- 
wards some fixed goal. 

Most of us wouldn 't use the half -mil- 
lion words in a large dictionary, even if 
we knew them all. Our working vocabu- 
laries will be limited and rather similar, 
with the addition ofprofessional words 
tucked away in an auxiliary file. 

Hexspell begins with a shorter word 
list and tailors that list to the words that 
the writer uses most often. Hexspell also 
supports an auxiliary list of the user's 
words, which brings the total dictionary 
to the neighborhood of 50,000 words. 
Hexspell requires more effort on the 
part of the writer when he first uses the 
program in order to have a word list 
closely suited to the writer's needs. It 's a 
fair exchange. 

The question of speed is more a mat- 
ter of how you produce documents. If 
all the writing is done as a batch and set 



aside for proofing, one document after 
another, and then printed as a batch, 
stand-alone programs won 't differ too 
greatly in speed. On the other hand, if 
you write the copy, check the spelling, 
and print it before going on to the next 
document, then a dictionary program 
integrated into the word processor is 
much faster — and more expensive. 

Word list selection and the correction 
process are a matter of choice. Hex- 
spell's other virtues, such as the ability 
to process numerical data and define 
foreign character sets, aren 't found in 
any other program. Hexspell is a good 
program, and for many will be the first 
choice. 

Dan Robinson 

1625 Higgins Way 

Pacifica, CA 94044 

More LP VII Articles 

I purchased a Line Printer VII from 
Radio Shack and am most pleased with 
it. I read the article you published about 
it in your April 1982 issue, but I'm still 
in the dark about its complete opera- 
tion. The manual supplied by Radio 
Shack is about as useful as most of their 
documentation. 

I would like to see more articles giv- 
ing practical applications and programs 
using the graphics mode to show its ca- 
pabilities to the fullest. 

Robert E. Wesley 

116 Court St. #7 

Pittsburgh, NY 12901 

Trick Fix 

Mike Keller's "Trick or TRS-80" (80 
Micro, October 1982) is perfect for our 
haunted house display this Halloween. I 
did encounter a problem, though; my 
operating system defaults to three files. 
This causes M2$ to occupy address 
32768, which results in an overflow er- 
ror. The solution: Specify less than 
three files. 

Further modifications to the pro- 
gram included running it once to pack 
the strings, and deleting the remark and 
data lines. I moved F$, Ml$, and M2$ 
to lines 90-92 and deleted the GOSUB 
at line 90 also. As long as the program is 
not saved in ASCII format, all is well, 
although listing the program can be 
confusing, and LLISTing it can drive 
your printer up the wall! 

I added line 145 to prevent the face 
from scrolling off the screen: 145 IFF< 
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3 exceptional books join the DATAMOST library. 




Here is a series of easy to read, easy to 
use, easy to understand books, which 
teach you how to write usable, useful 
programs on your computer. And you 
don't have to worry about irrelevant 
material which has no interest for you, 
because there are three specific volumes. 
One for the Apple,* one for the IBM-PC,* 
and one for the TRS-80.* 

In each of these books author Ed Faulk 
leads you through your favorite com- 
puter and takes the mystery out of writing 
programs for it. As you proceed, interest- 
ing chapter by interesting chapter, you'll 



'Apple is a trademark of Apple Computer. Inc.'IBM-PC is a trademark of IBM Corp. TRS-80 is a;trademark of Tarjdy Corp 
VISA MASTERCHARGE accepted. S2.00 shipping handlingxharge. (California residents add 6' >% saies tax.) 



wonder why you were ever intimidated 
by the thought of programming! 

If you want to get the very most out of 
your Apple, IBM-PC or TRS-80 then you 
really want HOWTO WRITE A PRO- 
GRAM. Before you're past Chapter 2 
you'll be programming. By the end of the 
book you'll be willing to tackle business 
programs, personal use programs and 
even games and adventures! $14.95 
Get your copy now. Available at computer 
and book stores, or: 

GDATAMOSTi (213)7091202 

^302 

9748 Cozycroft Ave.. Chatswortta, CA 9131 1 



Reston Publishing Company. Inc 
A Prentice-Hall Company 
Reston, Virginia 
Toll free (800) 336-0338 
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323THENF = 323ELSEIF F>349 
THENF = 349. 

Thanks to Mr. Keller for a neat and 
timely program. 

Bill Schreiber 

P.O. Box 1034 

Boone, NC 28607 



A Horror Story 

I ordered, from various suppliers, a 
Model III with 16K, an extra 32K of 
memory, a single Percom drive, and a 
Lynx modem. When I opened the com- 
puter I saw that I was not competent to 
install the drive and memory, so I put it 
back together and took it to a nearby 
Percom dealer. He installed the drive 
and the memory, and for a few weeks 
all was well. Then I began to have prob- 
lems booting disks; a technician told me 
that it was probably the ribbon cable 
that connects the drive controller to the 
CPU board. 

One night a thunderstorm struck; I 
had unplugged the power cords but 
didn't disconnect the telephone lines 
from the modem. The modem and the 
CPU were damaged. Emtrol Systems 
(the Lynx people), fixed the modem and 
didn't charge me a penny. 

I took the computer to the non-Radio 
Shack technician and waited three 
weeks for a new CPU board. The board 
was bad; I waited again for a new 
board. It too was bad, or my computer 
had a mysterious problem. The non-Ra- 
dio Shack technician was embarrassed 
to have had my computer for so long. If 
I had bought from Radio Shack, I could 
have had the damage fixed in a couple 
of days at the Computer Center. The 
resolution was satisfactory; they let me 
trade in my equipment for a new Model 
III with factory drives. So, for a few 
hundred dollars difference, I have a 
new machine and am rid of my head- 
ache. From now on Radio Shack will 
service my equipment. 

David Dalton 

3558 Bo wens Road 

Tobaccoville, NC 27050 

The Word Is Worth It 

The "Word Machine" review (Sep- 
tember 1982) is good for more than just 
"a few personal letters." My wife has 
done several papers using "The Word 
Machine" with a minimum of learning 
and no hassle. I have also used it and 



found it more than adequate. 

It is true that an under-$50 word pro- 
cessor will not compete head-to-head 
with the big boys, but it doesn't destroy 
the budget. Maybe writers don't need 
this inexpensive tool, but many of us 
find such a program affordable and 
usable. 

Kenneth Held 

19224 Castlebay Lane 

Northridge, CA 91326 

Video Genie 

I have a Video Genie, also known as 
the PMC-80, and which was subject to 
an article "What's a TRZ-80?" by Mr. 
Lindsay in your January 1982 issue. 

The Genie is much improved over the 
model described by Mr. Lindsay. I wish 
he had described the hardware mod to 
make large characters controllable from 
software (OUT 255,8 won't do it, and 
PRINT CHR$(23) leaves the size nor- 
mal but double-spaces). 

When you turn on the machine, it 
does not prompt Ready, but Ready?. 
The machine uses ports for cassettes 
and printer rather than memory latch- 
ing, and the external cassette is not at 
Port FE. Port FE selects the cassette 



drive, default is #1, but OUT 254,8 se- 
lects^ (via the DIN socket) and OUT 
254,0 selects #1, which is built into the 
machine. 

The current Genie has a 1.5K ROM 
(from 3000H up) that adds a lowercase 
driver, a flashing repeating cursor, 
screen print, renumberer, and a machine- 
code monitor. This is the same area of 
RAM utilized by the Aculab ROM (the 
British equivalent of the ESF) so I've in- 
stalled a switch to disable the internal 
ROM when I use the Aculab. There is 
also an internal amp and speaker for 
sound output via the cassette port. 

In 80 Micro, November 1981, "Cus- 
tomized Commands" by Mr. Rupert 
described a merge utility. I have con- 
verted this to a Basic routine that loads 
into System RAM unused by Model I 
non-disk machines and adds the com- 
mands, (see Program Listing 2). 

Save — to close off the current Basic 
program in memory and allow another 
Basic program to be entered or loaded 
from cassette. 

Merge — to append the last program 
to that previously saved. 

RSET— Warm Boot, to reset memo- 
ry size without initializing System 
RAM, useful if you wish to load a 



If CLS 

20 PRINT"To save the existing program in memory, enter 

•SAVE 1 ." 

30 PRINT"Then 'CLOAD' the next program you wish to append 

to" 

40 PRINT"the existing program. Ensure that the second 

program" 

50 PRINT"has line numbers GREATER than the first program." 

60 PRINT"The two programs are then joined by entering 

•MERGE'." 

70 PRINT"In addition 'RSET' will initiate the Memory 

Reserve process without initializing System RAM." 

80 PRINT 

90 PRINT"This routine does not occupy user RAM, but it is 

located" 

100 PRINT"between 16477 (405DH) and 16510 (407EH) in System 

RAM." 

110 POKE 16801, 93:POKE 16802,64: 'Initialize SAVE. 

120 POKE 16780, 112: POKE 16781,64: 'Initialize MERGE. 

130 POKE 167 95, 181: POKE 16796,0: 'Initialize RSET 

140 POKE 16509, PEEK(16548) :POKE 16510 , PEEK (16549) 

150 FOR 1= 16477 TO 16505: 'Load M.C. 

routine. 

160 READ X: POKE I,X: NEXTI 

170 PRINT: PRINT: INPUT"Ready to continue, if so press 

'NEWLINE'";X:NEW 

180 DATA 42,164,64,237,99,125,64,42,249,64,43,43,237,99,164 

190 DATA 64,195,114,0,42,125,64,237,99,164,64,195,114,0 

Program Listing 2 
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INCOME TAX OFFICES: 

MULTIPLY YOUR OUTPUT. 
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with laxPro 



TM 



THE PROFESSIONAL INCOME TAX SYSTEM. 



TAXPRO DOES MORE. 

Five years of successful use 
and system improvement 
has pushed TAXPRO far 
beyond Form 1040 and its 
supplemental schedules. This versatile system 
also totals W-2s, computes FICA overpayment, 
calculates tax alternatives . . . even prepares 
client billing. 

TAXPRO IS INTELLIGENT. It analyzes 
the client's tax picture, suggests the best 
route to go. Determines eligibility for special 
forms such as minimum/ 
maximum tax, income 
averaging, to name a few. 

TAXPRO IS EASY. 

Because it follows the tax 
forms line by line. Taxes 
are automatically figured, 
entered everywhere they 
apply. Change any entry, 
and all relevant data is 
automatically revised. 
Produces a printout that 
exactly fits 1040 and 




IRS-approved schedule forms. 

TAXPRO IS GUARANTEED. We stand 

behind TAXPRO completely. Full, no-charge 
support through the tax season. Inexpensive, 
yearly system updates. Over 5 million 
returns prepared with no reported errors. 

TAXPRO BUILDS PROFITS. The door is 
open to higher profits than you have ever 
enjoyed. Double, triple, or quadruple your 
output; pay for TAXPRO and the computer 
in one tax season. 
If you do income tax returns, you need 
TAXPRO, the truly 
professional, computerized 
income tax preparation 
system. 

Look into it today. 
Contract Services 
Associates, 
706 South Euclid, 
Anaheim, 
California 92802, 
[714] 635^055. 

45-PAGE DESCRIPTIVE 
SYSTEM MANUAL: $7.50 




CONTRACT SERVICES ASSOCIATES 
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Improving the bottom line. 
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machine-language program into high 
memory but forgot to reserve. 

John Megson 

25 North Road 

Bourne, Lines 

PEW 9AP 

England 

More Speed for Space Duel 

I have a modification for Dave 
Edick's "Space Duel" (80 Micro, Au- 
gust 1981). In the original game the ship 
moves too slowly. My modification in 
Program Listing 3 will speed it up. 

Uwe Scariot 

Maerkische Str. 90 

D-4600 Dortmund 1 

West Germany 

More Modifications 

Richard Straw's "JKL Minus 
Blanks" modification for NEWDOS + 
{80 Micro, September 1982, page 290) is 
a welcome addition. For those who 
have lowercase modifications in the 
Model I keyboard, the printer goes into 
a series of line feeds when it encounters 
the control code ASCII values used by 
video memory. This occurs because the 
ASCII values for the capital letters are 
shifted from 65-90 to 1-25. 

A few extra instructions in the PRNT 
sequence fix the problem by testing to 
see if the ASCII value in the A register is 
less than 27, then converting if it is. I 
added three lines to the program (see 
Program Listing 4). 

I also found that, changing the 
ORG in line 250 from FFDBH to 
FDCEH, I was able to use the 
ULCDVR lowercase driver that 
resides from FDDO to FFFF in my 



48K system. Otherwise, the two pro- 
grams occupy the same memory area. 

Stan Treitman 

150 Glen Road 

Wellesley Hills, MA 02181 

Almost Satisfied 

Let me express my satisfaction with 
your magazine and its contents. 

May I suggest more coverage for the 
professionals in the software field who 
are using TRS-80s as their develop- 
ment tool? 

C. W. Medlock 

Pro /Am Software 

220 Cardigan Road 

Centerville, OH 45459 



Scriplus Update 

The Scriplus review (80 Micro, Au- 
gust 1982, page 101) was fair, although 
slightly ancient. To bring you up to 
date, the program now works on all the 
current DOSes for the Model I or III. 
The same disk boots on either ma- 
chine, thanks to Kim Watt. 

It is also compatible with all Scripsit 
versions, and can convert the Model I 
version 1.0 for use on the Model III. A 
sideline effect is that Scripsit 's backup 
protection was removed for the user's 
convenience. 

The program has also been updated 
to include chaining, killing, and merg- 
ing of files from within Scriplus, as 
well as the alphabetized directory. A 
Pause command has been added to fa- 
cilitate inserting a name in a form let- 
ter, or changing print wheels. Scriplus 
now includes details for use on the 



92 CC+CC+1, PRINT@832,E$; 

100 IF PEEK(14400)=32 PO=PO-l 

110 IF PEEK (14400) =64 PO=PO+l 

123 IF PEEK(14337)=1 AND CC>2 THEN1000 
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360 
361 
362 
363 

370 



PRNT LD 
CP 
JR 
ADD 
CP 



A, (DE) 

27 

NC , PR2 

A r 64 

80H 



TEST FOR ALPHABETIC/LC MOD 

GO IF NOT 

CONVERT TO STANDARD ASCII 
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Daisy Wheel II and other Radio Shack 
printers. 

The Scriplus 3.0 disk is $39.95; all 
previous owners can upgrade their old- 
er versions for only $15, which includes 
the new, larger manual. 

Dennis A. Brent, President 

Breeze/QSD Inc. 

11500 Stemmons Freeway, Suite 125 

Dallas, TX 75229 

Patching Service 

Many thanks to Dan Robinson for 
the comparison of word processing 
products in the September issue. It 
must have been an exhaustive research 
effort. 

Due to a recently announced change 
in version numbering policy by Lazy 
Writer's author, we are now offering 
our enhancements to that program in 
the form of a patching service. This al- 
lows us to keep up with changes in 
Lazy Writer that might not be reflected 
in the version number. 

By applying our LZ Patches to a 
user's specific version, we will be able 
to avoid incompatibilities. The price 
for this service is $29.95 (the original 
price of LZ Patcher). We are equipped 
to patch version 1.9 and later. Anyone 
who wishes more information can call 
me at (505) 294-4966. 

Mike Keller 

Imaginuity Inc. 

13423 Desert Hills NE 

Albuquerque, NM 87111 

Talking Down 

I have enjoyed 80 Micro for several 
years, but especially Mr. Keynes' recent 
MONEY DOS articles. They have, 
however, an almost imperceptible Jeho- 
vah-like background air, and I get the 
feeling he is writing down to me. 

This was particularly true in the re- 
cent article on commodities trading in 
which he says, in essence, "This is a 
good program but you should see the 
one I'm using (but you can't, goody, 
goody)!" He even emphasizes this on 
his WATS line encyclical when he 
proudly announces his modification is 
"not available at any cost." His stature 
would have been much taller had he not 
even mentioned his personal, unavail- 
able, much superior modification. 

H. S. Banton Jr. 

Doctors Building 

Union Springs, AL 36089 
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IF YOUR PRINTER 




ON THIS LIST, 
NEWSCRIPT SHOULD Bl 
ON YOUR COMPUTER." 



NEWSCRIPT'S exclusive print processor 
gives you total printer control. 

NEWSCRIPT's exclusive print 
processor takes over where formatting 
leaves off with over 200 print processing 
and support features. NEWSCRIPT takes 
you beyond text formatting — beyond 
just printing text on paper. With NEW- 
SCRIPT's Print processor you take full 
advantage of your printer's hardware and 
software features, creating an unsurpas- 
sed printed image. Text editing (the part 
you see), is only part of the job, printing is 
the other part — the part others will see. 

NEWSCRIPT controls over 80 popular 
printers. 

You don't even have to know how 
your printer works — only what it can do. 
NEWSCRIPT will do the rest with such 
major features as underlining, right jus- 
tified proportional printing, top and 
bottom titles, top/bottom left-right-center 
page numbering, chaining and embedded 
printing of any length file with disk span- 
ning, fully formatted merging of form 
letters with selective editing, boldface, 
sub/super scripts, character substitution/ 
translation, table of contents, indexing, 



hanging indents, paragraph numbering, 
line numbering, double width characters, 
italics, hard and soft hyphens, in-memory 
spooling, and many other features.* 



NEWSCRIPT'S text editor has 
sophistication to match its print 
processing. 



Buffered key entry rates to 450 
characters per second — you never drop 
characters. Windowing to 240 characters, 
block move and copy within and between 
files, definable auto save, "HELP" and 
"WHOOPS" commands, repeat and query 
last command, search and replace within 
column and line limits as well as globally, 
and an automatic interface to the ELEC- 
TRIC WEBSTER spelling checker (sold 
separately). 

NEWSCRIPT'S 277 page manual 
contains an introductory tutorial with ex- 
planations of the beginner's most common 
needs, a "How to Section" to help when 
you're stuck, a fully alphabetized descrip- 
tion of the commands with literally hun- 
dreds of examples, a topical index with 
over 1,300 entries, and a handy quick- 
reference card (naturally!). 



Start getting the printed results 
only NEWSCRIPT can give you for 
$124.95. Requires TRS-80 Model I or HI 
with 48K and 1 disk (minimum — 2 rec- 
ommended) 




is available at computer stores, selected B. 
Dalton Book Sellers, and selected inde- 
pendent book dealers. If your dealer is out 
of stock order direct. Include $3.00 
(domestic), $6.00 (Canada) for shipping 
and handling. Foreign residents add 
$15.00 plus purchase price, in U.S. funds. 

TO ORDER, CALL NOW, TOLL-FREE: 

(800) 824-7888, Operator 422 

Calif: (800) 852-7777, Oper. 422 

Alaska/Hawaii: (800) 824-7919 

For technical information call: 

(213) 764-3131, or write us. „9l 




Dept. C, Box 560, No. Hollywood, CA 91603 



NEWSCRIPT companion programs (sold separately): MAILING LABELS $29.95, DAISY WHEEL PROPORTIONAL $49.95 
(not required for Daisy Wheel II), PENCIL & SCRIPSIT FILE CONVERSION $24.95, ELECTRIC WEBSTER (spelling checker 
and automatic correction) $149.50, GEAP (TRS-80 graphics — requires Epson MX-80) $49.95, DOTWRITER (Hi-res graphics — 
requires Epson MX-80/100 with Graftrax) $69.95, GEAP/DOTWRITER combination (requires Epson MX-80/100 with Graftrax) $99.95 

Dealers: NEWSCRIPT is distributed by IJG, Inc. (714) 946-5805 
*Some features work only if your printer has the mechanical capability. 

NEWSCRIPT trademark PR0S0FT registered U.S. Pat. Office TRS-80 registered trademark TANDY Corp. 







TRS80 Mode! I & III 

$19.95 Tape 

$22.95 Disk 
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All orders by VISA, Mastercard or 
check add $1 .50 shipping. Indiana 
residents please include 4% sales tax. a 



,". from' your local software dealer or order direct. 
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Tlie CpAsoft Group 



6008 Kl. Keystone Aye.,. Indianapolis, IN 46220 (31 7) 257-3227 



TRS rf£* is a registered tr 
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Bounceoids corfie'crasfiTflfJdown from spHW^ and 
rebound across the screen. Blast them or they will smash 
you. You have a shield but its lifespan is limited so use it 
sparingly. 

The commotion will attract alien natives with poison 
darts, off-world snakes and shaking bugs. Be on your 
guard. The longer you survive the harder it is to simply 
exist. Bounceoids start dropping from the sky in tiny 
clusters or with constantly changing outer dimensions. 

Bounceoids copyright 1982 by the Cornsoft Group 



Reach the exclusive chal|en(ge levef -and f ace the flying 
space flock in a tensefcbaUenge ofjSTrcfl Bg^, coordination 
and targeting skills. JoystWfafcRparole. 

$15.95 tape, $19.95 disc plus $1 .50 shipping and 
handling charges. MasterCard & Visa orders accepted. 
Available at your software dealer. 

The Cotfnsoft Group 

6008 N. Keystone Ave., Indianapolis, IN 46220 • (317) 257-3227 
TRS 80- is n registered trade mark of the Tandy Corporation 
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Become a "Crazy Painter" 

and create a masterpiece 

...if you can. 

A mischievous puppy, snakes and poisonous turpentine 
buckets force changes in your painting. In higher skill 
levels, "paint eaters" start chewing up your work. 
Suddenly, everyone's a critic. Can you overcome them? 



And on top of it all, in the Exclusive Challenge Mode, 
you have to catch an army of runaway puppies. Crazy 
Painter is Joystick compatible. 
$15.95 tape, $19.95 disc plus $1.50 shipping and 
handling charges. Indiana residents add 4% sales tax, 
Master Card or Visa orders accepted. Also available at 
your software dealer. 

The Coifisoft Group 

6008 N. Keystone Ave., Indianapolis. IN 46220 • (317) 257-3227 
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r>azy Painter copyright 1382 by The Cornsoft Group. 



TRS80* is a registered trademark of the Tandy Corporation. 
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Just in Time 

The article "Cheaper Upgrade" was 
just in time. 

I purchased a 16K RAM kit from an 
advertiser in 80 Micro; getting the Ex- 
tended Basic ROM was a little harder. I 
went to several Radio Shack Computer 
Stores while on vacation in Tampa and 
St. Petersburg, and locally in Lexing- 
ton, KY. They all said no to my pur- 
chase of a ROM chip. 

The local Radio Shack franchise, 
however, was more than happy to order 
it for me, and kept after the back order 
until it arrived V/z weeks later. I in- 
stalled it with the article's help and ev- 
erything worked fine. 

Steven Lewis 
15 13 A Maple Lane 
Corbin, KY 40701 

Fatal Error? 

What would you say if a friend asked 
you to wrap a bare wire around your 
wrist and then plug the other end into a 
wall outlet? I'm sure the answer 
wouldn't be printable here. 

Well, in the article "Cheaper Up- 
grade," author Richard Tucker sug- 
gests just that. Although he does specify 
the grounded side of the outlet, I would 
hate to think of the results from a poor- 
ly wired outlet or deteriorated wiring. A 
quick check with a ground fault indica- 
tor would help, but I think a smart move 
would be to clamp the wire to a water 
pipe. Other than that small (but possi- 
bly fatal) error I enjoyed the article. 

Michael Janke 

20620 Gulfstream Road 

Miami, FL 33189 

TRSDOS 1.3 Zaps 

I would like to provide the following 

zaps to TRSDOS 1.3 for the Model III. 

To provide a 30ms track stepping rate 



DRS RB Existing byte New byte 

OB 
OB 
IB 
OB 
OB 
OB 
IB 
5B 



Table I 



2 


9F 


OC 


3 


AE 


oc: 


3 


DC 


1C 


13 


9D 


oc: 


35 


30 


oc 


35 


63 


oc 


36 


49 


1C 


38 


6A 


58 



you must change the nine bytes listed 
below. Following Apparat's Superzap 
format, the disk relative sector (DRS) is 
in decimal and the relative byte (RB) of 
the sector is in hex (see Table 1). The 
zaps can be applied using Superzap or 
the debug facility of TRSDOS. 

While making zaps, you might want 
the error messages printed on the screen 
instead of the error code and then hav- 
ing to ask for the error message to be 
printed. All it takes is a one-byte zap. 
On DRS 304, RB 2C you will find the 



byte to be 20H. Zap this to 18H. 

If we do not want to input the date or 
time on power up, it will take a six-byte 
zap— three bytes for the date and three 
bytes for the time. On DRS 12, begin- 
ning at RB 70H, you will find 21 3B 51. 
Change this to C3 2E 4F. This takes 
care of the date. For the time, at DRS 
12, relative byte BA, you will find 21 54 
51. Zap this to C3 2E 4F. 

Tom Ash 

P.O. Box 584 

Oak Harbor, WA 98277 



You must vaporize the pests with and begin a relentless assault on 

your laser and pesticide bombs, your ship. AVENGER is joystick 

Pest control is a never-ending task compatible, 

in this space simulation. Be quick AVENGER is available for the TRS 



a wave of pests, the AVENGER 
appears and homes in on your 
PestiCraft. 

A random Vengence Encounter 
throws you into a world with droid- 
filled birds. You have to destroy 
them, but every time they burst, a 
myriad of droids are released 
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software dealer. MasterCard & Visa 
orders accepted. $19.95 tape, $1 .50 
shipping and handling charges. 

The Corfisoft Group 

6008 N. Keystone Avenue 
Indianapolis, IN 46220 (317) 257-3227 
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Hi j. Hi j. Bm. Su. 
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TRS 80* Color Computer is a registered trademark of the Tandy Corporation.;' 
AVENGER copyright 1982 The Cornsoft-Group 



• See List of Advertisers on Page 435 
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Thanks Mr. B. 

After reading my article "The 
Colorful Computer — Part II," Alex- 
ander Benenson kindly called an error 
to my attention. The Draw command 
could only produce a restricted number 
of angles (eight). The following is a 
short program suggested by Mr. 
Benenson to illustrate the further ca- 
pabilities of Draw. 

10 PMODE 3,1: PC1S : SCREEN 1,1 
20 DRAW "BM 128,96 M + 12, -16 
M + 12, + 16 L25" 
30 GOTO 30 

This draws an equilateral triangle 
near the center of the screen. Draw be- 
comes even more powerful than I real- 
ized. Mr. Benenson also suggested a 
technique I was not aware of. Instead 
of using DRAW "BM" + STR$ (X) 
+ "," +STR$(Y) + S$ where X and 
Y are the coordinates of the starting 
point, the following can be used in- 
stead: POKE 200, X : POKE 202,Y : 
DRAW S$. 

My thanks to Mr. Benenson. 

Franklyn D. Miller 
8871 Falmouth Drive 
Cincinnati, OH 45231 



Escape from the Maze 

Daniel Phillips wrote in the May In- 
put column that he couldn't get out of 
Roy Green's "SuperMaze" (80 Micro, 
March 1982, p. 148). I had the same 
problem until I changed line 960 as 
follows: 960 IF X = A(101) AND D = 2 
THEN 1100. 

Roger Bury 

Box 1404 

Ukiah, CA 95482 



Wiping Up Halloween 

After typing and editing Mike 
Keller's "Trick or TRS-80" program 
(80 Micro, October 1982) I found that 
moving the face toward the left of the 
screen leaves a trail of blanks from the 
lower right corner of the mouth. Not 
wanting my ghoul to drool, I began to 
search for the demon that haunted my 
program. A thorough examination of 
the program solved the mystery. 

To cure Jack's salivations, add one 
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additional asterisk to line 470, and 
change the following lines to read: 

490 FOR X = START TO START + 217: 
READ CHAR: POKE X, CHAR: NEXT X 
760 MIS = RIGHTS (F$, 62) 

Phillip C. Funderburk 

513 Longleaf Road 

Summerville, SC 29483 

Missing Delete 

I forgot to include the delete func- 
tion when I wrote my Do-It-Yourself 
Data Base. I wish I could say it hap- 
pened in the 80 Micro editorial offices 
but it evidently slipped into the bit 
bucket under my own desk. My apol- 
ogies to all — especially to those who 
wrote to me asking "Where is it?" 

Insert lines 5000-5030 into the 
program. 

5000 INPUT "ENTER RECORD 
NUMBER TO BE DELETED.";SN 
5010 IF SN = -1 THEN RETURN 
5020 DA(SN,0) = "D" 
5030 GOTO 5000 

Operation consists of entering the 
record number to be deleted each time 
the prompt appears. The record 
number to be deleted comes from a 
print of the records. When all records 
have been deleted, enter -1 to return to 
the menu. 

Karl L. Townsend 

103 Knoll wood Drive 

Lansdale, PA 19446 

16K Screen Veil 

Mike Keller's "Screen Veil" program 
(80 Micro, September 1982, p. 286), 



written for a Model I, states, "The 
NEWDOS80 calls are compatible with 
the Model III." This is true, except 
for one call; line 00141 of his listing 
should read: 

447B 00141 INSERT EQU 447BH; 

instead of: 

4410 00141 INSERT EQU 4410H; 

Also change the ORG address in line 
121 to FB00H (64256). This makes the 
entire routine usable by 16K machines. 

David Rinaman 

P.O. Box 7127 

Buena Park, CA 90620 

Graf trax Fix 

As an Epson MX-80 owner, I was ex- 
cited about Thomas McNamee's 
"Graftrax 80" (80 Micro, September 
1982, p. 190). After entering the pro- 
gram listings, certain bugs appeared 
that can be traced to the way the Model 
I and Model III handle certain print 
codes. I have no doubt that the program 
works just fine on a Model III, but the 
following revisions should be made to 
Program Listing 1 to correct for the 
Model I hanging up on LPRINT 
CHR$(0), CHR$(10), CHR$(11), and 
CHR$(12): 

530 LPRINT CHR$(125);" ";CHR$(27) 
"L";:POKE 14312,CC:LPRINTCHR$(8); 
540 FORT = lTOCC: IFG(T) = OR 
G(T) = 10 OR G(T) = 11 OR G(T) = 12 
THEN POKE 143 12,G(T) ELSE LPRINT 
CHR$(G(T));: NEXT 

Program Listing 2 should also be 
modified as follows: 

50 LPRINTCHR$(27)"K"CHR$(L);: 

LPRINTCHR$(8); 

80 1FA = OORA=100RA = 110RA = 12 

THEN POKE14312.A ELSE LPRINT 

CHR$(A); 

These changes correct the hang-up 
problem. 

For those with disk drives who don't 
like to type endless lines of data state- 
ments, sending the array G(T) to an ap- 
propriate sequential access file (OPEN 
4t O",l, "DATA/DAT": PRINT 
#1, CC - 1: FOR T=l TO CC: 
PRINT#1,G(T): NEXT T : CLOSE) 
permits the use of the data directly in 



and Save. 



Unprecedented Sale for Model III Owners. Call for Details. 



The Trouble with TRS-DOS. 

Although TRS-DOS is an excellent operating system, it 
has one major disadvantage. When compared with CP/M, 
TRS-DOS locks you into a limited and possibly dead-end 
course. When you are ready to upgrade to a new computer, 
it is likely that none of your present software will run on 
the new machine. All of the time and money you have 
invested in TRS-DOS software will be lost. 

CP/M for the TRS-80. 

Converting to CP/M offers the TRS-80 owner many advan- 
tages. The TRS-80 immediately becomes capable of run- 
ning twice the software of any other computer on the 
market. Perhaps more importantly. CP/M permits soft- 
ware portability. Unlike TkS- DOS programs, CP/M pro- 
grams can be directly transferred to your next computer. 
The savings in time and software costs can be Quite sig- 
nificant. CP/M conversion can easily pay for itself with the 
money saved on one or two software purchases. The sooner 
you convert to CP/M. the more you stand to save. 

CP/M Acquires Unprecedented Support. 

Over the past year, a number of powerful competitors 
have introduced new microcomputers. Most people will 
instantly recognize the names of Xerox, IBM, Hewlett- 
Packard. Digital Equipment and Zenith. The Japanese 
companies, Sony. NEC. Sanyo, Toshiba and Sharp, are 
equally well-known. Together, these companies have com- 
mitted over a billion dollars to compete effectively in the 
micro market. TRS-80 owners should be aware that every 
one of these companies has chosen CP'M for their stan- 



Plan Ahead. 

The Omikron "Mapper" offers the ideal step to upgrading 
to a newer, more powerful computer. With the "Mapper, 
your TRS-80 can run both CP/M programs and TRS-DOS. 
With CP/M, you can build a software library that's fully 
compatible with the newest CP/M business computers. 
All of the time and money you spend on selecting, pur- 
chasing, and learning CP/M software can be considered 
an investment in the future. In addition, your old TRS-80 
can gain a new lease on life as a fully compatible back-up 
unit. Consider all these points carefully. The Omikron 
"Works" package offers the best solution for protecting 
your investment in the TRS-80. By choosing the "Works? 
you can purchase a "Mapper" and also receive over $1,000 
worth of top-quality CP/M software. Value, Utility, per- 
formance — Omikron offers you more than ever before. 



COUGAR . . . OmiVron's Users Group. 

CP/M has always been the standard for business and pro- 
fessional use. This market has always demanded high 
quality and high performance. The high prices for CP/M 
programs reflect the additional effort required to develop 
top-quality software products. To help our customers afford 
CP/M software, Omikron has formed Cougar, our official 
users group. Through Cougar, Omikron can purchase 
software products in large volume. This allows us to offer 
our customers some of the best CP/M software in the 
industry at greatly reduced prices. 



dard operating system. Over the next few years, these A«.2L-^« a„#. it All ■k»„«»l«,« 
companies will sell millions of CP/M computers. Consid- vnHKron fUTS If All together. 



iput 
ering these facts, it is clear that CP/M is the operating 
system of the future. 

Apple and Commodore Offer CP/M. 

In a recent press conference, the Apple Computer 
Company stated, "The largest installed base CP/M system 
in the world today is the Apple II with the Z80 card from 
Microsoft'.' In a recent full page ad in the Wall Street 
Journal, Apple announced CP/M for the Apple III. 
Commodore, refusing to be left behind, has recently 
announced their "Emulator" series of computers that sup- 
port CP/M. There are even rumors that the new Tandy 16 
will support a version of CP/M. 



Omikron has sold more CP/M conversions than all of our 
competitors combined. Omikron was the first in the mar- 
ket with a CP/M conversion. Omikron has continued to 
lead the market for one simple reason — our total commit- 
ment to our customers. Only Omikron offers a "Works" 
type introductory package. Only Omikron has a "Cougar" 
type users group for long-term savings. Our hardware has 
always been designed with reliability first. Our software 
is well designed, complete, and bug free. Our technical 
hot line assists those with problems. Finally, our exchange 
policy has enabled our customers to upgrade to our new 
designs for much less than the cost to new customers. 
When you buy from Omikron, you buy from a company 
with a proven record of dedication and success. 



OMIKRON 



Products that set Precedents 

1127 Hearst Street, Berkeley, CA 94702 (415) 845-8013 



TRS-80™ Radio Shack/Tandy Corporation 



•so Wordstar™ Micro Pro 



CBASICII, CP/M™ Digital Research 
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FED UP WITH GAMES YOU'VE MASTERED? 
FRUSTRATED BY $20 - $40 GAME PRICES? 

MICRO-TRADERS GIVES 50% TRADE-IN CREDIT 
ON GAMES PURCHASED FROM US 



CHOICE OF OVER 40 POPULAR 
GAME DISKS FOR MODEL I AND III 



LOW ANNUAL MEMBERSHIP FEE 



TYPICAL BARGAINS 



OUR PRICE CREDIT 



FIRST DISK 5-15% 
OFF LIST PRICE 



GUARANTEED BUY-BACK PLAN" 



SUBSEQUENT GAMES UP TO 
75% OFF LIST PRICE 



NO MINIMUM PURCHASE 



NEW TITLES ADDED MONTHLY 



ALIEN DEFENSE (SSM) 
ARMORED PATROL J (Al) 
CATERPILLAR (SSM) 
DEFIANCE J (FANTASTIC) 
DUNZHIN (MED) 
ELIMINATOR J (Al) 
PANIK J (FANTASTIC) 
REAR GUARD J (Al) 
SCARFMAN J (CORNSOFT) 
SEA DRAGON J (Al) 
SKY SWEEP (SSM) 
STAR FIGHTER (Al) 



"SORRY, NO TAPES. 

J - JOYSTICK COMPATIBLE 



$18 
22 
18 
22 
26 
22 
22 
22 
18 
22 
18 
26 



$ 9 
1 1 

9 
1 1 
13 
1 1 
1 1 
1 1 

9 
1 1 

9 
13 



• ARCADE, ADVENTURE AND 
SIMULATION GAMES 

•we will buy back any as new GAME FOR 

50% CREDIT WITHIN LIMITED TIME PERIOD AND. 
FOR NOMINAL INSPECTION FEE 




DYES, I WANT MY FIRST GAME, PLUS MICRO-TRADERS MEMBERSHIP AT 
SPECIAL LOW PRICE OF $ 1 2 AND FREE CATALOG. 

GAME PRICE 

D CHECK D VISA/MC ACCT. NO. EXP.DATE _ 

SIGNATURE DMOD I DMOD III D32K D48K 



a 



I'D LIKE MORE INFORMATION, ENCLOSED IS $2 FOR CATALOG, APPLICABLE 
TO FIRST ORDER. 



NAME 



ADDRESS 



STATE 



CITY 



ZIP 



PHONE ( ). 



ADD $2.25 FOR SHIPPING 8c HANDLING. VA RESIDENTS ADD 4% SALES TAX. NO COD. 
PRICES SUBJECT TO CHANGE WITHOUT NOTICE. MEMBERSHIP FEE REFUNDABLE IF NOT 
FULLY SATISFIED. TRS-80 IS THE TRADEMARK OF THE TANDY CORPORATION. ^ 416 



another program without having to 
enter the data. Note that the first item 
in the file is the number of characters 
(CC-1) so appropriate DIM G(CC-l) 
statements can be made. 

Peter Chamalian 

Contest Software 

P.O. Box 1188 

Burlington, CT 06013 

Survey Fix 

I've made some corrections and im- 
provements to my "Survey" program 
(80 Micro, June/ July 1982). In the 
loader program LOADFILE/BAS, 
page 252, change line 170 to 170 IF EOF 
(1) THEN N = 1 : GOTO 210. 

In lines 230, 290, and 470, change the 
variable N to (N-l). Be sure to include 
the extra set of parentheses. Finally, in- 
sert the line 415 IF F = 1 then 430. These 
changes correct the count for the 
numbers entered. 

In the main program "Survey" (page 
249), change line 460 to 460 
INPUT"(N)EXT, (S)TOP, OR 
(ENTER) TO PLACE CALL";A$. 
Add the following line to allow a grace- 
ful exit: 475 IF LEFT$(A$,1) = "S" 
THEN PUT #1,NN: CLOSE:END, and 
add 485 IF LEFT$(TN$(X),3) = " " 
THEN TN$(X) = RIGHT$(TN$(X),7) 
to allow seven-digit calls to be placed 
correctly. 

Rodger Wells 

1008 Kehoe Drive 

St. Charles, IL 60174 



^ 



MEMOREX 

FLEXIBLE DISCS 



WE WILL NOT BE UNDER- 
SOLD!! Call Free (800)235-4137 

for prices and information. Dealer 
inquiries invited and CO.D.'s 
accepted 

VISA 




PACIFIC 
EXCHANGES 

100 Foothill Blvd. 
San Luis Obispo, CA 
93401 In Cal. call 
(800)592-5935 or 
k (805)543-1037 

^207 
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SUPER PRICES 



COMPUTERS 





Complete MODEL III COMPUTER 

Model III with 48K memory. 2 disk 

drives, 370K storage, and ready to run with 

TRSDOS 1.3 and manual. 120 day Simutek warranty parts and 

labor. Compatible with all Radio Shack software 

Model III with 48K, 2 double sided 40 track disk drives with 750K 
storage. Comes with MULTIDOS and manual. 120 day Simutek war- 
ranty parts and labor. Compatible with Radio Shack software. Com- 
plete and ready to run 

MODEL III INTERNAL DISK DRIVE KITS 

If you can use a phillips screwdriver, you can easily install 
Simutek's Model III disk drives and controller in less than an hour. 
Absolutely NO SOLDERING. TRACE CUTTING OR TECHNICAL 
KNOWLEDGE REQUIRED! The J & M controller is the best on the 
market today. We've tried others and found J & M's the finest and 
easiest to install. We warranty the J & M controller for 120 days 
against defects in workmanship. 

ONE 40 TRACK TANOON DISK DRIVE WITH 185K STORAGE, and J 
& M controller. Radio Shack DOS, manual. No soldering or trace 

cutting required. Ready to install with instructions 

TWO 40 TRACK TANDON DISK DRIVES 370K STORAGE, with J & M 
controller Radio Shack DOS, manual. No soldering or trace cutting. 

Ready to install and run. Instructions 

TWO DOUBLE SIDED 40 TRACK DISK DRIVES with 750K storage 
and J & M controller MULTIDOS and manual and Model III DOS. No 
soldering or trace culling. Ready to install and run. Full instruc- 
tions 

MODEL III HARD DISK DRIVES 

FIVE MEGABYTE hard disk with LDOS disk operating system, all 

cables, connectors, ready to plug in 

TEN MEGABYTE Hard disk with LDOS. all cables, connectors ready 
lo plug in 



$1899.99 



S2195.99 



PRINTERS 



DAISY WHEEL PRINTERS: 

NEW SMITH CORONA DAISY WHEEL 12 CPS 

NEW BROTHER DAISY WHEEL 16 CPS 

TRACTOR FEED FOR BROTHER 

C-ITOH STARWRITER II F-10. 40 CPS 

C-ITOH STARWRITER III F-10 55CPS 

TRACTOR FEED FOR STARWRITERS 

HIGH QUALITY DOT MATRIX: 

C-ITOH PROWRITER I 8510A .2K BUFF. . .PRL. ONLY 

C-ITOH PROWRITER I 8510ACD...2K BUFF. SER/PRL 

C-ITOH PROWRITER II 1550.. .15 INCH. . .3K BUFFER 

EPSON MX-80WITH GRAFTRAX 

EPSON MX-80/FT WITH GRAFTRAX 

EPSON MX-100 

OKIDATA MICROLINE 80. (80 CPS) 

OKIOATA MICROLINE 82A (125 CPS) W/TRACTOR 

OKIDATA MICROLINE 83A (125 CPS) W/TRACTOR 

OKIOATA MICROLINE 84 (200 CPS) W/TRACTOR 

PRINTER CABLE FOR MOD I EXPANSION INTERFACE OR MODEL 
III (SPECIFY) 

PROWRITER RIBBONS 

EPSON MX-80OR FT RIBBONS 

OKIDATA RIBBONS...(80.82A.83A) 



CALL TOLL FREE to order: 

1-800-528-1149 ~ 

WE ACCEPT AMERICAN EXPRESS, VISA and MASTERCARD. NO 

SURCHARGE FOR CREDIT CARD ORDERS! 

SORRY, PERSONAL CHECKS REQUIRE 4-5 WEEKS TO CLEAR. 



$589.99 
$849.99 

$999.99 

$1799.99 
$1999.99 



$699.99 
$1199.95 

$250.00 
$1649.99 
$1999.99 

$250.00 

$499.99 
$649.99 
$799.99 
$479.99 
$549.99 
$799.99 
$369.99 
$499.99 
$749.99 
$1199.95 

$29.95 

$12.99 

$9.99 

$3.49 



FREE SHIPPING 



MODEL I DISK DRIVES 

ONE TEC DISK DRIVE 40 TRACK DISK DRIVE with 5ms track to 

track access time, with power supply chassis, extender cable and 

shipping for TRS-80. One year warranty on parts and labor. Ten day 

money back guarantee. 

Model I or III 

ONE TEAC 40 TRACK DISK DRIVE, 30 ms track lo track, with P/S 
and chassis, ready to run as drive 0-4. 10 day money guarantee. 
One year warranty 

ONE TANDON 40 TRACK DISK DRIVE. 5 ms track to track, with P/S 
and chassis, ready to run as drive 0-4 or Model III external. 10 day 

money back warranty 

ONE 2 DRIVE cable for Model I or III. (Specify) 

ONE 4 DRIVE cable for Model I only 



$279.00 

$279.00 

$279.00 
$25.00 
$35.00 



ACCESSORIES/ 
SOFTWARES 

16K MEMORY UPGRADE FOR MOD I, III OR COLOR 4K. 

UNCONDITIONALLY GUARANTEED FOR 2 YEARS 



DISK OPERATING SYSTEMS 

NEWDOS80VER.2 

LDOS 



DOSPLUS 

MULTIDOS. BEST BUY! SPECIFY DOUBLE OR SINGLE DENS 

DOUBLE DENSITY MOD I 

PERCOM DOUBLER II. (NEW LOW PRICE!) 

DISKETTE STORAGE 

SMOKED PLASTIC HOLDS 50 DISKETTES 

HARD BOX HOLD TEN 




MODEMS 

LYNX MODEM FOR MODI 

OR III 

OMNITERM SMART TERMINAL 
PROGRAM 



SUPER BOOKS FROM IJG 
MICROSOFT BASIC DECODED 

AND OTHER MYSTERIES 

TRS-80 DISK AND OTHER 

MYSTERIES 

BASIC FASTER AND BETTER AND OTHER MYSTERIES 

BASIC FASTER AND BETTER PROGRAMS ON DISKETTE 

CUSTOM TRS-80 AND OTHER MYSTERIES 

MONITORS 

OLD MOD I SCREEN STARTING TO GIVE YOU HEADACHES? TRY 
ONE OF THESE HIGH RESOLUTION MONITORS AT SUPER LOW 
PRICES... 

ZENITH GREEN SCREEN 12" 

BMC 12 INCH GREEN SCREEN 

BMC 13 INCH COLOR 

AMDEK 12" BLACK AND WHITE 

OCI AMBER SCREEN MONITOR 12" 

CABLE TO CONNECT MONITORS TO MODEL I COMPUTER 



. $15.95 

$139.95 

$129.95 

$139.99 

$79.95 

$139.99 

$21.95 
$3.99 



$239.95 
$99.99 

$29.95 

$22.50 
$29.95 
$19.95 
$29.95 



$139.95 
$109.95 
$299.99 

$97.50 
$189.95 

$14.95 



C.O.D.S S5.00 EXTRA. NO C.O.D.S FOR MODEL III COMPUTERS OR PAR- 
CELS THAT CANNOT BE SHIPPED UNITED PARCEL SERVICE. ALL C.O.D.S 
REQUIRE CASH OR CERTIFIED CHECK AT TIME OF COLLECTION. 
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SIMUTEK 



Computer Products Inc. 

4897 E. SPEEDWAY BLVD., TUCSON, AZ S5712, (602) 323-9391 



AID 



Computer Credit Unions 

Our company is considering buying 
hardware and software for an off-line 
microcomputer to supplement our on- 
line mini. We want to use the micro for 
spreadsheets, word processing, and 
data-base management. 

Does anyone know of any credit 
union software available for TRS-80s? 
We would like a spreadsheet already set 
up with the proper income/expense 
categories that credit unions use; or ac- 
counting software set up for credit 
unions. 

Scott Daniels 

9 Joval St. 

East Lyme, CT 06333 

Smith-Corona and Scripsit 

I have a Model I and am thinking of 
buying the new Smith-Corona TP-1 
printer as the letter-quality output for 
my Scripsit system. I tried the printer 
on a similar system at the dealer and 
found that the line-spacing command 
(>LS = 2) did not work. The printer ig- 
nored the command and did not print 
the text double-spaced. I like the printer 
and would like to buy it. Does anyone 
know the cause and cure for this 
problem? 

K. Rallapalli 
3184 Linkfield Way 
San Jose, CA 95135 

Pen Pal Wanted 

I have a Model I Level II and am in- 
terested in voice synthesis. Has anyone 
found a way to synthesize speech with- 
out a voice synthesizer? If you know 
how to do this in Basic, please write. 

Is there anyone under 15 who would like 
a computer pen pal? I am 12 years old. 

James Waese 

644 Huron St. 

Toronto, Ont. 

Canada M5R 2R9 



Needs Patch 

We use Radio Shack's VisiCalc (Cat. 
#26-1566) on our Model I, Level II 48K 
with two Radio Shack 35-track disk 
drives and a keyboard modified for true 
lowercase operation. We have an Epson 
MX-80 printer (connected to the printer 




port on the Expansion Interface). Elec- 
tric Pencil runs perfectly. 

Much of our work requires column 
and row labels. Does anyone have a 
patch or program to allow upper and 
lowercase output to the printer and 
screen? We have NEWDOS80 and 
NEWDOS PLUS as well as TRSDOS. 

Jay Combe, Executive Director 

U.S. Association of House Inspectors 

126 Bala Ave. 

Bala Cynwyd, PA 19004 

Governmental GL 

I am in search of a governmental 
general-ledger program for our small 
city's three disk Model II. All available 
GL programs are business-oriented 
with sales, cost of sales, and so on. 

Governmental accounting deals with 
budget revenue, expense, cost centers, 
and nonrelated fund groups. I am reluc- 
tant to attempt to translate a business- 
oriented program to this governmental 
requirement; I might end up with an 
unusable product. 

Is there anyone who can help me with 
this problem? 

M. M. Gantar 

Village of Golf 

Golf Road 

Palm Beach County, FL 33436 

Orchestrating Language 

I have a Model I and an Orchestra-80 
board. Does anyone know how to use 
this board directly with Assembly 
language? 

Mark Hickenbottom 

1165 Ricardo Court 

Seaside, CA 93955 



Study at Home 

I have a Model III with two disk 
drives and would like to find individual 
disk or cassette programs for my chil- 



dren to practice math by grade levels for 
home use (grades 5-12 not inclusive). 

Does anyone know where I can find 
this kind of software? 

Frederick P. Hoffman 

287 Ball Road 

Grass Valley, CA 95945 

LEX 11 Schematic 

I purchased a LEX 1 1 modem, made 
by the Lexicon Corp., Miami, FL. I 
wrote to Lexicon requesting a sche- 
matic, which was rejected. The reason 
for the rejection, they just don't supply 
any information. 

I can understand not supplying sche- 
matics while in warranty, but the unit is 
out of warranty and requires modifica- 
tions I cannot make without a 
schematic. 

Can anyone help me find a 
schematic? 

Francis A. Stengel Jr. 

349 Stony Road 

Lancaster, NY 14086 

Network Aid 

We have just installed two Network 3 
systems with 18 Model Ills, and are 
interested in compiling a list and com- 
municating with other educators using 
the Network 3. 

We would also like to know if there is 
a Pascal compiler capable of working 
with this configuration. As usual, not 
enough information is available on 
NBasic, which is part of the system. 
Any information on NBasic would be 
appreciated. 

LeRoy Price 

Benton Community School 

Van Home, IA 52346 

Needs a Password 

I would like to get a copy of the 1793 
Floppy Disk Controller Manual (about 
the 1793 FDC in the Model III) by 
Western Digital. 

Also, what is Basic's password in 
TRSDOS 1 .2 or 1 .3 for the Model III? I 
would like to write programs that in- 
teract with Basic, but need to disassem- 
ble it first. 

V.S. Gavande 

3005 W. Terrace 

Austin, TX 78731 
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** 3 in '83! "\ 

d to celebrate we've published a special 
ANNIVERSARY ISSUE, 



containing 

all new articles & programs. 

over 500 pages of the same high 80 MICRO quality. 

dozens of games and programs for your computer. 

exclusive articles by well-known authors. 

the most in-depth coverage of the Color Computer yet. 

tutorials on having peripherals and software. 

page after page of specials from 80's advertisers. 

a 3-year 80 MICRO index — annotated and cross-referenced 

PLUS 



THE FIRST 3D 

STEREOSCOPIC COLOR 

COMPUTER GRAPHIC 



That's 

That number again 

That's 



This amazingly versatile Anniversary Issue can go anywhere* with 
you. Fits easily in your briefcase or your purse. Lies flat in your 
knapsack. Rolls up to fit snugly in your glove compartment. Stores 
on any bookshelf. Looks great on any coffee table. 

You can also get the amazing Special Edition LOAD 80 Companion to 
the Anniversary Issue. All those games and programs, just waiting for 
you to load. No more keyboarding. No more debugging. No more 
hassles. 

You'd expect special editions of this quality to cost you hundreds of 
dollars. (Well, maybe dozens.) But for a limited time only, you can get 
the 80 MICRO ANNIVERSARY ISSUE for only $5.95. That's 
right- $5. 95. And the LOAD 80 Companion is just $9.95 for cassette 
$19.95 for floppy disk. 

Note: This is an extra issue and will not be included as part of your 
regular subscription. So call today and order your very own 
Anniversary Issue and LOAD 80 Companion. Or give them as gifts. 
Just fill in the attached reply cards and drop them in the mail. Or call 
toll free— 1-800-258-5473. 








Operators are standing by (during business hours, of course). 
MasterCard and Visa accepted. (American Express, too.) 

Please allow 6-8 weeks for delivery. 

* Use of this product in the shower is not recommended by the publisher. 
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he Evolution of Low-Cost 
Electronic Communications 

We believe AceMail is 
probably the most powerful, auto- 
mated two-way message system a\ 
able for anywhere near the price. But don't 
let the price fool you. 

The Automated Computer Electronic Mai 
software offers some unprecedented clout in com- 
munications across the phone lines. From a complet« 
unattended TRS-80, AceMail can look up a phone numb 
dial it, log/on to the system, upload and download ASCII 
log/off and wait until later to call another computer. You may also 
call AceMail from a remote location and exchange information. 

A world of information is at your fingertips as AceMail offers speed and account- 
ability in accessing branch office correspondence, sales reports, data banks and tih. 
sharing systems nationwide. 
^B The multifunctional system is easy to use and comes with a complete users manual allowing even 

the inexperienced user to send and receive electronic mail in minutes! 

If your TRS-80 is due to evolve in the world of electronic mail, then choose the communications 
system with ease and power— AceMail. 

Written exclusively for the Hayes Stack Smartmodems and the TRS-80 Model l/lll 48K with disk. 

rvlail operates on NEWDOS/80 or DOSPLUS and comes supplied on liny' DOSPLUS ready to run. 
Hayes Stack Smartmodem 1200-$619.00 
Hayes Stack Smartmodem 300-$239.00 
ACEMAIL 1200 Software-$1 19.00 
ACEMAIL 300 Software-$79.00 

*••!» ace computer products of florida, inc. „*, 

1640 n.w. 3rd street, deerfield beach, florida 33441 voice (305) 427-1257 data (305) 427-6300 

ORDER TOLL FREE 1-800-327-2283 



COMMANDER 



by Jake Commander 



(Jake Commander, 80 Micro's 
technical consultant, is visiting his 
native England after a two and one half 
year absence.) 

When the TRS-80 Color Computer 
hit the U.S. market in 1980, you could 
buy it for less than $400. Not so when 
it hit the British market. Those curi- 
ous chieftains at Tandy UK decided to 
foist it on a destitute populace for 
£439— about $750. 

But, Tandy doesn't have the market 
to itself any longer. There's a toy firm 
called Mettoy based in Wales, see. And 
this clever entrepreneur named Richard 
Wadman convinced them to look at the 
possibility of manufacturing a 6809- 
based computer. They looked. They 
liked. 

Mr. Wadman was not a dullard. He 
knew that the 6809, being a Motorola 
chip, would be in its element in a setup 
involving other Motorola chips, such as 
a color video display generator. And 
wouldn't it work oh so well with a 
Motorola synchronous address multi- 
plexer? 

Mr. Wadman didn't stop there, 
either. How about having Microsoft 
take care of the extended Basic in 
ROM? No problem. How about mak- 
ing the cartridge pinout the same as the 
TRS-80 color machine? Of course. 
How about 32K as standard? Naturally. 
And a real keyboard? And plenty of 
software? And a parallel printer out- 
put? And a price of £200 (about $360)? 
Bye-bye Tandy Color Computer. 

The name of this little giant killer of a 
color computer might strike fear into 
the hearts of many executives in Texas. 
It is called The Dragon, which is the na- 
tional symbol of Wales, where 1 ,500 of 
these beasts are cranked out every week. 

Come on, computer experts. You 
should see a pattern emerging here. The 
situation is remarkably similar to one 
that existed a few years ago. 

In 1976, you could go to a Radio 
Shack store in the United States and buy 
a wonderful new gadget called a 4K 
Model I Level I TRS-80 for $400. You 
could get away with an el cheapo 
cassette recorder for storage, and it 
wasn't too difficult to get an electronics 
nut to convert the portable TV to a TV/ 
monitor. Up and running for $400 — 
not a bad deal. I'm convinced that 
Radio Shack owes its success with the 
TRS-80 to this relatively painless way of 
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A dragon 

threatens 

Tandy 



getting hooked into microcomputing. 

Meanwhile, what was happening on 
the other side of the pond, back in the 
United Kingdom? Not a lot. While 
America was devouring all it could get, 
Tandy UK was preparing for its part in 
the TRS-80 success story. Unfortunate- 
ly, it seems that Tandy UK management 
wasn't using its brains. 

Instead of giving the less affluent 
British people a chance to buy a micro 
for .£200 (the exchange rate at that 
time), Tandy hit Joe Public smack in 
the face with a bill for about £500. 

Importing that American technology 
must have been costing Tandy UK a lot 
of money. Or, more likely, Tandy UK 
was making a fortune. 

In the UK, the system came complete 
with a Tandy monitor and a Tandy 
cassette recorder whether you liked it or 
not. Just to rub it in, the cassette 
recorder was the type that left magnetic 
glitches on your program or data when- 
ever you stopped it with the remote 
on/off. 

Good deal, eh what? Commodore 
proceeded to wipe the floor with Tandy, 
and that blasted PET machine became a 



dominant force in a large part of 
Europe. 

Tandy should have learned from the 
experience, but it didn't. Here comes 
the TRS-80 Color Computer (a year 
late), and I'm already getting a sense of 
deja vu. As the PET did a few years 
ago, The Dragon could also leave the 
Tandy management with its mouth 
hanging open. 

I'm not saying Tandy UK will have 
its nose rubbed in it yet again. I don't 
have to, do I? It's going to happen 
whether I say it or not. Tandy is already 
doing the usual things — dropping the 
price and introducing a more aggressive 
marketing campaign. Tandy will no 
doubt rip The Dragon to pieces, accuse 
Mr. Wadman of stealing their design, 
and try to sue him. 

I've met Mr. Wadman, and, as I've 
said, he's no idiot. He used the 
Motorola setup as used in the TRS-80 
Color Computer, designed his own in- 
put/output circuitry, and placed it in his 
own box with 32K and a high-quality 
keyboard. The Dragon will withstand 
any scrutiny Tandy cares to give it. 
Sorry boys, you'll have to try harder. 

Just in case the boys at Fort Worth 
are feeling sorry for their British 
counterparts, I can gleefully tell them 
that The Dragon will be in America at 
the start of 1983. I've been told the 
target price is $350 for the U.S. market. 
Mr. Wadman wouldn't divulge where it 
will be sold, but he said it will be in a big 
chain store that "has a big catalog." 

The Dragon is likely to scorch some 
profits at Tandy, whether UK or 
stateside. I can't wait to watch the 
feathers fly. (See related story on page 
370.) 

Escaping Depression 

Gloom. Gloom and despondency 
seem to be the operative words here. 
More than 3 million people unemployed 
in a nation of 55 million. Unemploy- 
ment continues to climb. 

From the gathering gray clouds 
overhead to the dwindling gray crowds 
at the pub, there's a gloomy acceptance 
of the whole situation. Statistics from 
major breweries show that people aren't 
buying as many drinks as they used to. 
If the British are staying away from the 
pubs, something has to be exceptionally 
wrong. 

However, microcomputing seems to 
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TRS-80® 
MOD. Ill 



FINALLY 



TRS-80® 
MOD. I 



80x24 VIDEO DISPLAY 
PLUS! 112 K AND CP/M® 



Others offer you CP/M or 80x24. 
We give you what you've been 
waiting for. 




SPRINTER™ 

"Double Your Speed" 

Speed-uR cuts computer operation time for 
accounting, word processing, etc., in half. 
Saves Time and Money. 

• Automatic Slow-down for disk I/O 
(defeatable). 

SPRINTER III (MOD. Ill) $99.50 

SPRINTER I (MOD. I) $99.50 

"DOUBLE DENSITY ADAPTER $129.50" 

• Run 5'/4 or 8" drives 

• Adapter utilizes new technology for high 
performance at a lower price. 

"MODEL III Disk Controller" 

• Double density with full features 8" drive 
capacity. Board only (DX-3D) $189.95 

SPECIAL!!! 

HOLMES EXPANSION 

INTERFACE SYSTEM (Mod. I) $399.00 

• Includes: Double Density Disc Controller 
(DX-2D), RS232 w/32K RAM (RX-232M), 
Metal enclosure (MF-1). 

The Holmes System surpasses other interfaces 

in quality and technology. 

"Model I and III controllers and double 

density adapter include state-of-the-art LSI Data 

Separators which require NO adjustments and 

do not "drift" out ot alignment. 

Double Density Disk Controller 

w/8" drive capacity (DX-2D) $189.95 

RS232 (RX-232) $119.50 

RS232 w/32K 

(RX-232M) $199.50 

Case/power supply — tor 

4 plug-in boards (MF-1) $99.50 

Case — for 

2 plug-in boards (MF-2) t 



VID 80™ 

"80 Character Video" 

• Adds all the extra ram and logic necessary to 
convert to an 80 character, 64K or 112K 
CP/M system. 

• Functions in 80x24 or 64x16 character mode. 

• Contains same video controller as IBM 
personal computer and TRS-80 Model II. 

• Software patches available for many 
programs. t 

• Reverse video (full screen). 

• Improved graphic resolution. 

• Easy plug-in installation inside case. 

• Two models available: 
Model III (VX-3) and 
Model I (VX-1) 

• CP/M system requires purchase of Holmes 
CP/M package. 

• VX-1 requires upgraded monitor for 80x24. 

• VX-1 requires purchase of MF-1 or MF-2. 

VID 80 (VX-3,VX-1) $279.95 

VID 80 plus 64KCP/M 

(Holmes package) $399.00 

VID 80, Holmes CP/M package 

and 64K added memory 

(112K total) $499.00 

"48K MEMORY 
WITHOUT AN INTERFACE" 

• Adds memory INSIDE keyboard up to 48K 

IM-2w/16K (32K total) $119.50 

IM-2 w/32K (48K total) $139.50 

tCall or write for price 




engineering inc. 

Peripherals Division 
3555 South 3200 West 
Salt Lake City, Utah 84119 
(801) 967-2324 
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DISTRIBUTORS: 

Bi-Tech, 

Bohemia. NY (516) 567-8155 
Level IV Products, 

Livonia, Ml (800) 521-3305 
M & M Micro Mart, 

Montreal. Canada (514) 731-9486 

DEALERS: 

Laguna Hills, CA (714) 779-0467 
Oceanside, CA (714) 757-4849 
Oceanside, CA (714) 749-0299 
Pasadena, CA (213) 681-6797 
San Diego, CA (714) 275-4243 
Ventura, CA (805) 499-2619 
Aurora, CO (303) 693-8400 
Denver, CO (303) 741-1778 
Dearfield Beach, FL (305) 427-1257 
Titusville, FL (305) 267-6414 
Dunwoody, CA (404) 396-0034 
Chicago, IL (312) 782-9750 
Ceneseo, IL (309) 944-4111 
Indianapolis, IN (317) 898-0331 
Pittsburg, KS (316) 231-3670 
Shawnee, KS (913) 631-2029 
Bremen, KY (502) 754-5313 



Framingham, MA (617) 872-9090 
Medway, MA (617) 533-8433 
Roslindale, MA (617) 327-6831 
Detroit, Ml (313) 538-1112 
Carden City, Ml (800) 521-6504 
Lansing, Ml (517) 482-8270 
Midland, Ml (517) 631-3090 
Pontiac, Ml (313) 673-2224 
Plymouth, Ml (313) 397-3126 
Columbia, MO (314) 474-6064 
Columbia. MO (314) 449-5346 
St. Louis. MO (314) 962-1638 
Fort Benton, MT (406) 622-5651 
Wycoff, N| (201) 891-6380 
Albuquerque, NM (505) 256-9708 
Yaphank, NY (516) 924-9229 
Cleveland, OH (216) 579-0648 
Euclid, OH (216) 951-6502 
Lancaster, OH (614) 653-1329 
St. Paris, OH (513) 663-4558 
Eugene, OR (503) 484-2834 
Phoenixville, PA (215) 933-3441 
Dallas, TX (214) 339-5104 
Houston, TX (713) 455-3276 
Houston, TX (713) 444-5405 



San Antonio. TX (512) 349-9741 
Portsmouth, VA (804) 484-6636 
Portsmouth, VA (804) 397-9636 
Wytheville, VA (703) 228-5800 
Bellevue. WA (206) 747-3495 
Lynnwood, WA (206) 775-6944 

FOREIGN DEALERS: 

Laval, Canada, (514) 387-2609 
Victoria, B.C., Canada 382-1344 
Laurie Shield Software. 

Wingerworth. England 
Luxulyan, Bodmin, England (0726) 850821 
Victor Saleh, 

Wembley. England 
Craphie France, 

Paris, France 
Consultora Pscio Industrial, 

Guatemala 
Asp Microcomputers, 

East Malvern, Australia 
Computerware, 

Koeln, West Germany 
Computer Service, 

Buerstadt, West Germany 
Scotland (041) 883-1189 



TRS-80 is a registered trademark of Tandy Corporation. CP/M is a registered trademark of Digital Research. 



One year warranty on all products. Add Shipping/Handling — MF-1, MF-2, $9.00 U.S., $15.00 Canada, 
Overseas $30.00. Other products add $5.00 U.S. & Canada. All others add 15%. Prices subject to change 
without notice. DEALER INQUIRIES INVITED. FOR INFORMATION SEND SELF ADDRESSED STAMPED 
ENVELOPE. Reader service takes 8 weeks. 



COMMANDER BO 



be alive and well. Software sales in a 
couple of stores in Birmingham have in- 
creased an unbelievable 1,000 percent 
over last year, with hardware sales trail- 
ing miserably at 500 percent. 

Not only are microcomputers doing 
well, but the video industry's growth 
has been exponential since I was last 
here. (The two industries aren't as 
unrelated as you might think— they 
both involve the sale of hardware and 
software.) Every other hardware store is 
running its own video library, causing 
fierce competition on High Street with 
many overzealous traders going broke. 
But, all in all, the video business has 
blossomed, and a video recorder is 
almost as common a household item as 
a color TV. 

Why are these two industries growing 
so rapidly amidst all the financial depres- 
sion? Well, I've formed a little theory. 

We might be going back to the caves 
— in a high tech way, of course. Back to 
the three-bedroomed, semi-detached 
suburban retreat equipped with TV, 
video equipment, and, in a healthy 
number of cases, a microcomputer. 

After all, who wants to brave the 
gloom when all this perfectly harmless 
technological escape exists? All you 
have to do is while away the hours in 
electronic wonderment and the cold 
harsh realities of a recession disappear 
into the English fog. Just keep up the 
mortgage on the cave and the escape re- 
mains secure. ■ 
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Data Acquisition 

and Control for the TRS-80* 

$230 ppd. 

The STAR8UCK-8882 is a complete eight channel 
data acquisition and control system plug 
compatible with the Model I Level n TRS-80 it 
includes 8 protected analog inputs (0-5 Vdc with 
8 ± 1 bit accuracy). 8 protected digital inputs 8 
optoisolated digital outputs and two joystick 
ports Interrupt-dnven software package allows 
simultaneous data acquisition and storage while 
using the TRS-80 lot any othe' purpose 1 
Application manual covers home security, energy 
monitoring, weather station use appliance 
control, graphics and games Price includes 
case, power supply, extra expansion card edge 
connector cable, complete software package and 
detailed applications manual Manuals only are 
available lor $5 00 ppd Model III version $250 
ppd To order write or call 

STARBUCK DATA CO. 

P0 Box 24. Newton MA 02162 

617-237-7695 ^205 

Massachusetts residents add 5% sales tax 'TRS-80 
is a trademark of Tandy Corp. 



MAILING LIST 
SYSTEM $119.95 

FOR TRS-80 (Tandy Trademark) Model I and III 



WHAT SETS OUR SYSTEM APART?... 

• Our system is configured specifically for large mailing lists 
(or small) on floppy disk drives. Some other major systems 
run on floppies but are really intended for use on hard disk 
drives. Such a system assumes that you have vast amounts of 
on line disk storage capacity. ..the continuity of the data is 
limited to what you can have on line at one time. To get the 
real benefit of such a system, one usually has to purchase 
expanded track/density floppy disk drives and even then the 
problem occurs when all the drives are filled with data. We 
have neatly solved this problem by allowing all your data 
disks to be maintained in continuous order. ..even though, 
due to the limitations of your drives, the list may be too large 
to all be "on line" at one time. Thus our system accomodates 
extremely large lists using your existing drives and yet avoids 
the "segmented" data problems of the hard disk approach. 

• While it is fashionable to advertise all-machine-code systems, 
our system is primarily written in BASIC. ..with embedded 
machine code for the speed sensitive areas. What this means 
is that our system is easy to modify, yet extremely fast. This 
is very important since many users like to have custom modi- 
fications made (either by them or us) so as to fit some unique 
requirement. Our manual has a section devoted exclusively 
to such modifications. ..Remember all-machine-code systems 
are extremely difficult to modify. 

• Continuity of the ordered data (even data spanning many 
disks) is not limited to a "session", but is permanent. 

• Optional "backing up" of your data as-you-go is an integral 
part of the system and is not restricted to the end of a session. 
This is true even for deletions. 

• The length of our data fields are more than adequate to 
accomodate even your longest names/addresses. 

• Adjusts to a 32K memory although full use is made of a 48K 
memory. ..Can be used with any DOS including TRSDOS. 

• The program disk does not have to stay on line, thus freeing 
more space for data storage. 

• Load and scroll through entire entries or selected fields. Edit 
as you scroll or go directly (takes about 2 sec.) to a specific 
entry and edit or delete. 

• Our automatic repeat feature allows often used names/ 
addresses to be entered with a single key stroke. 

• Each disk entry optionally "remembers" how many mailings 
have been made for that particular entry ...Can be tied in with 
purge/select. 

• Continuing expert support just a phone call away. You will be 
able to discuss your problems/modifications with the authors. 

• Money back guarantee if not fully satisfied. 

ADDITIONAL FEATURES: 

• Simple to use, even for the novice. ..menu oriented. 

• Permits 2260 names "on-line" with 40 track double density 
drives and almost 5000 names with 80 track drives. The older 
35 single density drives permit 1025 on-line entries. ..made 
possible with our unique data compression techniques. 

• Super fast sort by alph. or zip order (8 sec. for 1000 entries). 
Both orders can exist simultaneously on disk. 

• High speed recovery of entries from disk. ..speed of sort is 
meaningless if retreival from disk is slow. Ours pulls in over 
11 per sec! 

• Master list printout of your list in several formats (not just a 
rehash of labels). ..extremely useful. 

• Zip order is "sub-alphabetized". 

• Less than 5 digit zips have leading 0's appended. 

• Supports 9 digit zips, Canadian zips, and foreign abbrev. 

• Optional second address line. 

• Optional reversal of names about commas. This permits disk 
storage in last-name-first order to facilitate meaningful order- 



ing while the printout will be in "natural" order. 
Permits telephone, account, and/or serial numbers, etc. 
Prints on envelopes or labels 1 , 2, 3 or 4 across. 
Can print individual labels at time of creation or editing. 
Test label/envelope printing allows you to make vertical and 
horizontal adjustments with ease... 

Transfers old files to our system. -^■■■■B LOOK! 

Selective printout by specific zips or zip ranges. 
Plenty of user defined fields with provisions for simulta- 
neously purging and/or selecting the printout. ..even allows 
for inequalities. ..Powerful and easy to use. 
Editing is simply and fast. ..direct access or automatic 
search. ..Batch transfer or edited entries to backup disks. 
Optionally provides for duplicate labels. 

Deleted entries have "holes" on disk filled automatically and 
alph. order is still maintained! 

All labels optionally support an "Attn." line with provisions 
for multiple entries. This permits mail to be sent to several' 
people at given addresses. ..conserves disk space. 
All 0's are replaced by easier to read 0's in addresses. 
Continuous display of number of labels/envelopes printed. 
Extensive use of error traps. ..even recovers from a power 
failure during a printout. 

Extensive assortment of extra cost options for customized 
master list printout (in addition to the standard one mentioned 
above), transfer of entries between disks, summary reports, 
and "publisher's" type multiple list label printouts. 
Hardware requirements. ..32K, printer, and 1 or 2 drives. 



FORM LETTER (Use with Mail List System) $39.95 

Create letters and store on disk with provisions for later retreival 
and additions. Then print your letters using your mailing list. 

• Same select and purge features as mailing list system. 

• Select either continuous fanfold or "cut sheet" paper. 

• Selectable tabing, test printing, and paging. 

• Allows regular or legal size pages. 

• Greetings are selectable by codes on mailing list. Options 
include Mr. /Mrs., First/Last Name, global, or user defined. 



SUPER CALENDAR (Supplied on tape only) $19.95 

Prints out calendars of individual months of years ranging from 
1583 to any time in the future. Standard banker's holidays are 
noted. ..Additionally prints out large "graphics" type wall 
calendars with memos under each day. ..Use as a planning 
calendar with optional disk storage. .. Requires 16K and a printer. 

Loan Amortization (Supplied on tape only) $29.95 

Achieves pin point accuracy with a built in calendar. ..This 
sophisticated program produces an exceptionally professional 
looking printout that includes yearly summaries as well as 
"totals-to-date"... Several options for calculating interest includ- 
ing one that pushes the payment date ahead to the next business 
day if the regular pay date falls on a weekend or holiday. 



FOOTBALL SCOUT (diskoniy) $89.95 

Charge local schools up to $1000 per season for these sophisti- 
cated reports. Analyze the tendancies of opposing teams... 
Equivalent to that used by the pros. 

'■ ■ 




^See List ol Advertisers on Page 435 
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The GAMER'S CAFE 



by Rodney Gambicus 



-tO- 



One step 
beyond the 
neon glow 



When we left Eugene and headed 
south on Route 5, 1 had visions of 
San Francisco dancing in my head. We 
would set up the Cafe somewhere in 
Berkeley, bask in the sun, and rake in 
the dough. So when I woke up one 
morning to find ourselves in the middle 
of a God-forsaken desert, I was under- 
standably upset. 

Mad Max had been driving for 36 
consecutive hours and when I looked in- 
to his eyes and saw little white rabbits 
hopping around, I knew we were in 
trouble. "Neon," he whispered. "Neon 
and phosphor. Microcosmic oneness. 
Hey Stella, put back those ash trays. Hit 
me, hit me, hit me. . . " 

He paused, and stared wildly at 
the vast sandy wasteland that threat- 
ened to swallow us. Then he screamed, 
"Blackjack!" 

And I knew where he was taking us: 
Las Vegas. 



***** 



I was about to voice my objections 
when suddenly a hitchhiker appeared 
from nowhere on the side of the road. 
Max swung the van over and the fellow, 
dressed in a three-piece suit and carry- 
ing an umbrella, hopped in. 

"Hi," he said. "I'm Jackson Dott, 
marketing coordinator at Microcom- 
puter Games, a division of Avalon Hill. 
Want some information on our latest 
games?" 

"Gee, I guess so," I said. 

He then proceeded to tell us all about 
Fredericksburg, Close Assault, and 
Diplomacy, all due for release this 
month. 

Fredericksburg is a two-player Civil 
War game, giving Generals Ambrose 
Burnside and Robert E. Lee a rematch 
to see whether Burnside can avenge the 
famous Union defeat. Close Assault is a 
one- or two-player World War II game, 
featuring hand-to-hand and infantry 
combat and other war -like stuff. Both 
are actually board games, with the com- 
puter handling combat resolution. 

Diplomacy is a whirl of pre-WWI al- 
liance-forming and backstabbing. I said 
it sounded like you needed a diabolical 
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mind to play it. Dott agreed. Max mere- 
ly gurgled. 

"By the way," I said. "Have you 
guys gotten any negative feedback on 
V.C., that microcomputer game of op- 
erational-level combat in Vietnam?" 

"Not at all," he replied. "If you play 
the game, you'll find out it portrays any 
type of guerrilla warfare. And the idea 
is to make friends with civilians, not to 
kill. Say, can you pull over here? This is 
where I get off." 

We stopped and he climbed out. 

"Thanks for the lift, fellas," he said 
as he started to walk into the desert. 






Winthrop had been sulking ever since 
Eugene, when Mad Max came aboard 
and cleaned Winthrop 's clock in Sea 
Dragon. He'd taken to playing endless 
games of Black Death on our PMC 
Model 1/2, sucking on oolong tea and 
eating dry Cap'n Crunch. I was worried 
about his teeth, which were beginning 
to grow moss. 

It happened shortly after we pulled 
into Las Vegas (or Lost Vagrants, as 
Max calls it). Winthrop booted up Sea 
Dragon in a final desperate attempt to 
overtake Max. Unfortunately, he didn't 
know that I'd accidentally spilled some 
Milk of Magnesia on the disk, creating 
several horrendous bugs. Suddenly, 
Winthrop 's torpedoes were bouncing 
off ships and attacking his subs. When 
he surfaced for air, his supply de- 
creased. Every time he hit the down ar- 
row, his sub blew up. The final straw 
came when the nuclear reactor turned 
into a smile face and started whistling 
the theme song to "Leave It to Beaver. " 
Winthrop fled the van screaming. We 
chased him into Caesar's Palace, pick- 



ing up his clothes as we went along. We 
finally caught him at one of the crap ta- 
bles, but not before he'd swallowed the 
dice and thrown everybody's chips all 
over the room. Needless to say, the po- 
lice took him away in a rubber truck. 

Well, it turned out that the city attor- 
ney owned a Model I, and we were able 
to strike a deal. We gave him all our Big 
Five games, and he agreed to put Win- 
throp in the Prairie Sunset Rest Home 
instead of the slammer. And that's 
where he is now, pushing the nurse call 
button and yelling, "Dive! Dive!" 






A short time later, I was at the poker 
table looking at a straight flush I didn't 
have when a waiter came up with a tele- 
phone. It was Soft Sector Marketing 
calling to tell me about three new games 
they've got scheduled for release this 
month. 

Sneak Thief is Larry Ashmun's first 
totally original arcade game. You de- 
fend the gold treasure on an alien planet 
(as most of them are), zapping aliens 
(what else?), or dragging them off to 
jail (no rest homes here). Vexus is a 3-D 
arcade game from Factory Program- 
ming in which you pilot a spaceship 
through a tube in the sky, shooting 
down aliens as they approach. And Ral- 
ly, also from Factory Programming, 
simulates driving a race car through 
a graphics maze, picking up flags and 
being pursued by "villainous cars" 
(their words). All three are Alpha or 
TRSSTICK joystick-compatible. 

The folks at Soft Sector also want ev- 
erybody to know that Color Computer 
versions of Alien Defense and (proba- 
bly) Caterpillar are on their way. 

When the waiter came to take the 



phone, I noticed something suspiciously 
familiar about him. 

"Say," I said, "Aren't you the 
former Boston Red Sox second base- 
man Pumpsie Green?" 

"No," he said, and walked away. 
***** 

When I got back to the van, I knew 
immediately that something was wrong, 
because the van wasn't there — only 
Mad Max, our two Pocket Computers, 
and the PMC. It took a while to get the 
truth from Max, who was air-guitaring 
to Jimi Hendrix's "Voodoo Child" 
wafting from a GTO waiting at a stop 
light, but it turned out that he'd lost the 
van in a crap-shoot with the head nurse 
at Prairie Sunset. 

Well, we had enough money for 
a cheap motel room, and one sole 
remaining disk with Galaxy Invasion 
on it, so we figured that life could 
be worse. We could be in San Fran- 
cisco, soaking up the sun and mak- 
ing lots of money. Who needs that 
kind of aggravation? ■ 



70 INCOME TAX PROGRAMS 

(For Filing by April 15, 1983) 

For TRS-80* Models I and III 



FEATURES:— 

1. Menu Driven. 

2. 70+ Tax Programs. 

3. Basic; Unlocked; Listable. 

4. Name/SS No. /FS carried 
over. 

5. Inputs can be checked. 

6. Inputs can be changed. 

7. I. R.S. approved REVPROC 
format. 

8. Prints entire Form/Schedule. 

9. Calculates Taxes, etc. 

10. On std. 35-track, Mod. I 
format disk. 

11. CONVERT for Model III. 

12. Use GREENBAR in triplicate 
— don't change paper all 

season! 

13. Our 4th Year in Tax 
Programs. 

14. We back up our Programs! 



Helpful programs to calculate and print the many Tax 
Forms and Schedules. Ideal for the Tax Preparer, 
C.P.A. and Individual. For just $24.75 per disk, post- 
paid (approx. 60 grans per format disk). 

Programs are designed for easy-use, with check- 
points to correct parts as needed. Results on screen 
for checking before printing. 

In all, there are more than 70 individual Tax Programs. 
These include Form 1040, 1040A, 1040EZ, 1120, 
1120S, 1041 and 1065. Also Schedules A, B, C, D, E, 
F, G, R, RP and SE. And, Forms 1116, 2106, 2119, 
2210, 2440, 3468, 3903, 4255, 4562, 4797, 4835, 
4972, 5695, 6251 and 6252. 
And, we have a disk we call "THE TAX PREPARER'S 
HELPER" which has programs for INCOME STATE- 
MENTS, RENTAL STATEMENTS, SUPPORTING STATE- 
MENTS, IRA, ACRS, 1040/ES, ADD W-2'sand PRINT 
W-2's. 

TRY ONE DISK AND SEE FOR YOURSELF. ONLY S24.75 
POSTPAID. 

First disk is TR#1, and includes Form 1040 and 
Schedules A, B, C, D and G. $24.75 POSTPAID. 






Write:— 
GOOTH TAX PROGRAMS 

931 So. Bemiston • St. Louis, Mo. 63105 

"T.M.Reg, by Tandy Corp. Ft. Worth, Tx. 



• 236 



v/SA m 




Ability: 
Library Commands 

1 . All of TRS-DOS comman 

2. Lower case options 

3. Varible track support 
(35-80) 

I 4. Plus many more . . . 
itility Command 
1 . All of TRS-DOS commands 
2. Purge all files not needed 
3. Terminal control as to 
communication with 
another terminal 
4. Plus many more . . . 

Languages 

1 . Extended basic 

2. Edtasem - Editor Assembly 

3. Plus many more . . . 

Write or call us now for the best 
investment of your life. 
POSMODELI. II. and III .$85.00 





UNDER THE SUN 

All application program provide introductory 
discount - 20°o off. 



'S is truly the operating 
stem that has the other DOS 
beat in price and ability. 

Other available Software for 
MODI, II, and III 

1 . A R Osborne $35f 

2. A P Osborne $351 

3. G L Osborne $350. 

4. PR Osborne $400. 

\ ACT I - A R. A. P. 

G L $850 

6. ACT II - A R. A P. 
G L, PR 120( 

7. Inventory Control I . $150. 

8. Inventory Control II . $250. 

9. FM (creates 
programs) $80. 

10. Wordit (mailing list and 
word processing) . $150. 

1 1 . Letterit (word 
processor) $35 

12. Sort $45. 

13. And much more .... Call 



As an introductory offer you can try POS for 10 days for only $25.00. If your not 
satisfied, return the Diskette and manual for a refund, or send $60.00 for the Master 
Diskette which can be backed up. 

10 day trial Diskette w/manual $25 

Master POS $60. 

Or just pay $85. 



USAGE SOFTWARE GROUP 



SOFTWARE with SUPPORT 

1008 Shadow Run Drive 

Lakeland, FL 33803 

(813)-644-2038 



• 509 



-See List of Advertisers on Page 435 
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32 FLAVORS 

IN LOW COST COMPUTERS 




CP/M 64K 

The Mod III Plus CX 140 system is an 
exciting new personal and small busi- 
ness computer that is both CPM & 
TRS-DOS compatible. 

• 80 x 24 Display for CP/M 

• 64K Bytes RAM Memory 

• Microsoft BASIC language in ROM 

• Internal Z80 ROM Diagnostic 

• Z80 processor, 2MHz 

• 4MHz speed up option 

• 64 x 16 screen-TRS-DOS-.DOS+ 

• Cooling system 

• Parallel printer interface included 

• Anti-glare screen 

• Cassette interface 

• 2 Internal 40tk Disk Drives 

• Compatible with TRS-80® Model III 
— RS-232 serial interface option. 

CPM applications software such as 
Wordstar, Datastar and Mailmerge 
launch this computer system into the 
small business and word processing 
marketplace. Includes DOS PLUS 3.3 
operating system. 



;/K"--:::;:..: 



z:::™:;m::zzmzz;:::::,,;i./*i£& 



$2699 



Optional CP/M2.2 Operating System Available 



MOD III PLUS 140 

Computer consists of 48K bytes 
memory and a double density, 
dual disk drive system. The sys- 
tem is fully compatible with the 
Radio Shack® DOS and periphe- 
rals. Get 1 78,000 bytes of memory 
storage per disk. 



PRICE TOO 

LOW TO PRINT 

& 

INCLUDES 

DOS PLUS 3.3 



MOD III PLUS 240/280 

Double or Quadruple your stor- 
age capacity to 700 or 1.4 mega- 
bytes. These machines have all of 
the features of the MOD III PLUS 
140 and expanded storage. The 
240 has double headed 40 track 
drives, while the MOD III PLUS 
280 has double headed 80 track 
drives. 



PRICES FROM $ 1899 



MOD III PLUS B/140 

Especially designed for Business applications. 
Same as Model 140 and includes anti-glare 
screen, speed-up enhancement, RS-232 inter- 
face cooling unit and more. Also includes FREE 
business software package. 

WORD PROCESSING 

We are also offering a discount certificate enti- 
tling the purchaser to NEW SCRIPT by Pro Soft 

FREE SOFTWARE 
ACCOUNTING PACKAGE 

' ACCOUNTS RECEIVABLE • INVENTORY/SALES • GAMES 
» ACCOUNTS PAYABLE ANALYSIS • EDUCATION SOFTWARE 

' GENERAL LEDGER • PAYROLL • DOS PLUS 3.3 

• INCLUDING AUDIO SELF- 
LEARNING CASSETTE 



WINCHESTER HARD DISK 

Our desk top business computer system, with 
approximately 5.7 megabytes of on line storage. 
The system includes a 5 megabyte Winchester 
hard disk drive for ultra-fast business require- 
ments. An 80 track dual head disk drive is used 
for backup and for conventional floppy disk oper- 
ation. 



$4399 
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32 FLAVORS 

IN ADD-ONS AND KITS 



MTI DOES IT. Our CP/M 64K turns your 
TRS-80 Model III into two computer sys- 
tems, with memory upgrade to 64K and an 
80" x 24" column video card, you will convert 
your computer to a CP/M base machine. 

LIKE THE BIG BOYS. That means you can 
access the single largest body of microcom- 
puter software used by companies like Xer- 
ox, Osborne, Eagle, Apple, Cromenco etc. 
What is better, is that you can switch back 
forth between TRS-DOS and CP/M modes, 
and our own Z-80 diagnostic monitor. 

SIMPLE INSTALLATION. The CP/M 64K 
system plugs directly into the TRS-80 CPU 
board. You are ready to go! 
HUNDREDS OF APPLICATIONS. You have 
available literally hundreds of programs writ- 
ten for many mini and micro computers un- 
der CP/M operating system. 



CP/M-64K 



CP/M 2.2 
$119 



Optional CP/M 2.2 Operating System Available 




ADD-ON WINCHESTERS 




Add 5.. 7.5, or 11. megabyte hard disk 
drive to any Model III. The complete self 
contained unit includes a Winchester 
drive, controller, power supply cooling 
system and cables in an attractive en- 
closure. 



From $ 1899 



INTERNAL DISK 
DRIVE KITS 



$ 459 





A new low cost internal disk kit is available to 
expand your storage capability. With this kit. 
you may expand your 16K TRS-80* Mod III 
computer. Includes: 1-MTI 40 track, double 
density disk drive, power supply, controller, 
cables and DOS PLUS operating system. 



EXTERNAL DISK DRIVES 




Add-on disk 
drives for the 
Model I and III 
are available in 
40 and 80 track, 
single and dou- 
ble head confi- 
gurations. 
Contact MTI or 
a local authoriz- 
ed dealer. 



From $ 289 



Fairbanks, AK (907) 456-2281 

Anniston, AL (205) 236-6396 

Mesa, AZ (602) 833-8949 

Phoenix, AZ (602) 241-1865 

Phoenix, AZ (602) 866-3233 

Tempe. AZ (602) 831-5376 

Anaheim, CA (714) 773-0240 

Burbank, CA (213) 841-4210 

Camarillo, CA (805) 987-1633 

Covina, CA (213) 332-4088 

Goleta. CA (805) 967-7628 

Lancaster. CA (805) 948-9807 

Mission Viejo, CA (714) 495-3782 

Montclair, CA (714) 626-4813 

Orange. CA (714) 771-0880 

Placerville, CA (916) 622-4640 

San Diego. CA (714) 275-4243 

San Jose. CA (408) 946-1265 

Santa Monica, CA (213) 393-5785 

Studio City. CA (213) 763-3425 

Walnut. CA (714) 594-9760 

Groton, CT (203) 445-5166 

Washington, DC (202) 363-9797 

Wilmington, DE (302) 762-0227 

Mary Esther. FL (904) 243-5793 

Panama City. FL (904) 769-8093 

Tampa. FL (813) 961-5269 

West Palm Beach, Fl (305) 689-1200 

Norcross, GA (404) 449-8982 

Tifton, GA (912) 386-8367 

Bettendorf, IA (319) 355-2641 

Buckingham, IA (319) 478-2826 

Sioux City. IA (712) 255-8892 

Belleville, IL (618) 277-2354 

Collinsville, IL (618) 345-5068 

Decatur. IL (217) 429-8510 



OVER 100 AUTHORIZED SALES AND 

SERVICE CENTERS 

CALL 714-979-9923 

for the center nearest you 



fia 



MICROCOMPUTER TECHNOLOGY INC. 

3304 W. MACARTHUR. SANTA ANA. CA 92704 
(714) 979-9923 

^247 
U.S. PRICES FOB. SANTA ANA 
CALIFORNIA AND MAY VARY BY AREA 
CP/M is a registered trademark o( Digital Research Inc. 
TRS-80" is a registered trademark of Tandy Corp. 
MT I is a registred tradomark ol Microcomputer 
Technology. INC. 



Mundelein. IL (312) 362-3440 

Shreveport. LA (318) 865-7189 

West Monroe, LA (318) 322-6479 

Hopkinton. MA (617) 435-4457 

Springfield. MA (413) 737-4562 

Baltimore, MD (301) 944-0200 

Beltsville, MD (301) 953-9600 

Towson, MD (301) 337-3808 

Anoka, MN (612) 427-5783 

Minneapolis, MN (612) 869-3245 

Cameron. MO (816) 632-6528 

Columbia. MO (314) 874-3216 

Marshall. MO (816) 886-6823 

Slater, MO (816) 529-3444 

St. Louis, MO (314) 241-7393 

Bozeman. MT (406) 586-0511 

Missoula, MT (406) 549-9715 

Raleigh. NC (919) 755-1175 

Fargo. ND (701) 280-0580 

Paramus. NJ (201) 342-2284 

West Milford. NJ (201) 728-8080 



Las Vegas, NV (702) 870-4138 

Jericho, NY (516) 333-2266 

Lake Grove, NY (516) 724-4490 

Rome, NY (315) 336-0266 

Syracuse. NY (315) 474-1442 

Troy. NY (518) 273-8411 

Utica. NY (315) 446-1028 

White Plains, NY (914) 761-9283 

Mayfield Height, OH . . . .(216) 449-4030 

Toledo, OH (419) 535-5897 

Portland. OR (503) 281-7640 

Salem, OR (503) 581-8056 

N. Charleston. SC (803) 747-5773 

Lubbock, TX (806) 763-5100 

Longview, TX (214) 759-2922 

Missouri City, TX (713) 499-5241 

San Angelo, TX (915) 658-3573 

Falls Church, VA (703) 536-5040 

Reston. VA (703) 471-0305 

Anacortes, WA (206) 293-5154 

Bellingham. WA (206) 647-1814 

Spokane, WA (509) 624-3203 

Cheyenne. WY (307) 632-9132 

FOREIGN DEALERS 

Argentina (54) 132-1858 

Australia 657-8023 

Belgium 1663-2452 

Burnaby, Canada (604) 522-9877 

Ottawa, Canada (613) 741-7937 

Helsinki, Finland 9064-4116 

France (341) 773-5493 

Holm, Germany 4103-7393 

Tel Aviv, Israel 325-8535 

Capetown, S. Africa 2145-1047 

Papeete, Tahiti 2-5447 

Bangkok, Thailand 314-1161 



^See List ol Advertisers on Page 435 



80 Micro, January 1983 • 43 



Convert your TRS-80* 
into a World Class Computer 










AND DOESN 








. . .with LSI's new Replacement CRT. . . 



The black & white "TV Screen" CRT (picture tube) which came with your TRS-80*model II or III is an inexpensive 
rapid "P4" Phosphor CRT intended for TV use. The display is actually strobing 60 times a second. No amount of "green 
plastic" will stop this strobing or eliminate the eye fatigue it causes. But a news< ™ CRT display lube with a slower 

decaying, colored Phosphor will. 

• Available in slow-decay green (similar to new IBM* and APPLE lll*monitors) or medium decay "European 
Orange" (easy on the eyes, elegantly beautiful, and the standard for CRT displays in Europe) 

• Leaded glass stops X-ray emission 

• Optional Anti-Glare Frosted Glass available to reduce eye strain from glare 

• Easy installation — tube comes with pre-mounted hardware 

• 30-Day Money-Back Guarantee 

• Ideal for Word-Processing & Programming, fast enough for Games & Graphics 

• Finest quality double-dark glass and phosphor fields make the letters seem to be coming out of black space 



Try This Test: 



A 



LSI's new ; T — CRT 



Turn the brightness control on 
your TRS-80*all the way up. Wave 
your hand up and down in front 
of the screen. See how jerky it 
seems? Just like in front of a 
strobe light! That's because the 
screen actually is strobing at you. 
A slower-phosphor CRT will 
reduce that troublesome strobe 
effect. That's why most of the 
newer monitors, from IBM* to 
Apple III* are using the new 
slow-phosphor CRT's. 

•IBM*. APPLE 



TM 

LSI SYSTEMS CRT's: 

□ #GN42 Green Phosphor $79.95 

□ #GN42G Green Phosphor with anti-glare $89.95 

□ #OR34 Orange Phosphor $89.95 

D #OR34G Orange Phosphor with anti-glare $99.95 
ADD $7 FOR PACKAGING AND UPS SHIPPING 



*-462 

80M-183 



>%Langley-St.Clair 



Instrumentation 
Systems, Inc. 

1 32 West 24th Street, New York, N.Y. 10011 212-989-6876 



To Order Call: 

1-800-221-7070 

Dealer Inquiries Invited 



and TRS-80* are trademarks of IBM, APPLE Computer & TANDY Corp. 
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Pac-Droids 
Programmer's Guild 
P.O. Box 66 

Peterborough, NH 03458 
Color Computer 
$19.95 

by Kerry Leichtman 

If a game clone is to be successful, 
it must imitate the original's good 
points, and add a few new twists of its 
own. Pac-Droids does just that. This 
new Programmer's Guild game is the 
best Pac-Man clone I've seen for the 
Color Computer. 

The object of play is the same as the 
original game; you run around a maze 
gobbling up dots, energizer pellets, and 
drones. Rather than being a smiley 
face profile, you command a blue 
spaceship. Your enemies, the red 
drones and a blue drone robot, attempt 
to converge upon your ship until you 
eat an energizer pellet. Then they 
become scarce. 

The game is more difficult than Pac- 
Man, and as a result more fun. The 
blue drone robot occasionally leaves 
dangerous droppings, called mines, in 
the maze. Running into one of these 
droppings will destroy your ship, as 
will taking on the powerful blue drone 
robot itself. 

You are supplied with a weapon to 
use against these killers — the super 
bomb. Used properly, the super-bomb 
will destroy the blue drone and its 
mines. But the super bomb is not all 



that discreet — it will also blow away 
your energy pellets. The super bomb 
will destroy everything in its path until 
hitting a force field (maze wall). So, if 
within one corridor you are faced with 
a charging blue drone, one of its mines, 
and your last energy pellet, close your 
eyes and take your fate. If you super- 
bomb your last energy pellet, you've 
also super-bombed your only hope in 
fighting the red drones. 

You start the game with three ships 
and three super bombs. You can use all 
three super bombs with any one ship, 
but I don't recommend it. According 
to the documentation you get an extra 
ship and an additional super bomb for 
every 10,000 points. You also get a new 
maze for every 10,000 points, with a 
maximum of four different mazes. I 
can't verify that first-hand for reasons 
I'd rather not discuss. But I do know 
that if you use all three super-bombs, 
say, with your first ship, and then that 
ship gets destroyed, your next ship is 
likely to encounter a rejuvenated blue 
robot drone and its mines — with no 
super bombs to defend itself. 

Charles Forsythe's use of the Color 
Computer's main attribute, color, is to 
be applauded. The monitor is alive 
with color, especially the title page. 
While I was researching (playing) for 
this review, many people stopped to 
watch the display (and laugh at my in- 
eptness). The sound is less exciting. In 
fact, I kept turning the volume down to 
lessen the barrage. 

A minor complaint is the seemingly 
slow reaction time when opting for 
keyboard input rather than joysticks. 
Your ship is more likely to be tracked 
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down by the enemy when using the ar- 
row keys than when directing move- 
ments with a joystick. 

Another complaint, less minor, is 
that you only get three attempts before 
the game is over. Now I can under- 
stand the greed of arcade machines 
when they limit your play to three 
chances for a quarter. I remember get- 
ting five balls for a dime on pinball 
machines and three plays for a quarter. 
(And my father remembers the nickel 
movie.) But the point is, if no one is in- 
terested in machine turnover, why not 
allow for more than three plays a game? 

For little kids the three-tries- 
you're-out is okay, because they take 
the time to master the play. But for an 
aging editor like me who didn't practice 
by dropping $20 a week into Pac-Man, 
three tries is too few to get anywhere. 
I'm sure I'll never see the other three 
mazes. My highest score was 7,400. 
10,000? Bah, humbug! 

Complaints aside, Pac-Droids is one 
of the better games available for the 
Color Computer. ■ 
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Bits '« Bytes About Computing: 
A Computer Literacy Primer 
by Rachelle S. Heller & 
C. Dianne Martin 
Computer Science Press 
11 Taft Court 
Rockville, MD 20850 
Hardcover, 174 pp. 
$17.95 

by Mary Gasiorowski 

As you read this page, stop for a 
moment and think about those 
who can't read — the illiterate — those 
who can't deal with the written word. 

There are many more who can't deal 
with or understand computers — the 
computer illiterate. At a time when our 
lives are becoming increasingly com- 
puterized — from our alarm clocks, 
washing machines, and automobiles to 
our businesses — it is increasingly im- 
portant that people understand what 
computers can and cannot do, how to 
use them, and the implications of com- 
puter use on our society. Bits 'n Bytes 
About Computing: A Computer Liter- 
acy Primer addresses this problem. 

Bits 'n Bytes was written for the 
classroom teacher to serve as a source, 
and perhaps as a textbook. It covers a 
broad range of topics: what is com- 
puter literacy, where did computers 
come from, how do computers work, 
what computers can do for us, and 
how computers will affect our lives. 
Each chapter is organized into content, 
a list of key ideas (vocabulary words), 
a set of activities (including informa- 
tion on the purpose of the activity, and 
the materials and time required for 
each), and a list of related readings for 
teachers and students. In addition, an 
appendix includes a software evalua- 
tion checklist to help teachers evaluate 
educational programs for the comput- 
er. An extensive index aids in relocat- 
ing specific topics or other references. 

Computer literacy is a topic that can 
be introduced (to a varying degree of 
depth) at any age. However, there are 
few books that can be used at the 
elementary level. Bits 'n Bytes is one of 
those few. As a source book, it pro- 
vides background material for the 
teacher, who can then decide how 
much to present to the students. 

The broad range of activities can be 
used from elementary through junior 
high-school classes. The activities and 
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related readings are the best features of 
the book. The lists of related readings 
at the end of each chapter are extensive 
and varied, covering all aspects of 
computers, their history, and their use 
and misuse, and are clearly marked as 
to their intended audience (teacher, 
student, or both). 

Some sample activities from the 
book include: 

• making a scrapbook of the materials 
you collect about computers; 

• writing a short story or poem that 
describes how you feel about computers; 

• making a history time line showing 
the important events in computing 
history; 

• making your own simple calculator 
using three wooden gears; 

• preparing an oral report and poster 
about the use of computers in some area 
of life; and 

• collecting want ads to see what 
computer-related jobs are being offered 
and what the qualifications are. 

Bits 'n Bytes does not cover a specific 
programming language, as many intro- 
ductory books do. The authors feel 
there are already many good program- 
ming books available, and more impor- 
tantly, they did not want to commit 
their book to a particular language. 
This leaves the choice of a language — 
Basic, Pascal, Logo, or any other — to 
the discretion of the teacher or the situa- 



tion of the system available. 

Computer literacy has been defined 
by the National Science Foundation 
and the Minnesota Educational Com- 
puting Consortium as knowing how 
computers work, the step-by-step tech- 
nique for problem solving, social 
implications, being aware of computer 
applications, having a historical 
perspective on computers and future 
trends, and a person's attitudes toward 
computers. Bits 'n Bytes was written to 
address these topics. The authors ad- 
mit, however, that on some topics they 
present a byte (a larger unit) of infor- 
mation, while on other topics, only a 
bit (the smallest unit). Don't expect to 
teach from this book alone! 

Computer literacy is becoming a 
critical issue, and two important 
aspects of teaching the subject need to 
be summarized here. Computer litera- 
cy must be addressed to all ages. Bits 'n 
Bytes, as a source book, meets that 
challenge because it includes material 
for all ages and it leaves the presenta- 
tion to the teacher. In addition, there is 
much to learn about using computers 
effectively and avoiding their misuse. 
It would be nice to have all that infor- 
mation in a single book; but that book 
does not yet exist. Bits 'n Bytes, with its 
thoughtfully prepared list of activities 
and related readings, is a very good 
place to start. ■ 
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C.C. Mailer and C.C. Merger 

Trans Tek 

194 Lockwood 

Bloom ingdale, II 60108 

Color Computer, 16-32K cassette 

or 32K disk systems 

C.C. Mailer, $20; with 

C.C. Merger, $35 



by Scott L. Norman 



C.C. Mailer and C.C. Merger are 
convenient, inexpensive programs 
for Color Computer owners who pre- 
pare "mass" mailings of moderate size. 
C.C. Mailer is a stand-alone program 
that allows the user to maintain address 
files for the preparation of mailing la- 
bels. C.C. Merger is used to combine 
such files with text files created by Trans 
Tek's C.C. Writer word processor. The 



package contains all the options neces- 
sary to sort address lists for selective 
mailings, and to customize form letters 
with properly formatted inside ad- 
dresses and salutations. 

C.C. Mailer 

This is the heart of the system. 

While C.C. Mailer is available on 
cassette, disk systems are far superior 
for the file manipulation required by 
this sort of program. Although dual 
disk drives give you even more freedom, 
most of my comments will specifically 
relate to single-disk operation. 

C.C. Mailer is menu driven, and 
leads you through the process of enter- 
ing data for your files in a very painless 
fashion. Up to 11 data fields are avail- 
able, including two different code fields 
that can be used for sorting. Disk sys- 
tem records are limited to a total length 
of 128 characters; 720 such records can 
be accommodated by a 32K disk system. 
This is misleading, though. If only one 



the Color Computer Word Processor 



3 display formats: 51/64/85 

columns x 24 lines 

True lower case characters 

User -friendly full -screen 

editor 

Right justification 

Easy hyphenation 

Drives any printer 

Embedded format and 

control codes 

Runs in 16K, 32K, or 64K 

Menu-driven disk and 

cassette I/O 

No hardware modifications 
required 



THE ORIGINAL 



Simply stated, Telewriter is the most powerful 
word processor you can buy for the TRS-80 
Color Computer. The original Telewriter has 
received rave reviews in every major Color 
Computer and TRS-80 magazine, as well as 
enthusiastic praise from thousands of satisfied 
owners. And rightly so. 

The standard Color Computer display of 32 
characters by 16 lines without lower case is 
simply inadequate for serious word processing. 
The checkerboard letters and tiny lines give you 
no feel for how your writing looks or reads. 
Telewriter gives the Color Computer a 51 
column by 24 line screen display with true 
lower case characters. So a Telewriter screen 
looks like a printed page, with a good chunk of 
text on screen at one time. In fact, more on 
screen text than you'd get with Apple II, Atari, 
TI, Vic or TRS-80 Model III. 

On top of that, the sophisticated Telewriter 
full-screen editor is so simple to use, it makes 
writing fun. With single-letter mnemonic 
commands, and menu-driven I/O and 
formatting, Telewriter surpasses all others for 
user friendliness and pure power. 

Telewriter's chain printing feature means that 
the size of your text is never limited by the 
amount of memory you have, and Telewriter's 
advanced cassette handler gives you a powerful 
word processor without the major additional 
cost of a disk. 



...one of the best programs for the Color 
Computer I have seen... 

— Color Computer News, Jan. 1982 



TELEWRITER-64 



But now we've added more power to 
Telewriter. Not just bells and whistles, but 
major features that give you total control over 
your writing. We call this new supercharged 
version Telewriter-64. For two reasons. 



64K COMPATIBLE 



Telewriter-64 runs fully in any Color Computer 
— 16K, 32K, or 64K, with or without Extended 
Basic, with disk or cassette or both. It 
automatically configures itself to take optimum 
advantage of all available memory. That means 
that when you upgrade your memory, the 
Telewriter-64 text buffer grows accordingly. In 
a 64K cassette based system, for example, you 
get about 40K of memory to store text. So you 
don't need disk or FLEX to put all your 64K 
to work immediately. 



64 COLUMNS (AND 85!) 



Besides the original 51 column screen, 
Telewriter-64 now gives you 2 additional high- 
density displays: 64 x 24 and 85 x 24!! Both 
high density modes provide all the standard 
Telewriter editing capabilities, and you can 
switch instantly to any of the 3 formats with a 
single control key command. 
The 51 x 24 display is clear and crisp on the 
screen. The two high density modes are more 
crowded and less easily readable, but they are 
perfect for showing you the exact layout of 
your printed page, all on the screen at one 
time. Compare this with cumbersome 
"windows" that show you only fragments at a 
time and don't even allow editing. 



RIGHT JUSTIFICATION & 
HYPHENATION 



One outstanding advantage of the full-width 
screen display is that you can now set the 
screen width to match the width of your 
printed page, so that "what you see is what 
you get." This makes exact alignment of 
columns possible and it makes hyphenation 
simple. 

Since short lines are the reason for the large 
spaces often found in standard right justified 
text, and since hyphenation is the most 
effective way to eliminate short lines, 
Telewrifer-64 can now promise you some of the 
best looking right justification you can get on 
the Color Computer. 



FEATURES & SPECIFICATIONS: 



Printing and formatting: Drives any printer 
(LPVII/VIII, DMP-100/200, Epson, Okidata, 
Centronics, NEC, C. Itoh, Smith-Corona, 
Terminet, etc). 

Embedded control codes give full dynamic access to 
intelligent printer features like: underlining, 
subscript, superscript, variable font and type size, dot- 
graphics, etc. 

Dynamic (embedded) format controls for: top, 
bottom, and left margins; line length, lines per page, 
line spacing, new page, change page numbering, 
conditional new page, enable/disable justification. 
Menu-driven control of these parameters, as well as: 
pause at page bottom, page numbering, baud rate (so 
you can run your printer at top speed), and Epson 
font. "Typewriter" feature sends typed lines directly 
to your printer, and Direct mode sends control codes 
right from the keyboard. Special Epson driver 
simplifies use with MX-80. 

Supports single and multi-line headers and automatic 
centering. Print or save all or any section of the text 
buffer. Chain print any number of files from cassette 
or disk. 



File and I/O Features: ASCII format files — 
create and edit BASIC, Assembly, Pascal, and C 
programs, Smart Terminal files (for uploading or 
downloading), even text files from other word 
processors. Compatible with spelling checkers (like 
Spell 'n Fix). 

Cassette verify command for sure saves. Cassette auto- 
retry means you type a load command only once no 
matter where you are in the tape. 

Read in, save, partial save, and append files with disk 
and/or cassette. For disk: print directory with free 
space to screen or printer, kill and rename files, set 
default drive. Easily customized to the number of 
drives in the system. 

Editing features: Fast, full-screen editor with 
wordwrap, block copy, block move, block delete, line 
delete, global search and replace (or delete), wild card 
search, fast auto-repeat cursor, fast scrolling, cursor 
up, down, right, left, begin line, end line, top of text, 
bottom of text; page forward, page backward, align 
text, tabs, choice of buff or green background, 
complete error protection, line counter, word counter, 
space left, current file name, default drive in effect, 
set line length on screen. 

Insert or delete text anywhere on the screen without 
changing "modes." This fast "free-form" editor 
provides maximum ease of use. Everything you do 
appears immediately on the screen in front of you. 
Commands require only a single key or a single key 
plus CLEAR. 



. . . truly a state of the art word processor. . . 
outstanding in every respect. 

— The RAINBOW, Jan. 1982 



PROFESSIONAL 
WORD PROCESSING 



You can no longer afford to be without the 
power and efficiency word processing brings to 
everything you write. The TRS-80 Color 
Computer is the lowest priced micro with the 
capability for serious word processing. And 
only Telewriter-64 fully unleashes that 
capability. 

Telewriter-64 costs $49.95 on cassette, $59.95 
on disk, and comes complete with over 70 
pages of well-written documentation. (The step- 
by-step tutorial will have your writing with 
Telewriter-64 in a matter of minutes.) 
To order, send check or money order to: 



Cognitec 

704 Nob Ave. 

Del Mar, CA 92014 



^ 121 



Or check your local software store. If you have 
questions, or would like to order by Visa or 
Mastercard, call us at (619) 755-1258 
(weekdays, 8AM -4PM PST). Dealer inquiries 
invited. 

(Add $2 for shipping. Californians add 6% slate tax. Allow 2 
weeks for personal checks. Send self-addressed stamped 
envelope for Telewriter reviews from CCN, RAINBOW, 
80-Micro, 80-U.S. Telewriter owners: send SASE or call for 
information on upgrading to Telewriter-64. Telewriter- 
compatible spelling checker (Spell 'n Fix) and Smart Terminal 
program (Colorcom/E) also available. Call or write for more 
information.) 

Apple II is a trademark of Apple Computer, Inc.; Atari is a 
trademark of Atari, Inc.; TRS-80 is a trademark of Tandy 
Corp; MX-80 is a trademark of Epson America, Inc. 



TRS-80 T 

TRSDOS™ 



' MODEL II 
1.3 Users 



Super-DIR 1.3 

SDIR a directory maintenance and display 
program enhancing present commands and 
allows unlimited access to your disk and disk 
files. Not recommended for those who need 
to be protected from themselves. 

Among its many features: 

SDIR run under TRSDOS 1.3. 

SDIR abbreviated (horizontal or vertical) or 

super expanded listing with scrolling. 
SDIR graphic diskette map with areas 

marked by file type. 
SDIR map showing location of any file. 
SDIR single stroke commands. 
SDIR list files a granule at a time. 
SDIR sort by name, extension, size, starting 

location or back as it was. 
SDIR rearrange order for special needs. 
SDIR most modifications either temporary 

or permanent. 
SDIR create, kill, rename, change attributes 

or reposition files. 
SDIR reduce number of extents, speed up 

direct file handling. 
SDIR change any byte on disk. 
SDIR pack out holes in disk space. 

Comes complete with manual which also 
describes the directory. How to add your 
name to boot message, substitute SDIR for 
DIR, backup protect your files like Scripsit™ 
and many many more. 

Price $59.95. Send check or money order to: 



SMS Products 



^499 



1117 32nd. Ave.SE 

™ trademark of TANDY CORP. 



Albany, OR 97321 



TRS-80" 



WOBOS™ I 



Basic Operating System 

WOBOS I is a menu driven, prestructured program in BASIC thai 
provides access to over 30 utility functions during development or 
actual use of a program. Its unique layout allows you to develop 
your programs within a well organized environment that provides 
a very strong foundation to build upon. You always had to start 
from scratch before but now. after loading WOBOS I, you'll start 
with over 11 K of subroutines and system utilities. Imagine what 
this can do for your productivity! WOBOS I is not an accessory 
to your program. It actually becomes its foundation! 




Illustrated above is the Primary Menu of WOBOS I for Model III. 
In addition to the features shown, the DEVICE I/O generates a 
separate 9-choice menu that will allow you to compile, update, 
sort and output your data files. It also Includes a utility that will 
save both the DATA and WOBOS I on tape and or disk. 
With controllable SOUND! 
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REVIEWS 



drive is available, capacity will be re- 
duced because of the need to reserve 
space for the operation of the sorting 
option. 

A fresh disk contains four programs: 
Mail, a short loader; C.C. Mailer itself; 
SORTCOM, the sorting routine; and 
Copy2, which is used to copy files in a 
two-drive system. C.C. Merger is an op- 
tional fifth program on the disk. 

The user's first task is to make a 
back-up for a working copy. Since file 
control is manual, with the data file 
name being defined in the program, you 
have to make a fresh back-up disk for 
every address file. As far as the program 
is concerned, all data files are called 
CCMA1LER/DAT. 

You begin by running the Mail pro- 
gram. If there is a data file on the disk, 
it is automatically loaded at this point; 
if not, you will be prompted for a title 
for your new file. This will be displayed 
on subsequent listings and data re- 
quests. You are also asked to specify the 
date; C.C. Mailer keeps track of the last 
update, a rather professional feature. 
At this point, the main menu comes up: 



(U) UPDATE THE FILE 
(P) PRINT A FILE REPORT 
(L) PRINT LABELS 
(S) SORT THE FILE 

(E) EXTRACT FROM THE FILE 

(F) UPPER/LOWERCASE CONVERSION 
(Q) QUIT AND RETURN TO BASIC 



The U option is used to build a file 
and to add, change, or delete records. A 
second-level menu guides you through 
the options. The data-entry/change 
screen identifies the fields by number. 
The 1 1 fields are: 

• Title: limited to six characters, so 
MR&MRS will just fit. 

• First Name and Middle Initial: 15 
spaces. 

• Last Name: 20 spaces. 

• First Line of Address: 25 spaces. 

• Second Line of Address: 20 spaces. 
Two lines are handy for specifying 
apartment numbers, company names, 
and so on. If this field is not used, it will 
print as a blank line on mailing labels, 
but C.C. Merger will delete it in the ad- 
dress portion of a form letter. 

• City: 13 spaces, two positions al- 
lowed (e.g., New York can be written 
with a space). 

• State: Use the two-character abbre- 
viations. 



• Zip Code: Use the old five-digit 
codes. A nice feature is the disk pro- 
gram runs a consistency check on the 
zip code and the state abbreviation, and 
notifies you if there is a mismatch. You 
can ignore the message and proceed, 
which is handy for preliminary storage 
of data when you may not know the zip 
and want to leave the field blank. 

• Telephone Number: 12 spaces, so 
you can't use parentheses around the 
area code. I use a single hyphen to sepa- 
rate it from the exchange. 

• Code Field 1 : Five spaces, with each 
treated as a separate one-character field 
for selection purposes. 

• Code Field 2: Five spaces, treated as 
one field. 

Data entry is easy; the command line 
prompts you for each field in turn. You 
can backspace and correct the field 
you're working on, but once it is en- 
tered, you must complete work on the 
record before the option to change any- 
thing becomes available again. 

When using the Change or Delete 
suboptions of Update, you can identify 
the record in question by last name, or 
by one or both code fields. The codes 
are also used in doing selective printing, 
and generally add to C.C. Mailer's 
power and flexibility. 

Code field 2 is pretty simple; think of 
it as a five-character, free-form key- 
word. You can search for any substring 
in this field, provided it is at least two 
characters long. To paraphrase an ex- 
ample from the documentation, if C.C. 
Mailer is used to maintain the member- 
ship list of some organization, then 
code field 2 might contain the month 
and year when each member joined, 
perhaps in the form MM/YY. If you 
wanted to identify everyone who be- 
came a member in 1980, you could just 
search for the substring /80. 

Code field 1 enables you to encode 
status information about five catego- 
ries, each having a distinct position in 
the field. When you specify the 
"mask" — the pattern — for searches on 
this field, you can indicate a "don't 
care" condition for any position with 
characters you know would not appear 
in the actual codes. For example, each 
position in code field 1 of our hypothet- 
ical membership list might contain ei- 
ther an A or an I to indicate active or in- 
active status in five specified activities. 
Should you wish to identify members 
participating in activities one and four, 
regardless of their other interests, then 
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the search mask might be A**A*. 

As I mentioned above, every time 
you employ the code fields for a search, 
you are given the option of specifying 
whether a match should be found on ei- 
ther field, or both. That is, you can 
AND or OR the search criteria. 

It is a good idea to sort the file when- 
ever records have been changed or add- 
ed. The sort option invokes a two-level 
reverse ripple sort that works on last 
names within each zip code. The pro- 
gram asks if there is a scratch disk on 
drive 1, but it will work on single- 
drive systems; it just requires more 
space on the disk. A nice, chatty rou- 
tine, it gives you a running commentary 
as it loads the sorting and merging pro- 
grams and goes about its business. 

Printed Output 

You can request a complete or partial 
printout of a C.C. Mailer file with the 
main menu's P option. The left side of 
the printout contains the four lines of 
name and address data for each record, 
formatted as they would be for labels. 
The telephone number and the two code 
fields are printed at the right of this 
material. Printouts of this kind are use- 
ful for archival purposes. 

The real payoff is in the preparation 
of mailing labels. The L command gets 
you started. You are given the usual se- 
lection options, and can also ask for a 
trial print of a dummy label. This is to 
help you get your tractor-feed labels 
properly aligned in the printer, which is 
set up for one-inch-high labels, six- 
lines-per-inch feed. A final option is the 
treatment of the code fields. You can 
delete them from the actual labels, or 
have them printed. If you choose the 
latter, the codes will appear on the top 
line of each label, indented to comply 
with postal regulations. 

C.C. Mailer's F command is impor- 
tant for professional-looking labels. 
The output options I've already dis- 
cussed treat all text as uppercase. If you 
use the F command before printing, 
though, your labels and form-letter sal- 
utations will have proper capitalization. 
To be specific, F leaves the first letter in 
each alphabetic field a capital. Each 
succeeding letter is converted to lower- 
case unless it follows a blank, or a char- 
acter whose ASCII code is less than 65; 
this takes care of punctuation marks. 
One result is that each half of a hyphen- 
ated name will be properly capitalized: 
Smith-Jones. MR&MRS is properly 
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converted to Mr&Mrs, and the name of 
the XYZ Corp. will come out Xyz un- 
less you insert spaces: XYZ Corp. The 
state abbreviation is left as two capital 
letters. 

One more option, Extract, is used to 
copy data into a new file without code 
fields. The primary application is C.C. 
Merger; the extracted file is used for the 
inside address and salutation. The F op- 
tion can be used before E, too. When E 
is invoked you are given the usual op- 
portunity to specify search fields, and 
are then asked for a file name. With a 
single-drive system, you might as well 
be lazy and let the program assign its de- 
fault name of CCMAILEX. If you 
have multiple drives, however, you can 
keep your extract files on a specific 
drive and designate this in the file name. 

C.C. Merger is used to prepare form 
letters with individualized inside ad- 
dresses and salutations. It requires an 
extract address file from C.C. Mailer, 
and a text file prepared with C.C. Writ- 
er. The text file has to have the proper 
embedded command to link with the 
address file, but that's easily accom- 
plished; when preparing the letter, just 
omit the address/salutation section and 
replace it with the command /ms. 
When the program is run, it will print 
the proper inside address (three or four 
lines), skip two lines, and then print a 
salutation in the form "Dear TITLE 
LAST NAME," using the data from 
each extract record in turn. Note that 
suffixes such as Jr. or III will not appear 
in the salutation. 

The /ms command can be stacked 
with other C.C. Writer commands. For 
example, to skip two lines before print- 
ing the inside address, use the combina- 
tion /s2/ms. If you are preparing a se- 
ries of letters with a common salutation 



such as Dear Friend, put the salutation 
in the text file and precede it with /m. 
The individual inside addresses will still 
be printed. 

The mechanics of running C.C. Merg- 
er are pretty simple. Assuming the two 
files are on hand, you just enter "RUN 
CCMERGER." You are prompted for 
the address file name, the text file name, 
and then the program takes off on its 
own. (By the way, that prompting order 
is the reverse of what the manual 
claims.) 

File chaining is not supported by 
C.C. Merger, so you'd better not write 
anything like a 20-page form letter. If 
you must, you could take the manual's 
suggestion and run just the first page 
under C.C. Merger. Also, at this time 
the program will not allow you to insert 
a variable field in the middle of a letter 
to pick up a last name for personalizing. 
Bill Dye of Trans Tek says that the logic 
is all there, but he has not implemented 
this feature in order to keep a rein on 
the size of the package. 

He also advises that C.C. Mailer 
owners insert LW=0: at the beginning 
of program line 13 10 in order to proper- 
ly handle the case of a blank Title field. 

The two programs work well with 
each other and with C.C. Writer. The 
documentation accompanying my re- 
view copies had a few rough spots, 
mostly the result Of the programs' rapid 
evolution. Bill Dye has a record of sup- 
porting his products, though, and I'm 
happy to report that recent supplements 
to the manual have cleared up the ear- 
lier problems; there should be no dif- 
ficulty with material being shipped 
now. If you are involved with an organ- 
ization that has to produce bulk mail- 
ings, the Trans Tek package can be of 
great assistance. ■ 
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Chatterbox 

VoiceTech Industries 
P.O. Box 499 
Fort Hamilton Station 
Brooklyn, NY 11209 
$24.95 

How to Make Your Computer 
Talk for Under $50 

by Earl Savage 



If you have a little electronics know- 
how, the inexpensive VoiceTech 
method can give your machine the abili- 
ty to talk back to you. 

The manual title, How to Make Your 
Computer Talk for Under $50, de- 
scribes its contents very accurately. 
Even if you purchase every component 
at the local Radio Shack, you can build 
this synthesizer for $49.51 , including an 
edge-card connector and ribbon cable. 

The Manual 

The 38-page manual is well written. It 
contains an explanation of human 
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TRS-80 
MOD III 

48K — 2 Drive 
— DISK III 
TRSDOS & 
Manuals 

$1775 





EXTERNAL FLOPPIES 

for MOD I 

or III 

Fully compatible, 120 day warranty 

80 TK or 2 sided $395 

80TK&2sided $515 



6.3 to 38 MEG 

Winchester External Hard 
Disk III beginning at 

$1899 

Optional HD III: 

9.5 meg $2099 

19 meg 2799 

2 x 6.3 meg 2899 

2x9.5 meg 3199 

2 x 19 meg 4399 



CHECK THESE GREAT BUYS OH OTHER PRODUCTS: 


Epson MX-80 w/graphtrax 


$475.00 


C.ITOH & Diablo Ribbons 


5.95 


Novation Cat Modem 


175.00 


Drive Extender Cable 


12.00 


Epson MX-80 ft 


575.00 


DC Hayes Smart Modem 


259.00 


Novation D Cat Modem 


199.00 


Head Cleaning Kit 5 V* " 


14.95 


Epson MX-100 


750.00 


DC Hayes Micro Model II 


339.00 


Percom Doubler II 


169.00 


Disk & Other Mysteries Book 


19.95 


MX-80 Ribbons 


12.50 


OKIDATA Microline 80 


359.00 


Percom Data Separator 


29.95 


Basic & Other Mysteries 




MX-100 Ribbons 


30.00 


OKIDATA Microline 82A 


529.00 


Paper 9 Vz x 11 (Fanfold) 


29.95 


Book 


27.50 


Epson Graphtrax 


75.00 


OKIDATA Microline 83A 


799.00 


Paper 14'/, x 11 (Green Bar) 
Verbatim 5V4" Diskettes 


34.95 
26.90 


NEC Ribbons (Min. 6) 
Printer Cable 


5.95 
25.00 


C.ITOH F-10 40 cps 


1.695.00 


OKIDATA Tractor 


75.00 


Maxell 5 "A" Diskettes 


39.00 


LDOS Operating Sys. 


129.00 


Tractor 


200.00 


Lexicon Modem 


125.00 


Nashua 8" Diskettes 


42.95 


DOSPLUS Operating Sys. 


149.00 


HOW OPEH — VR DATA COMPUTER CEHTER 


616 Baltimore Pike, Springfield, 


Pa. (Delaware County) 



DISK III 

SIHGLE DRIVE $599 



MODEL III 
COMMUNICATIONS 



Disk III Dual Drives 
Disk III No Drives 
TRSDOS & Manual 
DOS PLUS & Manual 
LDOS & Manual 



$864.00 

435.00 

21.90 

149.00 

129.00 



2 Sided or 80 Track Drives add $120. ea. 
2 Sided & 80 Track Drives add $240. ea. 



VR-RS232 
$80 

Direct Replacement For 
R.S. RS232, Fully Tested 
& Burned-ln, Easy 
Installation, 120 Day 
Warranty, Programmable 
Pinout, Prototype Area 



D-COH 
$299 

Integral Modem, NEEDS 
NO RS232 — Direct 
Connect, Programmable 
Dialing, AUTO ANSWER/ 
ORIGINATE, Easy 
Installation 



MR 



IF YOU DONT SEE IT ADVERTISED 
CALL US AND ASK FOR IT. 



data 



MasterCard 



VISA 



777 Henderson Boulevard N-6 

Folcrof r, PA I9Q32 1 215 1 161 - 5300 
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Call Toil-Free 

800-345-8102 

ALL VR DATA PRODUCTS CARRY A 120-DAY 
WARRANTY INCLUDING PARTS & LABOR 

Published prices reflect cash discount. All prices are subject 
to change without notice. TRS-80 and TRSDOS are trademarks 
ol Tandy Corp. DISK III is a trademark of VR Data Corp. 
8:30AM-7PM EST. Mon.-Fn.. Sat. 10AM-3PM 
CABLE ■■VRDATA" TELEX 845-124 
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speech and synthesizing methods suffi- 
cient to form a foundation for later 
computer programming. Without get- 
ting too deeply into the complex subject 
of phonemes and allophones, you get 
enough background to make your ini- 
tial efforts useful. 

Phonemes are the constituent sounds 
of a language; allophones are the 
acoustic signals/sounds of the pho- 
nemes. There are about 64 phonemes in 
English and the VoiceTech synthesizer 
uses a group of 64 allophones to cre- 
ate words. 

This part of the manual emphasizes 
that programming speech uses the 
sounds involved — not the letters used to 
spell the words. The available allo- 
phones are listed with illustrations of 
their sounds and hints for their uses. 

Another section of the manual gives 
programs for the Model I, the Model 
III, and two other computers. The pro- 
grams are annotated, and include a 
thorough explanation of their features, 
using examples. 

The manual also contains the parts 
lists and schematics of synthesizers for 
each of the computers it can be used 
with. One synthesizer connects to the 
printer port of the Model III or Model 
I. Another synthesizer connects to the 
expansion port of the Model I. 

If you own a Model I, you can con- 
struct the printer port version; it is 
simpler because it needs no address de- 
coding. Both versions operate identically. 

The Kit 

The contents of the starter kit depends 
upon what version of the synthesizer 
you decide to build. For all versions, 
you get a 3.12 MHz clock for timing 
control and the speech synthesizer inte- 
grated circuit, a 28-pin DIP switch. 

To complete the printer-port version, 
you need 11 capacitors, four resistors, 
one potentiometer, one audio amplifier 
IC, and a speaker; all these components 
are readily available. 

You can tap into your computer for 
the single operating voltage required (5 
volts), or you can follow the manual di- 
rections and use an AC adapter and a 
voltage-regulator IC. 

I found only two typographical er- 
rors in the manual. The data list of 
allophones contains an error (EH2 
should be DH2 in line 52). The other 
is an unmarked capacitor in the sche- 
matic. Fortunately, it's not critical (a 
.lmfd works fine). 



Be advised that the hardware section 
of the VoiceTech manual does not con- 
tain step-by-step directions for con- 
struction. Construction of the voice 



"Be advised. . . 

the hardware section 

of the VoiceTech manual 

does not contain 

step-by-step directions 

for construction. " 



synthesizer is not too difficult. If you 
are new to electronics, find an experi- 
enced friend to give you advice and 
assistance. 

Using the Synthesizer 

With the program keyed in and the 
synthesizer connected, you're ready for 
some serious fun. The synthesizer needs 
no attention beyond turning it on and 
adjusting the volume. You will have 
speech right away because the program 
has a built-in message: "Welcome to 
VoiceTech, my name is Chatterbox." 

When you are tired of hearing that 
message, you can program any words 
you wish. Keep the table of allophones 
handy when you key them in and edit 
them if you don't like the way the word 
comes out. Fortunately, the program 
makes editing easy. 

The VoiceTech program is slow 
handling arrays and doesn't save the al- 



lophones for the words that you gener- 
ated. This program, however, is easy to 
use and understand. The algorithm can 
be easily adapted to your own needs. 

The program generates a single-di- 
mension array of the allophones' ad- 
dresses you used to create your words. 
Just select and enter the allophones; the 
computer does the rest — finds the ad- 
dresses, forms the array, and sends it to 
the synthesizer. You can modify the 
program to save or print out the arrays 
so that you can use the same words 
again later. 

You can even add sound to your own 
programs — original or your modifica- 
tions of existing programs. Just put the 
address arrays in your program and 
send them through a short talk sub- 
routine when you want the computer 
to speak. 

Summary 

VoiceTech Industries has a good 
thing here. Where else can you get a 
quality synthesizer for such a small out- 
lay of money and effort? Off-the-shelf 
synthesizers have been beyond the reach 
of most of us. 

If you happen to be all thumbs and 
have no electronics assistant, write to 
VoiceTech. They have announced a 
completely assembled version. The 
price is unknown at this writing, but I'm 
sure it will be less than the current mar- 
ket prices. 

The people at VoiceTech say they are 
working on the other half of synthe- 
sized speech: text to speech. I look for- 
ward to the time when my computer can 
read aloud in plain English what I typed 
into it!H 
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Trashman 

Prosoft Software 

P.O. Box 839 

N. Hollywood, CA 91603 



Model I, II, or III 
$39.95 

by Richard C. McGarvey 



Trashman is a small, invisible ma- 
chine-language utility for the Model 
I and III that increases program speed 



by cleaning up vacant, or trash, string 
locations. It uses only 578 bytes of 
memory, plus two bytes for each active 
string, and it reduces string compression 
time by 95 percent or more. 

Trashman to the Rescue 

Trashman oversees Basic programs 
and does a high-speed clean-up routine 
when needed. The result is that trash 
collection delays are reduced by 95 per- 
cent or better. Obviously, there will not 
be a noticeable increase in the speed of a 
program with relatively few strings. But 
in those programs that use hundreds of 
strings and especially string arrays, the 
time saved is outstanding. Table 1 
shows the sample savings listed in the 
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OMNITERM 

The ULTIMATE TRS-80 
Terminal Package 

What is OMNITERM? 

OMNITERM is a professional communications 
package for the TRS-80that allows you to easily 
communicate and transfer files or programs 
with almost any other computer. We've never 
found a computer that OMNITERM can't work 
with. It's a complete package because it in- 
cludes not only the terminal program itself, but 
also conversion utilities, a text editor, special 
configuration files, serious documentation and 
serious support. 

Why do I need it? 
You need OMNITERM if you need to communicate 
efficiently with many different computers, or if 
you want to customize your TRS-80 for use with 
one particular computer. You need OMNITERM to 
SOLVE your communications problems once and 
for all. 

What do I get? 
The OMNITERM package includes the OMNITERM 
terminal program, four conversion utilities, a 
text editor, and setting files for use with popular 
computers such as CompuServe, the Source, 
and Dow Jones —just as samples of what you 
can do for the computer you want to work with. 
The package includes six programs, seven data 
files, and real documentation: a 76-page manual 
that has been called "the best in the industry." And 
OMNITERM comes with real user support. We 
can be reached via CompuServe, Source, phone, 
or mail to promptly answer your questions 
about using OMNITERM. 

What do I need to use OMNITERM? 

A Model I or Model III TRS-80, at least 32K of 
memory, one disk, and the RS-232 interface, or 
Microconnection modem. OMNITERM works with 
all ROMs and DOSes, and will work with your 
special keyboard drivers. 

What will it do? 
OMNITERM allows you to translate any char- 
acter going to any device: printer, screen, disk, 
keyboard, or communications line, giving you 
complete control and allowing you to redefine 
the character sets of all devices. It will let you 
transfer data, and run your printer while con- 
nected for a record of everything that happens. 
OMNITERM can reformat your screen so that 80, 
32, or 40 column lines are easy to read and look 
neat on your TRS-80 screen. It even lets you get 
on remote computers with just one keystroke! 
The program lets you send special characters, 
echo characters, count UART errors, configure 
your UART, send True Breaks and use lower 
case. It accepts VIDEOTEX codes, giving you full 
cursor control. It will even let you review text that 
has scrolled off the screen! Best of all, OMNI- 
TERM will save a special file with all your 
changes so you can quickly use OMNITERM for 
any one of many different computers by loading 
the proper file. It's easy to use since it's menu 
driven, and gives you a full status display so 
you can examine and change everything. 
"OMNITERM has my vote as the top TRS-80 
terminal program available today" Kilobaud 
Microcomputing, June 1981, pages 16-19. 
OMNITERM is $95 (plus shipping if COD) Cail for 
24 hour shipment. Manual alone $15, applied 
toward complete package. Visa, M/C, and COD 
accepted. MA residents add 5% tax. Dealer 
inquiries invited. 

Also available OMNITERM for the TRS-80 
Model II and IBM personal computer. 
Contact Lindbergh Systems for details. 

Bindtbergh Systems 

41 Fairhill Road, Holden, MA 01520 
(617) 852-0233 „, 35 

Source TCA818 CompuServe: 70310267 TRS-80 is a '" of Tandy Corp. 



REVIEWS 





Seconds Delay 


Percent 


Number of Strings 


Normal 


Trashman 


Improvement 


250 


11.8 


0.7 


94% 


500 


45.8 


1.6 


96.5% 


1,000 


179.6 


3.5 


98% 


2,000 


713.2 


7.8 


98.9% 



Table J. Trashman Sample Savings 



documentation for Trashman. My tests 
bear out these figures within reasonable 
limits (different TRS-80s run at slightly 
different speeds — my tests were a bit 
faster across the board). 

Trashman is simple to operate and in- 
tegrate, and it is virtually invisible. 
There are some special features to 
Trashman that can be used in normal 
operation. You have the option to deac- 
tivate Trashman at any time by simply 
issuing the command DEFUSR = 
ADDR: PRINT USR (-1). Trashman 
remains inactive until the above line is 
issued again and the last command is 
changed to USR (0). Trashman can also 
be totally removed by issuing the above 
command with USR (-2). Be sure you 
want Trashman gone before you use 
that one because there is no recovery. 

Trashman can cause out-of-string- 
space and out-of-memory error mes- 
sages. These errors come from Basic 
and are the result of specifying too 
much string space for Trashman. Low- 
ering the value of bytes will correct the 
problem. Do not overestimate the 
string-space requirements. Even if you 
don't get an error message, you will not 
be getting optimum performance from 
Trashman. Granted, the compression 



time will still be reduced, but it won't be 
as fast as it could be. A little experi- 
mentation on already-written programs 
and a little planning on new programs 
will help. 

There is one additional error that can 
occur, but will not present an error 
message (at least not a written one). 
Failure to specify a minimum of two 
bytes for each active string will cause 
Trashman to step aside and let normal 
compression occur. The signal for this 
error is the lack of improvement in 
compression time. 

The documentation for Trashman is 
short and simple. This goes for the op- 
eration of Trashman as well. All you 
need is a Basic program that uses a lot 
of strings and has delays as a result of 
cleaning up after those strings. As a 
programmer's tool, Trashman is indis- 
pensable. No need to sit and stare at a 
CRT while the computer is sweeping 
out the cobwebs. Trashman cleans your 
attic before it becomes an all-day job. 
Trashman has little or no visible effect 
on program time when only a few 
strings are used. If, on the other hand, 
string compression delays have been 
plaguing you, it's Trashman to the 
rescue! ■ 
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Options-80 
Box 471 

Concord, MA 01742 
Models I & III 
$125, disk 

by Frederick Goldstein 

Options-80 helps investors analyze 
the profitability of various options 
transactions based on the investors' con- 
victions of how the stock will perform. 
The program was written by Patrick 
N. Everett and Timothy J. Everett, 
who, after achieving success with the 
program, decided to market it. It comes 



with an extensive instruction manual in- 
cluding a book list for supplemental 
reading. This review is based on tests 
performed on a TRS-80 Model I. 

Before discussing this program I will 
review some basic options concepts. A 
call option buyer pays a premium to ac- 
quire the right to call stock away from 
the seller of the call (the option writer) 
at a specified price (the striking price) 
for a limited period of time. A put buy- 
er pays a premium so he can put stock 
to a put seller (or writer) at a specified 
price for a limited period of time. 

Option prices and the price of the un- 
derlying stock usually move in tandem. 
If an underlying stock increases in price, 
the call option probably will too, since 
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• FREE SHIPPING * 

WITHIN CONTINENTAL 48 STATES 




ARE YOU A DREAMER? 

IMAGINE THIS . . . 



TRY 
US! 



You place your order and it arrives when expected. "What do 
you know, they did ship that day!" You open your package and 
SURPRISE, it's what you ordered, not last year's version six times re- 
moved. "Wait a minute, I must have paid full retail to get this kind of 
service. H'mm, that's not it. These prices are among the lowest. What's 
the catch? I've got it! They charged me large shipping and handling charges. 
No, not that either. It says here 'Free shipping within the Continental 48 States 
via UPS ground.' Only the differential is charged for UPS Blue or 1st Class. Now 
I've got it, it's only a dream!!!" 

At Micro Images your dreams become reality! How do we do it? Simple, we tell the truth. If 
the item you order is not in stock — we tell you. If we can't ship that day — we tell you. 
Which version? We tell you. Why are we telling you this? The answer is easy. This is what we 
do best and what separates us from the competition, AND WE WANT YOU TO KNOW. 



LAZYWRITER 

Latest Version Mod l/lll s 1 59.95 
See Below For New Options 



MAXI MANAGER 

Manager with Utility -$119.95 
Maxi Utility Only -$44.95 



SUPERUTILITY + 

Mod l/lll -Limited Time Only- s 46.95 
SEE NEW BOOK BELOW 



MZAL - Ver. 2 
Mdl lor III —$134.95 



MAXI CRAS 

Mdl l/lll —$84.95 

MAIL $84.95 STAT $179.95 



LDOS 51 

MDL I or III — $114.95 



GEAP $42.95 

with Dot Writer - $69.95 



NEW SCRIPT- 7.0- $114.95 

with Mailing Label Opt. -$124.95 
Mailing Label Opt. Only - $27.95 



New Random House Version 

Proofreader by Aspen Mod l/lll $49.00 

Proof-Edit by Aspen Mod l/lll $25.00 

Grammatik by Aspen Mod l/lll $49.00 

SPECIAL. . All 3 FOR ONLY $110.00 



MULTI DOS $74.95 

Specify Mdl III or Mdl I 
Single or Double Density 



DOSPLUS 

Version 3.4S/3.4D/3.4III $119.95 

Version II For Model II $199.95 



UNITERM Mod i/iii $74.95 

UNITERM/80 Mod i/iii $84.95 



MICROSOFT 

Fortran 80 or A.L.D.S $89.95 

Basic Compiler $179.95 

Editor/Assembler + Tape$27.95 Disk$45.95 



HEXSPELL 2 Mod l/lll $94.95 



POSTMAN MASS MAILING SYS. 

Standard Ver. Mod l/lll $118.95 

with Postwriter Mod l/lll $159.95 



DATA-WRITER Mod i/iii$1 14.95 



SFINKS 3.0 Disk Mod l/lll $36.95 
SFINKS Chess Tutor Mod l/lll $17.95 



EDAS 



Mod 
Mod 



4.0. . 
III. 3.5 



, $74.95 
$69.95 



LAZYWRITER OPTIONS 

LAZYDOC $54.95 

LAZY TAB $13.95 

LAZYCALC $27.95 

LAZYDRAW. + DO $18.95 

Tab. Calc. Draw+ Do All 4 $37.95 



BOOKS 



Disk + Other Mysteries - ug . . . . $20.95 

Basic Decoded - ug $27.95 

Custom TRS-80 - ug $27.95 

Basic Faster & Better - ug $27.95 

Mdl 11/16 VisicalC - W.C. Brown $16.95 

Mdl l/lll VisicalC — W.C. Brown $16.95 

Copyriqht Kit $11.95 

Inside Suoerutility Plus $17.95 



LNW-Doubler 5/8 $205.95 



Includes Dosplus 3.4D 



SOOPER SPOOLER -byCompulink 

16K Parallel I/O Unit $334.95 

46K Memory Opt - $149.95 Serial I/O Opt. ■ $89.95 
Complete Unit - All Options $549.95 



LYNX 



auto dial/answer Mod. 



$239.95 



• • PRINTER STANDS* • 





SPACE AGE NO FRILLS 

MX 80 Clear $27.50 MX 80 Clear $13.50 

MX 80 Bronze .... $29.95 MX 80 Bronze .... $15.95 
Microline 82A Space Age Bronze $29.95 



• VISION FRIENDLY • 

Vision Friendly is an eye exercise package for the Model III which 
comes with a Green, Blue, and Amber screen and a short graphic 
program. The package combines color & graphics to relax your 
eyes and ease eye strain. Each screen is a full grade quality 
screen which needs no glue, tape, etc. to attach and can be 
removed without a trace. The three plexiglass screens are more 
than worth the price. We are so sure you will like this package we 
are offering a 10 day money back guarantee. $29 95 



FREEDOM TECHNOLOGY INT'L 

Freedom Option $199.95 

Freedom Plus $399.95 



MICROBUFFER - Practical Peripherals 
Parallel or Serial (Epson) $149.95 



RIBBONS 

ZIP BOX RELOADS Vz Dz. Dz. 

Epson MX 70/80-20 Yds. . . 24.00 42.00 

Epson MX 100-30 Yds 30.00 52.00 

LP-l/ll/IV-16 Yds 18.00 32.00 

Centronics 730/737/739 

and 779-16 Yds 18.00 32.00 

All ZIP BOXES are individually sealed black nylon 
and require no rewinding 

CARTRIDGES Each Dozen 

Epson MX70/80 8.95 90.00 

LP-III/V 6.50 70.00 

Centronic 702/03/04/53 ... 11.00 120.00 
RS DSY WHL II mum strike. . . 6.50 70.00 
Diablo Hytype II Muiti strike. .6.50 70.00 
Qume-300,000 chr Muiti strike 6.50 70.00 
Nee SPIN H-Yield Muiti strike .7.00 75.00 
MICRLNE 80/82A/83A Spl . . N/A 24.00 
Minimum order 3 cartridges - any mix. For smaller 
quantities add $1.50 per order. All our reloads and 
cartridges are manufactured by one of the oldest and 
most reputable ribbon Mfg's. in the country. 
* * * * * QUALITY GUARANTEED* * * * * 



GAMES 



Tape 

Sea Dragon 17.95 

Penetrator 22.45 

Defiance 

Panik 17.95 

Armored Patrol 17.95 

Eliminator 17.95 

Start ighter 22.45 

Forbidden Planet or City 

Strike Force 14.50 

Voyage of Valkyrie 31.95 

Bounceoids or Sp. Castle. 14.50 

The Institute 17.95 

Fortress or Alien Def 14.50 

Any Big 5 Program 14.50 



Disk 

22.45 
22.45 
22.45 
22.45 
22.45 
22.45 
26.95 
34.95 
17.95 
34.95 
17.95 
20.95 
17.95 
17.95 



TO ORDER 

CALL OR 

WRITE TO: 



MICRO IMAGES 

146-03 25th Road 

Flushing, N.Y. 11354 

(212)445-7124 



PHONE HOURS: 

Mon.-Fri. 

10 AM-9 PM 

Sat. 

is? 10AM-5PM 



ORDERING INFORMATION 

No credit cards at these low prices. Add $2.00 on all COD orders. Certified CWMO/COD 
shipped immediately. Please allow 2 weeks for personal checks. For extra fast service 
phone in your COD order. Free shipping within Continental 48 states via UPS ground. For 
Canada, Hawaii, Alaska, applicable shipping and insurance charges apply. Prices subject to 
change without notice. New York State residents please add appropriate sales tax. 
The items listed above are a cross-section of our product line. We carry the full line of most 
companies listed in this ad. plus much more. SEND FOR YOUR FREE CATALOG. 



^See List of Advertisers on Page 435 
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DOUBLE YOUR MONEY 
EVERY MONTH??? HA! 



F HE TOLD YOU YOU COULD DOUBLE YOUR N»£Y 
EVERY HONTH, YOU MOULD CALL US LIARS. 
F HE TOLD YOU YOU COULD. DOUBLE YOUR HONEY 
EVERY THREE HONTHS, YOU WOULD PROBABLY CALL 
US LIARS AGAIN. 

SO HE'LL JUST TELL YOU THAT YOU CAN HAKE hORE 
HONEY IN THE STOCK HARKET THAN YOU ARE HAKING NOH. 
ASTUTE STOCK HARKET INVESTORS HAKE HONEY IN 
THE STOCK HARKET BY BUYING HHEN THE PRICE OF 
STOCK IS LOH AND SELLING HHEN IT IS HIGH. 
EVEN HISER INVESTORS UNDERSTAND THAT NO CAPITAL 
GAINS NEED BE PAID ON STOCK DIVIDENDS UNTIL 
THEY ARE SOLD. 

STOCKDIV ASSISTS THE SHARTEST INVESTOR 
IN REAPING THE BENEFITS OF BOTH PHILOSOPHIES. 
EVEN F YOU KNOH NOTHING ABOUT THE HARKET. 

LET YOUR TRS 80 PAY FOR ITSELF ! ! ! 

STOCKDIV HAS A DATA BANK OF OVER 
1000 COMPANIES THAT HAVE EITHER SPLIT OR PAID 
STOCK DIVIDENDS HORE THAN TWICE SINCE 1977 

YOU PICK THE HONTH, THE HTNIHUH DIVIDENDS, THE 
COHPANY YOU ARE INTERESTED IN, OR THE NUMBER OF 
YEARS YOU HISH TO RESEARCH FOR PAST PERFORHANCES. 
YOU BUY HHEN THE STOCK IS LOW AND SELL WHEN THE 
STOCK IS HIGH 

THE INITIAL PRICE OF STOCKDIV IS $31.95 
ANNUAL UPDATES ARE 19.95 
FULLY TAX DEDUCTABLE 



STOCKDIV IS AVAILABLE ON DISC FOR 
TRS-80 HOD KLEVEL 2), AND HOD m, 24K 
FULLY TAX DEDUCTABLE 



ORDER STOCKDIV FROM 

DIGFORENSICS 

P.O. BOX 1733 

ORANGE PARK, FL 32073 



-403 
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LARGECAPACITYSYSTEMSLARGECAPA 

1 SMALL & (REQ. 32K 2 DISKS) 3 

I LARGE CAPACITY i 

I Ml PROGRAMS M ||, <$ 

P ON TDOS (A MINI DOSPLUS) jjj 

% ACCOUNTS RECEIVABLE {2 

% 5000+ CUSTOMERS % 

« 15000+ TRANSACTIONS » 

a BALANCE FORWARD. 99 TRANSACT CODES X 

B 30-60-90-120 AGED STATEMENTS SHOW > 

< DATE/INV#/DESCRIP/AMT (WITH AGEING). "0 
jj| SELECTIVE FINANCE CHARGES 8 RATES. J* 
jc FAST ENTRY. POSTING W/AUDIT REPORT. — 
5 SUB-ACCTS % OF CREDIT LIMIT. DATE OF j 
H LAST PAYMENT SALES ANALYSIS SPECIAL J/j 
jj> 90 DAY ACCOUNTS. LABELS < 

g $100.00 h 

o GENERAL LEDGER J 

| 400+ ACCOUNTS > 

o 5000+ TRANSACTIONS/MONTH O 

a NO OTHER SYSTEM OFFERS... ™ 

tC f REPORT FLEXIBILITY/CAPACITY > 

2 t DEPARTMENT P & L (UP TO 5) £ 
</> t UNLIMITED ACCOUNT CATAGORIES g 
* t STATEMENT OF CHANGES (ASSETS) 3 
H t PERCENT P&L comparison < 
£ 100% sales MTDvsYTD (fl 
if, or net sales QTDvsYTD Jjj 
£ or total Exd. MTDvsQTD H 

% $150.00 £ 

< TEST SETS $50.00 MANUALS $30.00 V 

$ HOLMAN L>P SERVICE £ 

O 2059 WEST LINCOLN 3.00 S&H g 

O OROVILLE.CA 95965 VISA OR MC m 

g 916-533-5992 COD* 2 

J *COD(CASH. CERTIFIED CK MONEY ORDER) ^ 

</) ,--355 > 

531SASAJ.I0VdV330bVlSW31SASAJ.2 
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the call buyer can purchase the stock at 
a predetermined price. Likewise, if a 
stock drops in price, call prices also 
decline, because the right to purchase 
the stock is less valuable. 

Put prices move in the opposite direc- 
tion to call prices. As a stock declines, 
puts increase in value because the put 
buyer is guaranteed a specific price for 
his shares, regardless of the current 
market value. As stocks rise in price, 
puts decline in value since the right to 
sell stock at a lower price becomes less 
valuable. 

The magic of options is leverage — the 
ability to invest in more shares than you 
could with an outright purchase of 
stocks. A call buyer makes a much 
larger percentage gain than an outright 
investor in stock. While the stock buyer 
must fund the full price of the shares 
either with cash or by borrowing, the 
option buyer funds only the premium, a 
much smaller amount. The percentage 
gain is based on a smaller investment, 
the option premium, rather than the full 
cost of the stock. Commensurate with 
the higher reward is the risk that the op- 
tion will be worthless when it expires. 
You can use many types of investment 
strategies involving the buying and sell- 
ing of stocks and their related put and 
call options, and you can project the 
profitability of these transactions in 
several ways. Since these methods in- 
volve time-consuming calculations, the 
computer comes in handy. 

Options-80 analyzes a broad range of 
option-related trades involving puts and 
calls. The program has two types of 
analytical output, a chart and a table. 
Both present a projected percent gain or 
loss that will be realized if the underly- 
ing common stock increases or de- 
creases by a range of percentages. 

The program is easy to use. It pro- 
vides prompts and menu choices to go 
from one feature to the next. Its error 
trapping is good; the only way to stop 
the program is to hit break or pull out 
the plug. 

The method used for entering option 
prices is nice. A chart is presented that 
looks like the option page of most news- 
papers. The cursor shows you where to 
enter the next price. Unfortunately, if 
you make an error during data entry or 
if you want to change a price you must 
start over. A letter J is entered rather 
than price data to instruct the program 
to jump to the beginning of the chart. 
However, rather than re-entering each 



field, you can hit enter to accept what 
was there before and keep hitting enter 
until you reach the field to be changed. 
Once the data is entered, you can store it. 

In addition to handling dividends, 
the program provides a table of user- 
modifiable parameters. By including 
these factors in the calculations, the 
program attempts to make its projec- 
tions as realistic as possible. 

The first item in the parameter table 
is called a trading adjustment. Most op- 
tions investors know that the prices 
quoted in the newspapers represent ac- 
tual trades rather than the bid or offer. 
They also know that the bid is lower 
than the offer, and if you are a buyer 
you must pay the offer or wait with 
your bid. If you are a seller you will re- 
ceive the bid or wait with your offer. To 
account for the difference between bid 
and offer prices, the program bases its 
calculations on the newspaper prices 
plus or minus the trading adjustment. 
As a result, the program simulates pric- 
ing conditions that would prevail if the 
stock and option trades were placed 
with a broker as a market order. 

A commission adjustment and a com- 
mission rate are two of the other items in 
the parameter table. The commission 
adjustment is used as a per-share charge 
for a transaction and the commission 
rate is a flat percentage of the total trans- 
action cost. These two items are added 
to approximate the brokerage fees. 

Other fields in the parameter table in- 
clude a factor for the cost of money, ex- 
piration date (for the trading month) of 
the option, and the scales to be used 
for plotting both the horizontal and ver- 
tical axes. 

The program calculates a projected 
annualized rate of return on an invest- 
ment as a function of anticipated an- 
nualized percent change in share value. 
After the program is loaded, it asks if 
you want to retrieve data from a file. If 
you do, the program displays the names 
of the stored securities along with the 
respective dates of the data. 

At the completion of the file loading 
(or immediately, if no file is entered) the 
Call Transaction menu is displayed. It 
offers you many choices. If data was 
not loaded from a file, then you should 
select Enter Call Prices. 

After the data is entered, one of the 
analytical choices is made. These are 
buying a call or the underlying shares, 
writing a call versus stock, opening a 
spread, selling a previously purchased 
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call early, closing a write early, or clos- 
ing a spread early. Other choices on the 
menu provide for changing parameters, 
saving or loading data, and the ability 
to go to the Put Option Transaction 
menu. The put menu is similar to the 
call menu in that it includes outright 
purchases, put writing, as well as the 
early reversal of these positions. 

Each of the analytical routines works 
in a similar fashion. The bottom half of 
the screen displays a request to enter a 
maximum of three expiration months 
and strike prices. The system then 
analyzes them and plots a chart for each 
option series and strike price chosen. 

The value of the system lies in its 
ability to graph several profit-and-loss 
curves on the same chart. According to 
the program developers, this feature 
helps you decide if option transactions 
on a security are likely to be profitable, 
as well as which option transaction 



should be the most profitable. 

As mentioned, in addition to the 
graphics displays on the screen, the pro- 
gram provides a numeric table of pro- 
jections. You can only print graphs on 
printers with graphics capabilities. Un- 
fortunately, my machine, the Line 
Printer IV, can't handle graphics, so the 
only printout I could get is the numeric 
table. However, the documentation tells 
you how to modify the code for printers 
with graphics. 

I highly praise this program. It is easy 
to use, and it's hard to make it fail. The 
program has a built-in self-checking/ 
teaching feature. If you hit break and 
then GOTO 3, sample data will be pro- 
jected for testing purposes. 

Option trading can be risky and mar- 
ket prices can be quite volatile. If you 
use this program, you should understand 
its output before making any financial 
commitments based on its data. ■ 



• *• 

Log Electronic Notebook 

KSoft 

318 Lakeside Drive 

Brandon, MS 39042 

$44.95 Model I 32K or 48K, disk 

$49.95 Model III 32K or 48K, disk 

by Michael E. Nadeau 
80 Micro staff 



Log is an interesting cross between a 
data-base manager and a word pro- 
cessor, yet it performs a task neither 
does very well. 

Advertised as an electronic note- 
book, Log lets you store data in an un- 
formatted, page-by-page form. This 
method is good for applications where 
the field method used by most data-base 
programs is too restrictive, but requires 
a more specific form than word proces- 
sors can offer. 

The first use that came to my mind 
was to put notes for some research I had 
done on Log. These notes are on 5-by-9 
index cards and hold excerpts from var- 
ious references. Log seemed ideal for 
this application. And it was. . .almost. 

Those index cards are awkward to 
work with when you sit down to write a 
paper. You end up with a dozen or so 
piles for a dozen or so categories, and 
you often forget some key data, or 
worse, lose it. Log, with its search func- 

^See List of Advertisers on Page 435 



tion, solved the problem, but with a few 
limitations. 

I could copy my data to Log in vir- 
tually the same format as on the cards, 
thanks to a handy tab feature. How- 
ever, Log has no word-wrapping; i.e., if 
a word is too long to fit on a line, it is 
broken off and continued on the next 
line. Most word processors support 
word-wrapping, and it would have 
made my task a little easier. 

You can put up to 1,024 characters 
on a page, adequate for the types of 
chores you would use this program for. 
KSoft has allowed for unlimited back- 
ups of Log, so if you break up the data, 
you can put a large data base on multi- 
ple disks. For my purposes, this was a 
minor nuisance as I had a lot of cards. It 
should cause no problem for most other 
uses, though. 

My biggest complaint is I can't call 
up my notes and write at the same time 
unless I use a typewriter (or buy another 
computer). I could print out the data, 
but that defeats my purpose for using 
the program. The idea of being able to 
call up a reference just by typing in a 
key word is tempting enough to write on 
a typewriter, though. If this program 
could be coresident with a word proces- 
sor, it would be a great boon for any 
writer who uses extensive notes. 

One other complaint is that although 
you don't need a printer to use Log, its 
usefulness diminishes without one. If 
you use it to keep track of appoint- 




If you use a Word 
Processor, you need 

QRAMMATlk 

Beyond Spelling Checking 

Grammatik can find over 15 
different kinds of common errors 
missed by simple spelling 
checkers alone, including 
punctuation and capitalization 
errors, overworked and wordy 
phrases, and many others. Use 
Grammatik with Aspen Software's 
spelling checker Proofreader, 
featuring the Random House 
Dictionary®, or with your current 
spelling checker for a complete 
document proofreading system. 

Read what the experts say: 

"The perfect complement to a 
spelling checker." 

Alan Miller, Interface Age. 5/82 

"A surprisingly fast and easy tool for 
analyzing writing style and 
punctuation." 

Bob Louden, InfoWorld. 12/81 

"Anyone involved with word 
processing in any way is encouraged 
to get this excellent program." 

A. A. Wicks, Computronlcs, 6/82 

"A dynamic tool for comprehensive 
editing beyond spelling corrections." 

Dona Z. Meilach, Interface Age, 5/82 

"A worthy and useful addition to your 
word processing software." 

Stephen Kimmel. Creative Computing, 6/82 

Works with CP/M®, 
IBM-PC®, TRS-80® 

Grammatik $75.00 
Proofreader $50.00 

Order directly from Aspen 
Software, or see your local dealer. 
Specify your computer system 
configuration when ordering! 
Visa, Mastercard accepted. 



Random House is a registered trademark of Random 
House. Inc. Other registered trademarks: CP/M: Digital 
Research -- TRS-80: Tandy Corp. — IBM: IBM -- 
Proofreader, Grammatik: Aspen Software Co. 



Hspen Software Co. 

P.O. Box 339 Tijeras, NM 87059 

(505) 281-1634 ^ gg 
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ments, important dates, or other simple 
tasks suggested by the documentation, a 
printer isn't as necessary. But if you 
keep programming or research notes on 
it, you will eventually want to print out 
all or part as a permanent reference. 

You also need a printer to print out 
the documentation. Log does come 
with a check sheet that lists the com- 
mands, but it doesn't say much on how 
to use them. The documentation, 
though, is easy to follow. This isn't a 
very slick way of handling the matter, 



but it beats some of the Xerox-of-a- 
Xerox abominations I've seen. 

Log is very easy to use, and this is its 
strongest point. If it weren't, many of 
the tasks for which it is intended could 
be done better by pencil and paper. Its 
ease of use makes you want to find 
more and more jobs for it. Finding, ma- 
nipulating (no block moves, though), 
and formatting data require few key- 
strokes, and the commands are easy to 
remember. 

As it comes, Log is ready for transfer 



to a TRSDOS 1.3 or 2.3 disk. Patches 
available for use with NEWDOS Plus, 
LDOS 5.1, DBLDOS, and TRSDOS 
(1/c) cost $10 for the first and $5 for 
each additional one. These patches are 
not provided by KSoft, but by the indi- 
vidual who wrote them, John T. Blair. 
KSoft includes the order sheet with each 
package. 

I like Log, and I'm sure I'll find more 
uses for it. It's a little overpriced, but as 
far as I know, there's nothing else like it 
available. ■ 
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Incoprop Rental Property 
Investment Program 
E-Z Software 
P.O. Box 591 
Novato, CA 94948 
Models I & III, $120 
Model II, $145 

by Leslie E. Sparks 

Although computers are useful tools 
for investment decision analysis, 
there are few programs available to take 
advantage of this ability. Available in- 
vestment software generally deals with 
forecasting stock prices. This is only a 
first step in analyzing an investment. 
The final step, the one that counts, an- 
swers the question, "If everything goes 
as I forecast, will I make money with 
the investment?" And the answer to 
this question requires consideration of 
the time value of money. Incoprop is a 
software package that will help you 
with this last step for analyzing the 
returns from an investment in rental 
real estate. 

The program uses the concept of in- 
ternal rate of return (IRR), also called 
the discounted cash-flow rate of return, 
as the figure of merit for the invest- 
ment. The internal rate of return is the 
discount rate that reduces all the future 
cash flows from the investment to the 
value of the initial investment. In other 
words, if you deposited the initial in- 
vestment in the bank at the interest rate 
equivalent to the internal rate of return, 
you would get the same amount of 
money as you get from the investment. 
You want to select investments with 
high internal rates of return. 

There are a few theoretical and prac- 
tical problems with the internal rate of 
58 • 80 Micro, January 1983 



return method of ranking investments. 
One of the most important is that some 
investments can give two values of the 
internal rate of return. This is especially 
likely when the investment has both 
positive and negative cash flows over its 
life. Generally, the false value is higher 
than the true one. Thus any program 
based on internal rate of return must be 



"The program uses 

the concept of internal 

rate of return (IRR). . . 

as the figure of merit 

for the investment. " 



protected to ensure that the correct 
value of the internal rate of return is 
always returned. 

Unfortunately, it is impossible to de- 
termine, at least from the documenta- 
tion and an examination of the Basic 
code, if Incoprop has the required pro- 
tection. Each sample problem I ran with 
the program returned the correct 
answer. But this doesn't prove that the 
program is protected. I would feel more 
comfortable with the package if this 
problem was explicitly dealt with in the 
documentation. 

The first step in using the program in- 
volves filling out a worksheet. This 
worksheet is where you put your fore- 
cast information on rental and other 
income and expenses for the rental 
property. You are also asked to provide 
estimates of the expected appreciation 
of the property. The worksheet requests 
information on depreciation and your 
income-tax situation. The worksheet is 
a good idea because it forces you to con- 



sider all the necessary information. 
Much time, thought, and care went into 
the development of the worksheet and 
the data requirements for the program. 
An example of this completeness is the 
provision for capital additions to the 
property any year in its life. 

You'll find that it will generally re- 
quire much work to get all the informa- 
tion needed for the worksheet, but if 
you don't want to do the work, you 
should not invest. The only problem I 
have with the worksheet idea is that 
once you have all the necessary infor- 
mation, you still must work to get the 
information in the format necessary for 
the computer. You will have to do some 
tedious calculations to get the data into 
the correct form. The program could 
provide some help in this area. 

Data entry and editing are not handled 
very well. The data is entered one item 
at a time. If you make a mistake and 
don't catch it before you press enter, 
you cannot go back and correct that 
single item. You must go back to the 
beginning and review and correct each 
item. It is a workable method of han- 
dling data entry, but not up to the state 
of the art. 

After all the data is entered, it is 
stored on a disk file and the computa- 
tion program is loaded. You can supply 
your own file name or use the built-in 
default. As soon as the computation 
program is loaded, it asks for the file 
name, loads the file, and completes the 
computations. 

The results of the computations are 
displayed on the CRT and a printout 
option is provided. The results show the 
various cash flows for each year of the 
investment and the internal rate of re- 
turn for the investment under the as- 
sumption that the investment is sold at 
the end of the year. The information is 
complete and is presented in a conven- 
ient form. This printout is the heart of 
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STRIKE FORCc 

STRIKE FORCE is the ultimate challenge In arcade action - bent on 

destroying your concepts about game software! Skill, cunning and 

lightning fast response and a keen sense of strategy are not just 

important -they're imperative to your life and the lives of millions 

of city dwellers! 

Armed with rapid-fire missiles, long range radar and incendiary star-shells 

you'll need breathless speed , just to survive. 

STRIKE FORCE, stretching your skills and imagination beyond this planet. 

is undoubtedly the fastest and most complex game you will ever see! 

Strike Force is joystick compatible and Includes a 

color booklet. Available as: 

16K TRS Model l/lll cassette 26542 $15.95 

32K TRS Model l/lll protected diskette 26734 $19.95 




ACTuaif !(!$«>• scr«n 

"Penetrator is a state-of-the-art game. You are the sole survivor of a fighter 

squadron whose mission is to make It through four defense rings and 

blow up an illegal cache of neutron bombs. The landscape Is as 

treacherous as your enemies. ..this is where the best feature of Penetrator 

comes in: You make custom landscapes to suit your ability. ..remove 

difficult areas and add or subtract missiles and radar bases. 

"Another good feature is the training mode... The sound Is great... 

Penetrator is a very well done game program and worth the 

asking price."' Review, 60 Micro September 1982. 

Penetrator Is joystick compatible and Includes a 

color booklet. Available as: 

16K TRS Model l/lll, two-cassette pack 26518 $24.95 

32K TRS Model l/lll protected diskette 26710S24.95 



5&! 



Please add $2 per order for shipping, foreign orders add $6. Residents of AR, CA, KY. MD, NC. TN, please add applicable sales taxes. 
Visa, Mastercard accepted -write In with card no. and expiration date or order by phone (615) 361 3738. 
Dealer oraers only call TOLL FREE (800) 251 5900 -ask for a Melbourne House operator. 



Melbourne House Software inc., De P t.cs. 347 Redwood Drive. Nashvme.TN 37217. 



t TRS Is a trademark ol the Tandy Corporation. 
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A LITTLE 
BIT OF "GREEN" 

GOES A LONG WAY!!! 



FREE 

SHIPPING 

0n a" Pre pa(d 
c «h orders 
rover $ 50 



COMPARE OUR PRICES. . Call (216) 481-1600 



DISKiTJH 

MODEL III DISK UPGRADE 

Features: 

• Uses Micro Main Frame Finest Disk Controller 

• Gold Plated Edge Connectors 

• Switching Power Supply 

• Supports 5" or 8" Drives 

• 40/80 Track Supported 

• Singie/Dual Head Supported 

• Metal Disk Drive Brackets 

• All Hardware and Cables for Two Disk Drives 

• 1 Hour or Less tor Installation 

• 100% Compatible 

• No Soldering Needed 

• 180 Days Warranty on Controller 

DISKIT III W/O Drives S279.00 

DISKIT III W/ONE Tandon 

100-1 40 Track Drive $479.00 

DISKIT III W/TWO Tandon 

100-1 40 Track Drive $699.00 

OEALER INQUIRIES WELCOME 
DISKIT III is a trademark ol MDS 

PRINTERS 

NEW LOWER PRICES 

Epson MX-80 SCALL 

Epson MX-80FT w/Grattrax SCALL 

Epson MX-100 w/Graftrax SCALL 

IDS Prism 80 SCALL 

IDS Prism 132 SCALL 

Okidata Microline 80 SCALL 

Okidata Microline 82A SCALL 

Okidata Microline 83A SCALL 

Okidata Microline 84 SCALL 

Prowriter 8510 SCALL 

Smith Corona TP-1 $629.00 



TRS-80, HEATH, IBM, APPLE, ZENITH 

DISK DRIVES 

AT OR BELOW DEALERS COST! 

TRAXX-Model I & III Complete 

Tandon 40 Track S279.00 

Tandon 80 Track SCALL 

***** SPECIAL ***** 

Tandon 80/80 Track $429.00 

************* 
BARE TANDON 

T100-1 40 Track S209.00 

T100-2 40/40 Track SCALL 

T100-3 80 Track SCALL 

***** SPECIAL ***** 

T100-4 80/80 Track $359.00 

************* 

TRAXX 8 INCH MODELS 

Seaman 77 Track s/s $339.00 

NEW TANDON "THIN LINE" 8 INCH 

848-1 Single Side $399 00 

848-2 Dual Side $499.00 

APPLE Add-On Disk Drive $359.00 



MODEMS 

UDS 103 LP Direct Connect SI 75.00 

UDS 103 JLP AUTO ANS $209.00 

Hayes Micromodem II (APPLE) $299 00 

Hayes 100 Model (S-100) $325 00 

Hayes Smart Modem (RS-232) $249.00 

MICROBUFFER 

MBP-16K Parallel $149.00 

MBS-8K Serial S149 00 

INTERFACE CARDS 

8141 (RS-232) S75.00 

8150 (2K Butter RS-232) S150 00 

8161 (IEEE 488) $55.00 

8131 (Apple Card) $85 00 

8230 (Apple Cable) $25.00 

8220 (TRS-80 Cable) $25 00 



DISKETTES 

PARAGON MAGNETICS GOLD. Soft-Sectored. 
Single-Sided. Double-Density 5V5 inch diskettes 

with reinforcing HUB-RINGS $23.95 

VERBATIM-Soft-Sectored Diskettes 

5'A" IS/DDen (MD525-01) S26.95 

5'/«" 2S/DDen (MD550-01) $39.95 

5'A" 2S/4Den (MD557-01) S51.50 

8" 1S/DDen (FD34-8000) $43 95 

VERBATIM-Hard-Sectored Diskettes 

5'." 15/DDen 10-Sector (MD525-10) $26.95 

5'A" 2S/ODen 10-Sector (MD550-10) S39.95 

5%" 2S/4Den 10-Sector (MD557-10) $51 50 

SUPPLIES 

HUB RING KIT for 5V." disks $10.95 

HUB RING KIT for 8" disks $12.95 

REFILLS (50 Hub Rings) S 5.95 

CLEANING KIT for 5'A" drives $24 95 

5'A" Diskette Case S 3.50 

8" Diskette Case $ 3.95 

5 V File Box for 50 diskettes $24.95 

AVERY TABULABLES 

1.000 3*" x 15/16 S 5.49 

3.000 37? x 15/16 10.95 

5.000 3V, x 15/16 $15.95 

FAN FOLD PAPER 
(Prices FOB S.P ) 

9% x 1 1 18 lb. WHITE 3.000 ct $27 95 

14^x11 18 lb WHITE 3.000 ct $37.95 



BOOKS 

OTHER MYSTERIES 

TRS-80 DISK $19.95 

Microsoft Basic Decoded $24.95 

The Custom TRS-80 $28 95 

Basic Faster & Better $29.95 

The Custom Apple $28.95 

1001 Things To Do With 

Your Personal Computer $10 95 

Choosing A Word Processor $15.95 

CP/M Primer $15.95 

I Speak Basic TRS-80 $12.95 



TRS-80 

Model III w/2 Tandon 48K $179500 

Model III w/1 Tandon 48K $1599 00 

Bom units come with 120 flay warranty Irom MDS 
ano use our MEMORY and DISKIT 

LNW 

LNW-80 Computer $1595.00 

LNW-80-II Computer w/cpm 96K $1995.00 

SYSTEM EXPANSION II S 349.00 

LNDOUBLER 5/8 Board $ 149.00 



SOFTWARE 

TRS-80 Model I & III 

***** SPECIAL ***** 
FREE Floppy Doctor with the purchase of 
any DISKIT III $30.00 VALUE! 

************* 

NEWDOS 80 2.0 $139.95 

DOSPLUS 3.4 Model I $ 89.00 

DOSPLUS 3.3 Model I $ 69.95 

♦NEW* Electric Pencil $79 95 

ELECTRIC WEBSTER 

50.000 Word Spelling Checker $ 79.95 

Correcting Feature $ 59 95 

When purchased together $129.95 

UNITERM Terminal $ 79.95 

UNITERM/80 Terminal $ 89.95 

ACE MAIL for Hayes Smart Modem $ 69.95 

LABELMAKER for MX80 $ 19.50 

AIDS III Data Management $ 49.95 

Maxi Manager $ 89.00 

Floppy Doctor I. Ill $ 24.95 

Inventory t $ 29.95 

Cash Register/80 S 29.95 



TRS-80 * 
141-001 



221-001 
221-002 
221-003 
221-004 
221-006 
221-008 
351-001 
351-500 
351-501 
391-001 
391-002 
431-001 
431-101 
511-003 
021-004 
060-601 
060-604 
060-607 
060-611 
061-066 



GAMES 

SAVE * MOST GAMES AVA 

Introductory 3-Pack 
Rescue. Morloc's and 
Datestones 
Super Nova 
Galaxy Invasion 
Attack Force 
Cosmic Fighter 
Robot Attack 
Stellar Escort 
Scarfman (Mod l/lll) 
Scarfman (color) 
New Bounceoids 
Math-Pak-1 
Math-Pak-2 
Sargon II (Mod. I) 
Sargon II (Mod. Ill) 
Adventure 
Pigskin 

Adventure B1.2&3 
Adventure «4.5&6 
Adventure S7.8&9 
Adventure (M0.11&12 
The Mean Checker 
Machine 



ILABLE 
DISK 



FOR APPLE 
. $49.95 



DISK . 
DISK . 
DISK . 
DISK . 
DISK . 
DISK . 
DISK . 
CASS 
DISK . 
CASS 
CASS 
DISK . 
DISK . 
DISK . 
DISK . 
DISK . 
DISK . 
DISK . 
DISK . 



$17.95 
S1795 
$17.95 
$17.95 
$17.95 
$17.95 
$17.95 
S17.95 
$1995 
$14.95 
$14.95 
$29.95 
$34.95 
$29.95 
$17.95 
$34.95 
S34.95 
$34.95 
$3495 



DISK .. $17.95 




'MICRO DATASWPU6S 



.-459 



22295 6UCLID AVE. 

EUCLID. OHIO 44117 

(216)481-1600 



WE ACCEPT 

• Visa 

• MasterCard 

• CheCKS 

• Money Order 

• COD 


ALL PRICES 

ARE FOR 

MAIL ORDER ONLY 

Prices. Specifications 

and Offerings subject 

to change without 

notice. 


ADD S3 00 FOR 
SHIPPING 
& HANDLING 
$6 00 Extra for 
C OD Orders 
Ohio Residents 
add 6 5% Sales Tax 



REVIEWS 



the analysis and if correctly inter- 
preted, will tell you everything you need 
to know about the profitability of the 
investment. 

The program has a provision for 
handling taxes, a necessity for any in- 
vestment program. The program will 
also help you figure your marginal tax 
rates. This is one of the better features 
of the program, although the program 
does not have the latest tax -law changes 
built in. But the documentation does 
provide a fairly good discussion of the 
impact of the 1981 tax law. They'll soon 
have to revise the discussion to handle 
the 1982 tax increase. 

The printout includes most, but not 
all, of the input data. I wish that the 
printout had all the input data in the 
same format as the worksheet; this 
would make checking for errors in the 
data easier. When you have money on 
the line, you want to be sure that the cal- 
culated results are based on ac- 
curate data. 

The documentation for the program 
is helpful at telling you how to run the 



program. There are several figures 
showing how the screen should look as 
you enter the data. And there are also 
examples of the printout. 

Unfortunately, the documentation 
does a very poor job of telling you how 
to use the program. You are left on your 
own as far as interpreting the results of 
the program. This is a major deficiency 
of the package. The documentation 
should contain a lucid discussion of the 
internal rate of return method, its 
advantages, disadvantages, and all the 
assumptions implicit in its use. (The as- 
sumptions are discussed, but the discus- 
sion lacks structure and completeness.) 
I would prefer to see the documentation 
divided into three or four sections: The 
first section would be an overview of 
what you can expect; the second section 
would show you how to run the pro- 
gram; the third section would show how 
to use the program. It should almost be 
a minicourse on the topic. 

Any fourth section should contain 
examples showing the use of the inter- 
nal rate of return method. The ex- 



amples should concentrate less on 
showing how to run the program and 
more on how to use it. Examples of a 
good investment, a marginal invest- 
ment, and a poor investment should be 
included. The examples should contain 
a complete discussion pointing out what 
makes the various investments good, 
bad, or marginal. With these additions 
the package would be superior. 

The program accomplishes about 90 
percent of the task. It is a useful tool 
that provides information essential for 
making intelligent investment decisions. 
Unfortunately, the missing 10 percent is 
in the areas most obvious to the 
user — data entry and documentation. 
Data entry, though useful, is somewhat 
elementary. The documentation is the 
serious deficiency. It doesn't provide 
nearly enough help at getting the most 
from the program. 

If you purchase the program, be sure 
you get a good book on investment 
analysis so that you can understand 
what the program is doing and what the 
calculated results mean. ■ 



The Information Society as 
Post Industrial Society 

Yoneji Masuda 
World Future Society 
4916 St. Elmo Ave. 
Bethesda, MD 20814 
Softcover, 171 pp. 
$12.50 

by John P. Mello Jr. 
80 Micro staff 

Computopia. What is it? What will it 
be like? When will we know we are 
there? Those are some of the questions 
Japanese futurist Yoneji Masuda sets 
out to answer in The Information 
Society. 

Masuda, a world-reknowned author- 
ity on computers and the future, details 
how the social structure created by the 
Industrial Revolution will be trans- 
formed by the Information Revolution. 

Technology's role during the Indus- 
trial Revolution, Masuda explains, has 
been to reduce physical labor. During 
the new age, it will be to reduce intellec- 
tual labor. 

He proposes that transforming tech- 
nology's role will transform people's 



basic wants. Intellectual creativity will 
be more important than material con- 
sumption. Self-realization will tran- 
scend the demand for durable consumer 
goods. 

The symbol of industrialized soci- 
ety — the factory — will be replaced by a 
new totem — the information utility. 

Coercion will be reduced, Masuda 
maintains. Voluntarism and coopera- 
tion will be important components of 
the new age. 

Sound rosey? 

Many people are aware widespread 
dependence on computers presents an 
awesome potential for social manipula- 
tion. Masuda knows this potential ex- 
ists, but he does little to explain why 
Computopia 1984 won't develop. 

He gives two reasons why his infor- 
mation Fat City won't become a poli- 
tical Greasy Spoon. Neither will calm 
the palpitations of compuphobes. 

Information science, like nuclear 
energy, is ultimate, he contends, ul- 
timate in the sense that it "will bring im- 
measurable benefits to humanity if 
wisely used, but. . .could lead to de- 
struction if used wrongly." 

Why won't computers be used 
"wrongly?" Masuda says because 
"There is only one choice for us — the 



road to Computopia. We cannot allow 
the computer, an ultimate science, to be 
used for the destruction of the spiritual 
life of mankind." But what if we're not 
consulted on the disposition of this ulti- 
mate technology? After all, how many 
of us were consulted on how nuclear 
energy should be used? 

Masuda' s answer to that is tied to his 
second reason for optimism. Changing 
the industrial society to the information 
society will be spearheaded by citizen 
action. This action will be "goal- 
oriented," he contends. He suggests 
those goals won't result in a repressive 
society. 

Although Masuda's view of the fu- 
ture is stimulating, his prose is not. 
Much of his material becomes repeti- 
tious and appears vague. His writing 
style is a cross between a bureaucratic 
white paper and a report from a local 
school committee. 

The book contains numerous charts, 
which are helpful in understanding Ma- 
suda's views. A glossary and index are 
also valuable accessories to the book. 

Despite its assets, however, The In- 
formation Society remains one of those 
books you're constantly thumbing to 
the end to find out how many pages are 
left to read.B 

80 Micro, January 1983 • 61 



REVIEWS 



• • • 



Black Death 

Krell Educational Game Pak 

Krell Software 

21 Millbrook Drive 

Stony Brook, NY 11790 

$39.95 

by Eric Maloney 
80 Micro staff 

Never mind the spelling errors and 
sloppy screen displays. Ignore the 
wretched graphics and lethargic pace. 
Black Death is a gem of garage-punk 
programming. 

This is the kind of software Stephen 
King might write after eating a spoiled 
tuna-fish sandwich. It's a Blue Oyster 
Cult album played backwards, Gahan 
Wilson on a full moon, Hunter Thomp- 
son through a quart of fermented cactus 
juice. 

Most delightfully of all, Black Death 
is part of what the manufacturer calls 



an education package. Either the people 
at Krell have a weird sense of humor, or 
some very strange ideas on education. 

Black Death places you in a city — 
represented by a 10-by-13 grid — struck 
by the plague. Your job is to save as 
many people as possible, through either 
inoculation or quarantine. You start 
with 130 zeros, which change to l's as 
your city's residents become visibly ill. 
The numbers increase with the stages of 
the disease, until they finally turn into 
cute little graveyard crosses. 

People get sick only if they're next to 
someone who has already been afflict- 
ed. Thus, your best bet is to build a wall 
of inoculation around the outbreaks. 
But since plague diseases tend to be 
highly contagious, this strategy doesn't 
always work. It's wise to have the char- 
nel wagons lined up and ready to go. 

The game doesn't reach its potential 
until you play with someone else (as 
many as six can join the fun). Each per- 
son gets his own rat-infested city, and 
whoever emerges with the fewest 
deaths — uh — wins. The game can get 



pretty exciting as you come down the 
stretch, matching your opponent corpse 
for corpse, looking for that one key in- 
oculation that will bring you victory. 

Black Death could be enhanced con- 
siderably with some imaginative sound 
routines and graphics. For instance, 
each time you lose a few victims, a 
death wagon could roll across the 
screen, accompanied by the sound of 
clopping horses and wailing mothers. 
Perhaps the game could end with a 
church bell tolling for the deceased. A 
few such touches would do much to liv- 
en up the program. 

You have to buy the Krell Education 
Game Pak to get Black Death. This is 
unfortunate, because the other six 
games are awesomely mediocre. They're 
poorly designed, and full of spelling er- 
rors and typos. The entire package 
looks like it was thrown together in the 
back seat of a taxi, without so much as a 
cursory proofreading. Such shoddy 
merchandise does not speak well of a 
company that also sells a College Board 
SAT Prep Series. 



DAISY WHEEL PRINTERS 



SMITH CORONA TPI 
COMRITER CR-1 
DAISYWRITER 2000 
DIABLO 620/630 KSR 
QUME SPRINT 9 KSR 



COMPUTER SYSTEMS.. 



EPSON HX-20 
TRS-80 MODEL III 



$SS CALL FOR PRICE $$$ 



You won't believe it!!! 



Rainbow 



P & P CORPORATION 

PO BOX 362 • HADDONFIELD. NJ 08033 



^264 



800-257-61 70 in NJ call 609-428-3900 



COLOR COMPUTER SOFTWARE 

BASIC AID 



HELP FOR THE 
BASIC PROGRAMMER 



AI last, the development tools you need 1 All available instantly at power-up 

MERGE COMMAND: Insert programs stored on cassette into your Basic program You 
can even assign new line numbers to the file you read in Create your own tape library 1 

MOVE COMMAND: Lets you renumber any part o\ your Basic program GOTO s 
GOSUB's. etc automatically changed. 

AUTOMATIC LINE NUMBERING: You'll love this Never type m another line number 

PLUS 45 common Basic commands available as single key Control characters Or 
change ANY OR ALL keys to your own specifications 1 Comes with convenient, easy to re- 
move, plastic keyboard overlay. All of this in a convenient ROM cartridge that uses almost 
none of your valuable memory CARTRIDGE $34 95 

COLORCOM/E SMART TERMINAL PROGRAM 

We didn't wait forthe competition to catch up with us 1 We ve added even more features lo 
COLORCOM/E. our superb Smart Terminal program 



Complete upload & download support 
On line cassette reads & writes 
Automatic capture of files 
Pre-enter data before calling 



Send all 127 ASCII characters 
Word mode eliminates split words 
Off line AND on line scrolling 
Selectable RS232 parameters 



We've got the best cassette and upload/download support available And you can con- 
veniently print any portion of the received buffer you want NOW ON DISK 1 Reads and 
writes files from disk Same great features plus more 
DISK OR CARTRIDGE $49 95 



EDITOR ASSEMBLER DEBUGGER 



*6 



95 



CCEAD: This 8K Basic Program supports cassette files, has full cursor control, line 
insertion/ deletion, and much more Two pass assembler supports full 6809 instruction 
set & addressing modes, lists to screen or printer Debugger allows memory examine 
/modify, program execution. If not delighted return within 2 weeks for a full refund. You 
get fully commented Basic source & complete instructions Requires Ext Basic & 16K 
CASSETTE $6 95 

STRIPPER: Three valuable commands: (1 ) Delete Remarks: (2) Pack Lines: (3) Delete 
Spaces Fully automatic, is not fooled by GOTO's. GOSUB's. etc Your programs will run 
faster and take up much less memory CASSETTE $7 95 

CUSTOM CARTRIDGES: Put YOUR Basic program into a convenient ROM Cartridge 
Runs instantly at power-up Use for Ad displays, schools, etc Call or write for info 



Send check, money order. 

or Visa/MC Number: 

Include $1 for postage and 

handling: Visa/MC: Phone 

for fast service 




PO Box 10234 
Austin, Texas 78766 
(512)837-4665 
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But Black Death is another story. Go 
play a few rounds with your 8-year-old 
sister, and then take her to see Night of 
the Living Dead. She'll never be 
the same. ■ 



Tiny Compiler 
Aardvark-80 
2352 S. Commerce 
Walled Lake, MI 48088 
Color Computer, 16K 
$24.95, tape or disk 



by Scott L. Norman 



Aardvark-80's Tiny Compiler is an 
attempt to give Color Computer 
owners a taste of high-speed compiled 
languages. It is written in Extended Col- 
or Basic and accepts a subset of the 
same language as source code. The ma- 



chine-language object code can be exe- 
cuted immediately or saved and run at a 
later time. Options available at compil- 
ation time let you control the location 
of the object code in memory, which 
can be helpful when interfacing to other 
program segments. 

The documentation is the strongest 
point of the entire package. It goes to 
unusual lengths to discuss the function 
of each block of program statements, 
and includes a listing of the entire com- 
piler — nearly illegible, unfortunately! 

Operation is fairly simple. After en- 
tering a PCLEAR1 command to free 
the maximum amount of memory, load 
the compiler and type in your source- 
code statements. Since the compiler 
uses line numbers 8000 and above, 
make a practice of including the line 
7999 END in all source code. This 
allows you to test the code under the 
Basic interpreter without running into 
the compiler section. As a practical 
matter, I found it simplest to incor- 
porate this line into my working copy of 
the compiler. 



As received, the compiler limits the 
source code to 50 lines. The manual in- 
dicates the changes needed to increase 
this, however. Once the source code is 



"The documentation 

is the strongest point 

of the entire package. s 



entered, it can be run and debugged just 
like any other Basic program. Then it is 
time to compile. 

The compiler is invoked with the 
command RUN 9000. You are asked to 
supply starting addresses for the object 
code and the variable table (which 
should be at least 2K higher). How do 
you choose them? Well, the program 
displays the highest address used by the 
Basic code, and the manual advises you 



NEW PRINTERS ADDED! FIND YOURS BELOW. 



GoodT^" 00 * 



RIBBON SALE 



EXACT REPLACEMENTS, LONG-LIFE, HEAVY INKING 



RADIO SHACK-CENTRONICS-EPSON-ANADEX-BASE 2HEWLETT PACKARD-MALIBU-IBM-NEC-C.ITOH-IDS 



PRINTER 

MAKE, MODEL NUMBER 

(Contact us if your printer is 
not listed. We can probably 
RELOAD your old cartridges.) 



ANADEX 9000 Series 

BASE 2 
CENTRONICS 7 -MEG 

7027703/704/753 
HP-MALIBU 26082631 

RADIO SHACK 
DAISY WHEEL II 

Carbon Film (26-1419) 

COLORS e^.t'o-n 
Long-Life Fabric (1449) 
LP l-ll-IV 700 Zip-Pack 

(1413)730/737/739/779 
LP HIV (26-1414) 
LP VI-VIII (26-1418) 
LP VII (26-1424) 

EPSON MX 70-80 IBM 
MX 100 

C.ITOH 1550 6510 

mC P*P*' 450/450 

,u " Tlg«i 500S»rl« 

DATA ROYAL 5000 

NEC 8023 Series 

Spinwriter Fabric 
MS Carbon Film 
COLORS 



RIBBON 
SIZE 

Inches 

by 
Yards 



%x30 



1/. . ncNO! EZ 
74 X ^3 LOAO 

9/16x16 



5/16x14 



Inker Loop 



Vi x 20 



% x 1 30 



INSERTS EZ-LOAD™ 

EXACT REPLACEMENTS made in 

our own shop feature Long-Life 

and Heavy Inking. Our instructions: 

DROP IN, NO WINDING! 



$21/3 



$78/12 



$18/3 



$66/12 



$25/6 $48/12 $270/72 



$30/6 $58/12 $324 /72 
$24/3 $47/6 $9 /12 
$13/3 $48/12 



»1OTHftHi«MHg SM/12 



517/3 



$62/12 



$18/3 



$66/12 



$21/3 



$78/12 



S18/3 



$66/12 



$18/3 



$66/12 



$18/3 



$13/3 



$66/12 



$66/12 



$25/6 $48/12 $270/72 



$3l)/6 $58/12 $324/72 



RELOADS 

You SEND your used 
CARTRIDGES to us. We 
RELOAD them for you. 



$10/1 $9ea./2ormore 



$9/1 $8ea./2ormore 



$11/1 $10ea./2ormore 



$20/1 $18ea./2ormore 



$15/3 



$18/3 



$9/1 $8 ea./2 or more 



$9/1 $8 ea./2 or more 



$9/1 $8ea./2ormore 



$9/1 $8 ea./2 or more 



$10/1 $9ea./2ormore 



$9/1 $8ea./2ormore 



$11/1 $10ea./2ormore 



$9/1 $8ea./2ormore 



$9/1 $8ea./2or more 



$8/1 $7 ea./2 or more 



$15/3 



$18/3 



WORRIED ABOUT ORDERING BY MAIL? Relax. We've been in business for many years and can please the 
smallest and largest account. You receive some of the finest ribbons available made of our own exclusive 
IMAGE PLUS + tm fabric and carbon film. Our ribbons fit your printer exactly. COMPARE, but BEWARE! We 
order all our competitor's products and are amazed at what we get. Have you ever received a new fabric 
ribbon you had to unwind and dump out on the table before you could use it? We have. Or. carbon film in- 
serts that had no end-of-ribbon sensor? Or, 7-meg cartridges with only HALF enough ribbon at full retail? 
Our only business is RIBBON manufacturing and distribution. We use the latest state-of-the-art production 
equipment and are blessed with a fine, dedicated staff. We fully guarantee all our products because we make 
them ourselves. You must be completely satisfied, period. Our ribbons are made fresh daily and shipped within 
24 hours. Write for our brochure and newsletter "INK SPOTS". ~Co President 



NEW CARTRIDGES 

(from the various 

manufacturers. Subject 

to availability.') 



$30/2 $87/6 $168/12 



$25/2 $72/6 $140/12 



$18/3 $70/12 $408/72 



$21/3 $82/12 $480/72 



$20/2 $58/6 $112/12 



$25/2 $75/6 $150/12 



$22/2 $66/6 $132/12 
$16/2 $48/6 $96/12 



$18/2 $52/6 $100/12 



• $30/2 * 



SILVER DOLLAR 
WIND to LOAD 

WHY DO WE SELL THESE? 
This is the type ribbon you get if you order 
from our fellow advertisers. We sell them 
for less since we make them ourselves. Do 
you really like the mess and inconvenience of 
unwinding and dumping this type ribbon 
into a wastebasket or out on a newspaper 
and/or winding it into your cartridge? We 
don't know why these are being sold. 
Computers should simplify your life, not 
make it more complex just to save a few 
pennies. You are welcome to order these 
if you cannot afford our EZ-LOAD tm 
INSERTS, RELOADS, or NEW CART- 
RIDGES But BEWARE! You now know how 
to avoid disappointment.One more caution: 
be sure to check the length of any ribbon 
BEFORE you buy it. For instance, an MX-100 
ribbon should be 30 yards long, not 20 as in 
the MX-80. 



$12/3 $44/12 $252/72 



$11/3 $40/12 $228/72 



$12/3 $44/12 $252/72 
$18/3 $66/12 $360/72 



Volumel MODEL II 8" GAME DISCS Volume 2 
Biorhythms. Trap Ugly, Bingo 
Rip Cord, Yacht Sea $25 EACH Towers, Blackjack 
Farkle. Pony & 3 more 



Concentration & 4 more 



SEND CHECK, MONEY ORDER, or COD TO: 

BCCOMPCO 

800 South 17 Box 246 

SUMMERSVILLE, MO 65571 * 152 

(417)932-4196 

WE PAY UPS SHIPPING ON PREPAID ORDERS. PLEASE 

INCLUDE STREET ADDRESS FOR UPS DELIVERY. ADD 

$1.00 FOR POSTAL, APO, FPO, or AK, AS, CM, GU, HI, 

PR, TT, VI, CANADA or MEXICO. 

FOREIGN ADD 10%, U.S. FUNDS. 



sSee List of Advertisers on Page 435 
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to leave about 1.5K free between the 
highest address and the starting address. 
There are also defaults: Since typical 
short source programs will wind up 
below location 12500 (decimal), the 
compiler suggests 14000 for the start ad- 
dress of the object code. Similarly, the 
variable table location defaults to 
16000. 

The video display is misleading con- 
cerning these locations. For one thing, 
you are asked to supply addresses in 
hex, which is unnecessary; also, the var- 
iable table default is listed as 160000. 
Your final choice is whether or not you 
want to compile the program in one lo- 
cation and later move it to another, i.e., 
relocate the code. 

After these three questions have been 
answered, the compiler goes into ac- 
tion. The address corresponding to the 
beginning of each line of source code is 
displayed as compilation proceeds. At 
the end of the process, you receive in- 
formation about the last address occu- 
pied by the object code (necessary for 
subsequently saving the code), and a 



table of transfer addresses for GOTO 
and GOSUB statements. At this point, 
the compiled program can be executed 
by pressing Z. 

If you choose to run such a test, the 
complete variable table will be printed 
following execution. However, you will 
have to recompile before saving the ob- 
ject code. Should you wish to dispense 
with a test run and save the code imme- 
diately after compilation, press the 
enter key instead of Z. This returns you 
to the command mode, and you can ex- 
ecute a SAVEM or CSAVEM using the 
starting address that you supplied and 
the ending and transfer addresses fur- 
nished by the compiler. 

However, major problems arise from 
the extremely limited set of Basic com- 
mands and words that the compiler can 
handle. To begin with, you must use 
fixed-point arithmetic; both variables 
and constants are restricted to positive 
integers, 0-64K. Although the four ele- 
mentary mathematical operations are 
supported, there is no way to compile a 
program containing exponentiation, 



trigonometric functions, INT, and so 
forth. The syntax of allowed commands 
is also extremely quirky. For example, 
the following versions of a For state- 
ment are legitimate (A and B are vari- 
ables, nnn is a constant): 

FOR I = A TO B 

FOR I = A TO B STEP nnn 

FOR I = nnn TO B 

Note that you cannot use constants 
for both upper and lower limits, and 
you cannot use a variable for the step 
size. Even worse, you do not have the 
freedom to write a statement like FOR I 
= B TO nnn; the constant can only be 
the lower limit, as in the third example 
above. 

There are many other examples. A 
statement like A = B - 125 is permitted, 
but A = 125 - B is not! Only one math- 
ematical operation is allowed in any 
given statement, although you can have 
multiple statements per line. Dimen- 
sioned variables cannot be used as 
divisors or subscripts. Because of the 



U 



My brand of personal service 
makes Corvus the best mass- 
storage system you can buy. ' ' 



A system is only as good as 
the company you buy it from or 
the quality of its service. When 
you buy a Corvus system from 
me, I guarantee that quality. I do 
it in the only way possible . . . with 
my brand of personal service. 
That's what makes Corvus the 
best brand on the market. Ask 
our customers. They know 
Corvus. And they know my 
work. ' ' 



man 




Corvus connects with: 

* Corvus Concept 

* Omninet/Constellation 

* TRS80 

* Apple 

* IBM 

* Xerox 

* Zenith 

* Commodore 

* S-100 

* LSI-11 

ARM disc subsystem also available 
Specializing in N.E. Corridor 



(212) 236-3173 



LAWRENCE S. EPSTEIN ASSOCIATES 

1669 59 Street, Brooklyn, NY 11204 

^ telex 238-790 (NYK) 
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fixed-point arithmetic, strict limits must 
be placed on the size of numbers in mul- 
tiplication and division operations. 

The result of these shortcomings is 
that the Tiny Compiler Basic cannot be 
used for any program involving serious 
computation. What is it good for? My 
first thoughts were that it could be used 
to write fast sorting or graphics 
routines. After all, it does support 
PEEKs and POKEs, and the limits it 
places on numerical quantities should 
not interfere with the computation of 
video memory locations. Any such ef- 
forts must contend with a major 
stumbling block, however: There are no 
Input or Read statements. In other 
words, there is absolutely no convenient 
way to get data into any program that is 
to be compiled by this product. There 
are DEFUSR and USR statements, but 
it seems unreasonable to require Basic 
users to use these (or a series of PEEKs) 
just to scan the keyboard. 

Tiny Compiler has to contend with 
the fact that it must coexist in memory 
with the Color Basic ROMs and the 
source code, and therefore can't include 
every conceivable feature. Other Color 
Computer language packages have the 
same problem. 

Any compiler unable to handle the 
most fundamental I/O operations is of 
value only as the basis for further do-it- 
yourself work, at best. There comes a 
time when any advantage in program 
speed just isn't worth it. ■ 



• ••• 

The Grafyx Solution 
Micro-Labs Inc. 
902 Pinecrest Drive 
Richardson, TX 75080 
Model III 
$299.95 

by Harley Dyk 

The Grafyx Solution consists of a 4- 
by-5-inch circuit board that can be 
installed in a 16K (or more) Model III in 
about an hour. The complete installa- 
tion consists of taking two ICs from 
your CPU board, plugging the Grafyx 
Solution board into these sockets, and 
placing the two ICs from the CPU 
board in the Grafyx Solution board. 
Next, you connect a 14-pin connector 
and nine micro-clips, and cut one trace 

sSee List ol Advertisers on Page 435 



• ••• BEST BUY ON DISKS •*•* 

BASF has taken one of the best disks and made it even better. The quality is so good that BASF 
guarantees each disk for not one year, not five years, but for LI FE. If anything ever goes wrong you 
can return it to us or to BASF and it will be replaced at no charge. 

BASF's FlexyDisk is cut from the finest, prestressed polyester, and the oxide coating is of the 
superior quality and smoothness you have come to expect from the inventor of magnetic tape. 
Each disk is burnished toeliminate drag and any potential dynamic stresses. And, to insure ultimate 
surface smoothness and hardness, BASF applies a special surface treatment to each FlexyDisk. 
This treatment greatly diminishes wear to the FlexyDisk and its drive's in-contact head. 

Can you believe MAJOR brand name, LIFETIME guarantee, FAST shipment and at these prices. 

Th« following comi in ipscial Computer Stack |ucki|ln| 

35/40 Track Double Density 2 sides $29.95 

77/80 Track Double Density 1 side $25.95 

77/80 Track Double Density 2 sides $29.95 



35/40 Track Single Density 1 side $1 9.95 

35/40 Track Double Density 1 side $21 .95 

35/40 Track Double Density Flippy $29.95 



All of the above come in Boxes of 10 with BASF labels, hub rings and Tyvek sleeves. All 
disks have one write protect notch and one read hole, except the Flippy^ which have two. 

Disk Savers (vinyl sleeves) 20 for $6.00 

Colored Disk box (holds 1 disks) $2.95@ 

5 Colored Disk boxes (red, blue, green, yellow, and brown asst. colors) $1 4.50 



E BASIC 



ZDOS 



There are five major Dos's on the market all have 
there good points. Some folks like one, some like 
another, but every single reviewer has said that 
MULTIDOS had the BEST BASIC. Some would 
stop here, but not Vernon Hestor. He now brings us 
EBASIC, a new innovative state of the art basic. It 
makes Graphics and Sound EASY. This will give 
the basic programer more power than ever! Here 
are some of the new basic commands: print (a.b), 
input (a,b), line input (a,b), prints, call, sort, labeling, 
array read, array let, cound, shape, circles, cubes . . 
All of this and you still have over 38K for your basic 
programs. EBASIC is only $29.95 for MultiDos 
owners 



Z Dos the Dos for the person who does not 
want to spend a hundred dollars or more for an 
improvement over TRS-DOS. For only $39.95 
you will double your fun. For only $39.95 you 
can get what reviewers in three different mag- 
azines said was the BEST BASIC for the TRS- 
80. 
MULTI DOS $99.95 



SUPERD0S 



MULTIDOS 



If you are using TRS-DOS, on the model III, you can 
now take out some of its biggest drawbacks. 
SUPERDOS will make a few automatic zaps to 
your copy of TRSDOS and it will boot up instantly! it 
will give you error messages in English. It has a 
short directory, and on the long directory it will 
pause to give you a chance to read the screen. 
Only $19.95 



MULTIDOS got bigger and better. New EASY ZAP, 
New TAPE/CMD, and the New DISKDRIVE TIMER. 
All of this and its still the cheapest full Dos 

going $99.95 

Buy MultiDos at the list price of $99.95 and you can take 20% oil of any or all ef the following 

E Basic $29.95 Super Directory $39.95 Aerocomp Doubler $1 49.00 



COLOR COMPUTER 



STARFIGHTER 

Still our favorite game . . Based on the arcade 
game Defender"" it has outstanding graphics, 
and sound routines. 
Tape $19.95 Disk $24.95 

PACDROIDS 

A great new version of the Pacman '" game. 
Has many interesting new features. You have 
mines and can even shoot the droids. 
Tape $19.95 

PHANTOM SLAYER 

New game from Med Systems you must chase 
the phantoms and kill them with your laser 
Tape $19.95 



KEYS OF THE WIZARD 

A great new adventure game from Spectral 
Software $19.95 

ASTRO BLAST 

A color Varriant of the space invader game. 
Best by far. Excellent Hi Res graphics and 
great sound. One or two players, all machine 
language and runs in 16K. 
Tape version $24.95 

Madness and the Minotaur 

A classic adventure game for the COCO by 
Spectral Associates $19.95 

KATERPILLAR 

A new game from Tom Mix software based on 
the arcade game Centipeed" $24.95 



COMPUTER SHACK , 

1691 Eason • Pontiac, Michigan 48054 
Info: (313) 673-8700 • Orders: CALL TOLL FREE: (800) 392-8881 

Master Charge and VISA OK. Please add $3.00 for shipping in the U.S.A. - $5.00 for Canada or 

Mexico - Proper postage outside of U.S. - Canada - Mexico. 

Dealers: We are distributors for all items in this ad. Write for our catalog and price list. 
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Start with a Model II floppy system and 
grow into a hard disk. Since all P&T 
CP/M 2 systems are fully compatible, 
you will have no conversion worries. 
Special note: PST hard disk systems 
allow you the user to configure logical 
drive assignments to your specifications. 
Write for more details. 

PrepaidVISA, M/C, orCODorders accepted. 
All prices FOB Goleta and subject to change 
CP/M is a registered trademark ot Digital 
Research. TRS-80 is a trademark of Tandy Corp. 



PICKLES 
& TROUT 

P.O. BOX 1206 



(the second cut is optional — it improves 
the quality of the graphics during screen 
updates). If you put the RF shield back 
on the CPU board, cut the shield and 
bend it to fit over the installed board. 

The installation instructions are very 
detailed and well written. Installation 
requires no soldering. You might ques- 
tion the integrity of the nine micro-clip 
connections, but if you solder the nine 
connections (most of which are to IC 
pins), it makes removing the board 
more tedious. 

The board contains 17 ICs (plus two 
from the CPU board), and several ca- 
pacitors. Six of the ICs are 16K-bit 




Photo 1. The Grafyx Solution Circuit Board 



static memory chips giving 12,288 bytes 
of read/write memory. This 12K of 
memory does not use up any memory 
address space, but is organized into 12 
pages and accesses one page at a time 
using the same scan and address lines 
that normally drive screen memory. 
This is accomplished by bank selecting. 
A test program at the conclusion of in- 
stallation checks to see if all 12,288 
bytes of memory are alive, and if all 
connections have been properly made. 

Features and Use 

The Grafyx Solution gives a resolu- 
tion of 512 by 192, or 98,304 points, any 
of which can be set or reset. This is 16 
times as many points as the stock Model 
III, giving four times the horizontal and 
vertical density. Three other resolutions 
of 256 by 192, 128 by 192, and 128 by 96 
are also possible. 

When you turn on the computer, you 
must enable the hi-res board with a few 
simple commands if using cassette, or 
simply type DO GB48 in TRSDOS on a 
48K system. You can mix hi-res with the 
traditional 128 by 48 graphics and text; 
they exist independently of one another 
and you can clear the IK of regular 
video memory or just the hi-res mem- 
ory. This makes adding labels to graphs 
or mixing graphics and text easier than 
on an Apple computer. 

You can easily mix the four hi-res 
modes in any combination, since in any 
mode you still address the screen using 
0-511 horizontally and 0-191 vertically. 
When plotting lower resolution, the dif- 



GOLETA, CA 93116 T^jTr^fi fy 
(805) 685-4641 1 ROU 1 © 




Photo 2. The Grafyx Solution Circuit Board Installed in the Model III CPU Board 
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ferent coordinates can address the same 
point or overlap other points. Since the 
hi-res picture overlaps (but is indepen- 
dent of) regular graphics and text, the 
hi-res display remains fixed even when 
scrolling graphics and text. 

For the casual programmer, GBasic 
(on disk or tape) provides 14 commands 
that let you use the hi-res board effec- 
tively and easily. It takes only a short 
time to understand the 14 commands. 
GBasic takes over 5K of RAM leaving 
more than 32K in a 48K disk system run- 
ning TRSDOS. Table 1 lists the 14 com- 
mands with a brief description of each. 

An eight-page section of the Grafyx 
Solution's reference manual addresses 
the experienced Assembly-language 
programmer. This section explains how 
to access any of the 14 GBasic com- 
mands with a machine-language call 
and how to load the parameters for the 
commands into registers. 

I've been using the Grafyx Solution 
for three weeks and find GBasic easy to 
use and powerful. 

The disk accompanying the hardware 
contains over 30 files to help you use the 
hardware. Several Basic programs are 
included to quickly demonstrate the hi- 
res graphics by displaying spirals, 
graphs, roses, sunsets, string art, and 
random art. (See Photo 3 and the 
figures.) 

The package also includes several util- 
ity programs. The first utility (the GTest 
program) checks to see if the hardware 
works properly. The SAVLOAD pro- 
gram lets you save any hi-res picture to 
disk or tape as a file and later load it 
back to the screen. 

I wrote a short program that let me 
draw and erase hi-res pictures (using the 
four arrow keys) and then linked it to 
the SAVLOAD program so I could cre- 
ate any design on the screen and save it 
to disk. The fact that the hi-res graphics 
and text were independent was a useful 
feature. As I developed the program I 
could start drawing the picture, get an 
illegal function call for plotting beyond 
511 in the X direction or 191 in the Y 
direction, fix the program, and run it 
again with the hi-res picture on the 
screen the entire time. 

COLM80 is a utility program that lets 
you display 16 lines by 80 characters on 
the Model III screen. The characters are 
software generated and use hi-res for 
display. You can set inverse video in the 
COLM80 mode and the 80-character 
display appears compatible with all ver- 
sions of DOS, EDTASM, and EDAS; 

sSee List of Advertisers on Page 435 



-COMPUTER SHACK- 



***** CHRISTMAS SPECIAL ***** 

We will try to fill all Christmas orders as soon as possible, normally within 24 hours! Call on 
our toll free number and we will tell you if the product is in stock and if we can get it out 
within 24 hours. 

CHIRSTMAS SALE 

If you order two games you get a 1 0% discount on both games you order 3 games you will receive a 
15% discount and lour or more games you will receive 20% off on ell four games. You must ask for 
this discount when the order Is placed. 



JOVIAN 

The latest game from Dunlevy and Frayer. This 
exciting game continues the unique WRAP AROUND 
G RAPH ICS" that they made famous with CYBORG. 
Jovian is a real time space arcade game where you 
battle the alien space stations, space ships and 
space mines. Exciting action, combined with arcade 
quality sound make this a best seller. . . (19.85/24.05) 

CYBORG 

This is the biggest blockbuster to come along since the first BIG 
FIVE games hit the market. A real TRS-80 Classic. The first gamef or 
the TRS-80 that features WRAP AROUND QRAPHICS". This exciting 
game occurs in a interstellar space station. This game features 
fantastic graphics that are superfast and move smoothly in all FOUR 
directions. Most games move from left to right but Cyborg takes the 
action up, down and left and right. CYBORG rated #1 three months in 
a row by our arcade experts (10.05/24.05) 



ARACHNID PLUS 

Three great arcade games from Computer Shack 
this is the best three pack ever put out. Arachnid 
could be sold as a stand alone but we have had 
many requests for a game pac so here it is. A real 
time arcade game, Arachnid. A fast machine lang- 
uage car race (like Turbo") game. And, a great 
strategy game Warzone ($10.95/24.05) 




JANUARY TOP TEN 



1.) CYBORG 

2.) DEMON SEED . . 

3.) JOVIAN 

4.) SEA DRAGON... 
5.) PENETRATOR . . 

0.) OUTHOUSE 

7.) ELIMINATOR . . . 
8.) ALIEN DEFENSE . 

0.) PANIK 

10.1 STRIKE FORCE 



. . . Computer Shack 

Trend Software 

. . . Computer Shack 

Adven. Int. 

. . Melbourne House 

Soft Sector 

Adventure Int 

Soft Sector 

Fantastic Software 
. . Melbourne H 



LEAPED 

A great new game by Cedar software. This is 
the best by far, FROGGER" type game available 
for the TRS-80 (15.05/10.05) 

DEMON SEED 

The greatest graphics effects yet in a real time arcade 
game for the TRS-80. Birds of various sizes drop 
down on you. A giant space ship must be destroyed. A 
great game based on the arcade game Phoenix". 
Only ($10.05/824.95) 



CRAZY PAINTER 

A new acrade game from Cornsoft. Different 

form most of the shootem up game. 

Only (1 5.95/1 9.95) 

KAIV 

The second is a series of three games by Med 
Systems is now available. This is similar to 
Dungeon Escape. If you like Dungeon Escape 
you will love KAIV (20.S6729.gB) 

OUTHOUSE 

The irst funny arcade game. You must zap 
assorted bad guys before they destroy or do 
other things to your outhouse. Highly rec- 
ommended (16,95/120,85) 




Below is a partial list of the games we have in stock for 24 hour delivery. If the game you want Is not 
listed here, call as we have many more that are. not listed. We carry all the BIG FIVE games. . . 
Oefenee Commend (15.85/10.05), Stellar Escort {1B.g8/10.05, Oelaxy Inveelon (15.95/10.05, Super Novo 
(15,05/10.05), Meteor Miction II (15.95/10.95). Most of the MED SYSTEM games... Laser Detente 
(16.95/10.05), Institute (10,06/24,06), Dunzhln (28,05/20.06), end Labyrinth (14.96/19.05). From 
CORNSOFT... Bounceolds (15,95/19.96), Crezy Pointer (18,05/10.95), Scarfman (15.95/19.96), and 
Frogger (15.95/19.95). From ADVENTURE INT. . . Armored Petrol (19.05/24.08), Sea Oregon (10.95/24.05) 
Start Ighter ( 1 0.05/24.06) , Eliminator (1 9,96/24.05), and Rear Ouerd (1 9.95/24.95). From SOFT SECTOR . . . 
Cataplllar (15.05/10.95), Outhouae (15.95/19.95), Allan Defenae (15.95/15.95) end Fortreaa (15.95/19.95). 
From FANTASTIC SOFTWARE... Panlk (18,95/24.95), Forbidden City (39.9B) and Forbidden Plenet 
(35.96). From COMPUTER SHACK... Dungeon Etcape (15.95/19.95), Breymoon (15.95/19.96), Baja 
(15.85/19,96), Warzone (15.95/19.95), Cyborg (19.95/24,06), Jovian (19.95/24.95) end Arachnid Plua 
(19.95/24.95) . . . From MELBOURNE HOUSE . . . Panetretor (19.85/24,95), Strike Force (15.95/19.95). 
Write for our free catalog . . . Contains a more complete description of our exciting games 



1691 Eason • Pontiac, Michigan 48054 
Info: (313) 673-8700 • Orders: CALL TOLL FREE (800) 392-8881 

Master Charge and VISA OK. Please add $3.00 for shipping in the U.S.A. - $5.00 for Canada or 

Mexico - Proper postage outside of U.S. - Canada - Mexico. 

Dealers: We are distributors for all items in this ad. Write for our catalog and price list. 
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however, it is not compatible with 
Scripsit. 

The CHAREDIT utility used in 
conjunction with COLM80 allows you 
to create an entirely different character 
set (with up to 96 characters), any 
characters that you can form in a 5-by-9 
matrix. This lets you use the computer 
to display foreign languages as well as 
special characters. To use this utility 
you'll need a disk system. 

In addition to the utilities that come 
with the Grafyx Solution, Micro-Labs 
plans to sell additional software. Cur- 
rently available programs include 
Bizgraph, which plots graphs with data 
generated by Radio Shack's VisiCalc 
package, a Draw program for drawing 
pictures, a Mathplot program for 
graphing functions, and a 3DPLOT 
program. 

The Grafyx Solution is well built, 
beautifully documented, and performs 
as advertised. I find it difficult to believe 
that such a fine product can be pro- 
duced by a small company and that Ra- 
dio Shack hasn't offered such a feature 




Photo 3. Art Created with the Circle, Box, Line, and Fill Commands 



TRS — SO =>IBM ¥>C ! 

TRIX is an 8086 program which 
reads TRS-80 Model III disks 
and writes any -file to an IBM 
PC disk while Operating under 
PC-DOS on an IBM PC. Just put 
your Mod III diskette into an 
PC and copy your -files. 
TRS-80 BASIC programs 
run immediately on the 



IBM 

Many 

will 

PC! 

TRIX on PC DOS Disk S99.95 



BL I NK I NO ¥=■ I ELDS ! 

BLINKS- IT is a BASIC program 
which can easily be merged 
into any TRS-80 Mod I or III 
BASIC program. Using machine 
language it will blink any 
field or combination of fields 
on the TRS-80 screen at any 
rate from 1 to 30 times per 
second. BLINKS- IT on Mod I or 
III disk S49.95 

LAST CHANCE SALE ! CLOSE OUT ! : 

•yOpOOO WORDS ! 

WORD GRINDER is an ASCII dic- 
tionary in alphabetical order 
of 90,000 words. Great for 
proof-readers, word games, 
etc. Over 1 Megabyte of ASCII 
files. Distributed on various 
media. Supplied on 14 Mod I 
Disks or 7 Mod III disks. WORD 
GRINDER. From S125.00 

VISA JOE COMPUTER M/C 
22458 VENTURA BLVD. Ste. E 
WOODLAND HILLS CALIF. 91364 " 256 



&ON — Displays the contents of hi- 
res memory on the screen. 
&OFF — Clears hi-res from the 
screen but retains it in memory. 
&CLS — Clears the hi-res screen and 
memory without affecting standard 
text and graphics. 

&MODE(M), M= 1,2,3, or 
4 — Sets the resolution from a max- 
imum of 512 by 192 to a minimum 
of 128 by 96. 

&PLOT(X,Y,Q— Plots a point at 
point X,Y with color C where 
C = 0, 1 , or 2; clears the point, 1 sets 
it, and 2 complements it (turns to the 
opposite state). 

&POINT(X,Y)— Reads the status 
of point (X,Y) and returns if 
clear, 1 if on. 

&LINE(X1,Y1,X2,Y2,C)— Draws a 
line of color C between points 
(XI ,Y1) and (X2,Y2), color works as 
above, a color of three draws dotted 
lines, lines are drawn at over 2,500 
points/sec (over 5 lines/sec). 
&REV — Complements every point 
(changes it to the opposite state) on 
the screen. 

&LPRINT(P), where P = l,2,3,...,8 
— Sends a copy of the screen (in- 
cluding text) to the printer. It can 
handle 17 different printer models 
including Epson, Radio Shack, 

Table 1. The 



Okidata, and Integral Data Systems 
(printers must have dot-graphics 
capability). 

&BOX(Xl,Yl,X2,Y2,C)— Draws a 
box with opposite corners (X1,Y1) 
and (X2,Y2) with lines of color C. 

&CIRCLE(X,Y,R,C)— Draws a cir- 
cle of radius R with the center at 
(X,Y). R can be up to 511. Parts of 
the circle can go beyond the edge of 
the screen. C is the color of the 
circle — see above. 

&FILL(X,Y,S)— Colors in the shape 
around (X,Y), S = for shading, 
S = 1 for solid. 

&GET(Xl,Yl,X2,Y2,Z°7o(0))— 
Stores the contents of a rectangular 
portion of the screen determined by 
the opposite corners (XI, Yl) and 
(X2,Y2) in a single dimensioned in- 
teger array Z%. 

&PUT(X,Y,Z%(0),F)— Takes the 
contents of integer array Z% and 
places it on the screen starting at 
(X,Y) as the same size rectangle that 
existed when the &GET created the 
array. F = to complement every 
point in the rectangle, F = 1 to place 
the array contents on the screen, 
F = 2 to AND the contents of the ar- 
ray and screen, and F = 3 to OR the 
contents of the array and screen. 

14 GBasic Commands 
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as an option. 

The Grafyx Solution does not work 
with a Model I, and Micro-Labs does 
not plan to offer this option. 

Please bear in mind, however, that 
the Grafyx Solution is not perfect. After 
I had installed the unit horizontal lines 
(which in any resolution must be made 
up of a series of short perfectly horizon- 
tal traces) still appeared to be stepping 
slightly up the screen. But, until 
l,000,000-by-500,000 resolution comes 
along, the Grafyx Solution appears to 
have the highest resolution in an af- 
fordable system. ■ 



• ••• 

SuperScripsit 
Tandy /Radio Shack 
Fort Worth, TX 76102 
Catalog #26-1590 
Models I and III 
$199 

by Jeffrey Hix 



The new features of SuperScripsit are 
exciting and make the Model III a 
serious competitor to the Model II for 
small business applications. The ability 
to preset 10 tab configurations, 10 user 
keys (commonly used phrases up to 127 
characters long), and 20 printer-coded 
commands (each one up to 11 com- 
mands long) is very useful. 

If more than 127 keystrokes are need- 
ed, one user key can call another user 
key. Documents longer than 11,821 
characters can be saved to disk. Super- 
Scripsit scrolls the disk as you edit the 
document and features file-compres- 
sion capabilities. This review was com- 
pressed from 123 sectors to 105 sectors. 
You can scroll through the text up or 
down by word, line, paragraph, screen, 
or page with any of the four arrows. In- 
dividual line sizes are easily set using the 
adjustable tab guide line setting at the 
bottom of the screen. An alignment tab 
for columns is greatly appreciated when 
several numbers are involved. 

The SuperScripsit Reference Manual 
is welcome documentation. You can 
find information by section or by index; 
overall, the documentation is complete 
and informative. 

Lessons 

SuperScripsit includes eight lessons 

sSee List of Advertisers on Page 435 
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We at Computer Shack have decided not to stock many different kinds of printers. There are 
many good printers on the market and all have their good points. But considering everything, 
especially the print quality, we are only going to carry the best four dot matrix printers in the 
marketplace. The C. Itoh is best all around printer on the market. This is the same printer as the 
NEC but with a newer and better set Rom chips. This enables the printer to print at 1 20 cps(MX- 
80 is80cps, the NEC 100cps). It has print quality equal to or better than the MX-80 and three 
different styles of type. Then the PROWRITER has FRICTION FEED at no extra cost, REVERSE 
LINE FEED, true PROPORTIONAL SPACING, excellent dot addressable graphics and a 
replaceable print head. All the C. Itoh printers are guaranteed for 1 full year, that's 9 months 
longer than any other printer on the market. 

But the Epson is very close behing. The Epson series of printers have been the best selling 
printers in American History. There are millions out there. What else can you say for success. 

C. Itoh 1 inch dot matrix List $795.00 CS PRICE $409.95 

C. Itoh 1 5 inch dot matrix List $995.00 CS PRICE $799.95 

Epson MX-80 FT CS PRICE $529.95 

These two buffers will pay for themselves in time saved. Why tie up a $4000 computer waiting for 
the printer to finish the printout? 

Practiacal Peripherals Epson 1 6K buffer only $149.95 

The Compulink SuperSpooler with 16K memory, LED reaout, space compression and more. 
Write for a complete spec sheet. This is the Cadillac of print buffers for only $329.00 

SuperSpooler 62K memory option $139.00 

Compulink Is coming out with i now venion of ths SuporSpoolor. Call lor moro Information, prices 
and availability. 



SPACE AGE 
PRINTER STANDS 

3/16 X 9.375 X 13.5 X 8 PLEXIGLAS 
CLEAR $27.50 COLOR $29.95 




Printer Helper PH . , . 



PH is our new program for the Epson and TEC (Cltoh, NEC, Prowriter, and DMP-80) dot matrix 

printers. 

This is a great little program that will let you, from Dos or basic with 1 keystroke go into the 

emphised, large letters, condensed letters, change type modes, screen dump any graphics, and 

even PRINT STANDARD TRS-80 GRAPHICS BLOCKS IN ANY BASIC PROGRAM even with 

graphtrax plus and the TEC. It also has a special routine that lets you print a real fancy 

program print listing. 

Example: Normally to get the printer to print a emphised condensed letter from Dos you would 

have to go to basic and type in CHR$(27)CHR$(33)CHR$(81 ) on the TEC with PH you just type 

control E control C, two keystrokes. Throw your manual away happiness is here with PRINTER 

HELPER. 

Tape $24.95 Disk $29.95 



ITALICS FOR THETEC. A special program written for the NEC, Cltoh, and DMP-80 printers that allows 
them to print italics in proportional mode. There are three versions available now, one a stand 
alone version, one that will work with Lazy Writer, and one that will work with NewScript. 
Disk Only $29.98 



LazyWriter Proportional printer driver and Italics. This is special program that you add to Lazy 
Writer to Utilize the TEC dot Matrix printers proportional printing mode. This puts spaces between 
each letter to make the print look like it was typeset with a $1 0,000 typesetting machine. Works 
with both the standard Proportional character set it the TEC and with the special italics set 
included with this program $39.95 



PRINTER PAPER 



A special very white super quality paper for your printer. We are selling a special clean edge 
paper that normally sells for up to $75.00 a box. We have a special introductory price of only 
$39.95 a box. The edges on this paper are cut with a Laser beam and they are super smooth 
after you rip the perforations off it looks like a cut sheet of paper. 2600 sheets per box for 
only $39.95 



COMPUTER SHACK 

1691 Eason • Pontiac, Michigan 48054 
Info: (313) 873-8700 • Orders: CALL TOLL FREE (800) 392-8881 

Master Charge and VISA OK. Please add $3.00 for shipping in the U.S.A. - $5.00 for Canada or 

Mexico - Proper postage outside of U.S. - Canada - Mexico. 

Dealers: We are distributors for all items in this ad. Write for our catalog and price list. 
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on four cassettes, a lesson book called 
the Figures Book in a three-ring binder, 
a reference manual, and a reference 
card. Super Scripsit includes two disks 
each for the Model I and III. 

You will need a printer connected to 
your 48K Model III; two disk drives and 
the lowercase printer modification are 
required for Model I use. Model I own- 
ers will find the lesson samples, three 
new printer drivers, and the block- 
moving module on disk. 

Learning SuperScripsit without a cas- 
sette player will be a challenge. The 
Figures Book is only a workbook as it 
was with Scripsit. A contents table is at 
the front. Each lesson lists objectives of 
that lesson. 

The Help menu can be called from 
disk at any time and is useful when 
learning the system. It covers error 
messages, block moves, find, search, 
replace, proofread, header/footer set- 
up, printing, and calling up a docu- 
ment. These modules cannot be used 
more than two at a time without the 
program calling them in from the disk. 
Error messages freeze everything until 
the break key is pressed to acknowledge 
the error. 

Printers 

Seven different printer drivers are in- 
cluded with SuperScripsit. Radio Shack 
Line Printers IV, V, VI, VIII and the 
Daisy Wheel II are specifically compat- 
ible. Drivers for Radio Shack's new 
series of printers are already included 
on the disk. 

I used a Model I and an Epson MX- 
80 with Graftrax Plus. Check your 
owner's manual for DIP-switch set- 
tings. I tried three different parallel- 
printer drivers included with Super- 
Scripsit and decided to use the DW2 
default driver. 

I first loaded and tested the demo 
printing document. Underline and bold 
printing worked as described. Double 
underlining printed as single underlin- 
ing. Bold printing is a dot-by-dot graph- 
ics function. I recommend you use the 
enhanced mode to set up the printer 
codes and that you make all changes by 
these codes as the MX-80 lost the de- 
fault settings made by SuperScripsit 
after the first change. I easily set 20 
printer codes to change print styles and 
try features of the MX-80 with Graftrax 
Plus and made corrections to the demo 
printing document. 

The Radio Shack LP VIII printer has 
a special driver included. Check your 
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owner's manual for DIP-switch set- 
tings. Bold printing slows it down and is 
on a letter-by-letter basis. Superscripts 
and subscripts look good if you have 
allowed the half line extra spacing to 
avoid typing on the line above or below. 
Printer codes enable you to print single 
characters not on the keyboard; see 
your printer manual. If you watch the 
paper carefully, you can mix type styles 



"If you have Scripsit 

now, the decision 

to buy SuperScripsit 

needs careful 

consideration. " 



from an elongated large type to a con- 
densed type. Tab settings can be re- 
duced or expanded as needed. You can 
do some neat things with the LP VIII 
and SuperScripsit. 

Radio Shack LP IV's special print 
driver includes print sizes I've never 
seen before. 

I own a Radio Shack Daisy Wheel II 
printer. This is the printer that the pro- 
grammers had in mind when they de- 
signed SuperScripsit. I can type 10 or 12 
characters per inch or proportional 
type. Fifteen-character-per-inch wheels 
are available; a SuperScripsit print 
driver is still being developed by Radio 
Shack. SuperScripsit displays the actual 
line arrangement. 

When I decided to try a sample docu- 
ment in the three different types, it was 
necessary to restart each time. The tab 
lines and the arrangement of the words 
on the page were adjusted each time. 
Lines marked for centering had to be 
remarked. 

SuperScripsit gives you a choice of 
proportional, monoproportional, or 
nonproportional printing. Proportional 
spacing is slowest because each line is 
inspected by SuperScripsit to ensure 
even margins. Monoproportional spac- 
ing has the same objective, but it inserts 
extra spaces between words only. Non- 
proportional printing looks like a 
manual typewriter was used. Underlin- 
ing includes spaces unless printer codes 
15 and 14 are used. Other printer codes 



can be set for wheel characters not on 
the keyboard. See the Daisy Wheel II 
manual for the codes. 

Other printing features of Super- 
Scripsit include selecting lines per page, 
spacing between words, spacing be- 
tween lines, superscript, subscript, 
underlining, double underlining, bold 
printing, printer pause to change printer 
type wheels, and reverse top of form 
(for newsletter columns). 

SuperScripsit vs. Scripsit 

If you have Scripsit now, the decision 
to buy SuperScripsit needs careful con- 
sideration. What features are not now 
available to you? Scripsit works with 
only 32K memory; SuperScripsit re- 
quires 48K memory. How many disk 
drives are in your system? Scripsit 
works with only one drive because the 
entire program resides in memory; 
SuperScripsit must be in drive because 
of the need to access modules needed to 
perform different functions. 

Are good patching programs such as 
Scriplus from Powersoft workable for 
you? In my case, yes and no; I decided 
that I wanted an easier operation than 
available through Scripsit with Scriplus. 
(It was sufficient while waiting for the 
long-delayed arrival of SuperScripsit, 
however.) I also wanted a proportional 
type driver for my Daisy Wheel II 
printer. 

In order to use Proofreader, a spell- 
ing checker from Aspen Software, it 
was necessary to create a separate 
ASCII file as it could not read the 
SuperScripsit file. Converting my exist- 
ing documents saved on disk by Scripsit 
to a format used by SuperScripsit re- 
quires space for a second disk file cre- 
ated by SuperScripsit. The original disk 
file is not changed. I do not recommend 
trying to convert backwards to Scripsit. 

Superscript seems to be derived from 
the Model II Scripsit cut down into 
modules. Some features such as chain- 
ing (attaching one document file to the 
bottom of the one you are working on), 
single-letter insertion, screen format- 
ting, vertical centering of the entire 
page, nonprinted comment lines and 
multiple block markers, which were in 
Scripsit, are greatly missed. 

Exchanging words or paragraphs 
must be done in a block move. Also, the 
time needed to produce the written 
report or letter can suffer due to the use 
of modules. The @ key is still used as 
the control key, but control D (delete) is 
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the only mutual control. All functions 
are done differently. I wish screen print- 
ing of the system setups were possible. 
Scripsit allows me to type a memo and 
print 10 copies without saving it to disk. 
SuperScripsit requires seven sectors for 
just a mailing label and requires it to be 
saved on disk and killed from TRSDOS 
if I do not wish to save it. 

Bugs 

Overall, SuperScripsit rates good 
marks for features, documentation, util- 
ity, and potential for adding future im- 
provements easily. However, use of the 
header feature throws the page line 
counter off. The footer feature needs 
careful use; after printing the footer, the 
top-of-form feature failed to work. I 
had to add blank lines to the footer to 
roll the paper to the proper position. 
The page-calculating feature did not 
work for me as a footer nor for the 
Radio Shack manager who sold me the 
program. (Fort Worth insisted that it 
works for them just fine.) 

The LS line space indicator failed to 
respond to changes made when reopen- 
ing a document, and it affected print- 
ing. This was corrected using the block 
commands relative to line spacing. Edit- 
ing by blocks could cause problems. I 
had to retype three or four lines from a 
previous draft twice due to errors in 
storage on the disk after block editing. 
Editing in front of a new page marker 
did hang up the computer for an extra 
moment, but it did straighten itself out; 
no loss of copy occurred. 

Converting from SuperScripsit to 
ASCII removed the control-codes in- 
dicator, but not the codes themselves. 

A rare problem was line feed or tab 
spacing missed by either the printer or 
SuperScripsit at the beginning or end of 
a line. Correction was made by going to 
that line and pressing the delete com- 
mand at the end of the line involved. 
Except for a conversion from 10 spaces 
per inch to proportional printing, the 
correction worked. Why it happened, I 
do not know. 

Side Notes 

I do not recommend using Super- 
Scripsit on other disk operating systems 
(DOS). It was specially designed for 
TRSDOS. I have attempted to discuss 
SuperScripsit only including a few com- 
parisons to Scripsit. For a side-by-side 
comparison, see the September 1982 
issue of 80 Micro. ■ 
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Small Business Programs 



NEW! 

MONTHLY BILL SYSTEM 

This is a new program for the business- 
man who wants to send a monthly or 
quarterly bill to the same people every 
billing period. (Landlords, garbage man, 
etc.) The program will send out a bill to 
each person (you can set the frequency, 
monthly, quarterly, etc.). It then has a 
very easy way of inputing your paid 
customers. This will help you to keep 
track of who is past due. Gives you 
printouts of your financial condition at 
any time. 

Disk only $149.95 

We also have a Special program for 
Auto, and Home Insurance agents, Call 
for complete details. 



CHECKING ACCOUNT Mod 1 or lll,48kdisk. . . $39 
Excellent check writing program for small 
businessman or for personal use. Menu oper- 
ated for easy use. Has Screen editor, 99 
catagories or expenses. Sorts on payee, Check 
number, or date. It can print your checks on the 
printer. 

BILLING SYSTEM Mod. I or lll,48kdisk .... $39.00 
A billing system written by a businessman for 
his own use. It is simple, fast and easy to use. 
Has a screen editor for quick error correction. 
Prints out invoices, then will send a monthly bill 
to each customer. It will add interest or carrying 
charges. This is not a complicated accounts 
receivable it is a simple but effective way to 
keep track of who owe's you money for the 
company that doesn't do a lot of credit bus- 
iness. 
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- SUPER DIRECTORY - 

- Automatic density recognition - 

- Automatic track count recognition - 

- Automatic dos recognition - 

- The Best Directory On The Market - 

- By Mark Feidman - 



A great new Directory program with its own operating system written by Vernon Hestor. This one 
program will read any dos as it is delivered by it's publishers except forTandy's new model I double 
density operating system. There is even compatibility between Model I and III. The Model I 
SuperDircan read most Model III disks and the Model III SuperDircan read most Model I disks. 
SuperDir can even read double density 80 track disks. 

Now with version 23 you can SEARCH the catalog by program name, disc number, extension 
(/cmd), or even do a STRING SEARCH (find all occurences of any combination of letters.) It will 
SORT (in seconds) on disc number, program name, remarks, extensions, or catagories. You can 
even add a 25 character description of each program. SPECIAL PRINT ROUTINES for Different 
printers. DISPLAY SCROLLS up and down by line or by the entire screen. 
It has a direct SCREEN EDITOR that almost eliminates typing. SuperDir keeps track of the FREE 
SPACE on your disks. SuperDir is the FASTEST, the EASIEST or use and the ON LY directory able 
to read multiple dos's on the market DISK $39.95 

FROM POWERSOFT FAMILY TREE 

NEW POWERSOFT a great new mail list Excellent family geneology program works 

program by the master programmer Kim on both the Model I or Model III. Along with 

Watt. the normal documentation we send a man- 

CS PRICE ONLY $79.95 ual with over 200 pages of instruction on 

QIIPFR IITII ITV Dl IIC how t0 researcn vour family tree. You can 

OUrcn U I ILIIT rLUO get three different printouts a family tree or 

List Price. . . $75.00 CS PRICE . . . $59.09 a family report of each person, or a birthday 

INSIDE SUPER UTILITY printout. Sort on Birthdays. The Nebraska 

»•> L . ■_ • , , , State Genealogical Society tested our pro- 

Great new book show.ng how to zap and gram and saj(j ^ y m h ££ 

do wild things to your d.ska a valuable data source that may be accessed 

™ .? e o 9 ;« $ an used in different wavs - th e Printouts are 

SPECIAL Get a copy of Super Utility plus excellent." 

and Inside Super Utility for only. . . $74.95 Disk or Tape $29.00 

Z BASIC DOWNLOAD & 

The only compilier we will recommend... BULLETIN BOARD 

Disk and tape List $99.95 

CS PM CE $89 95 " new host s y stem thats just super. 

Disk only List $89.95 It's faster than a bullet and more error 

CS PRICE $79.95 free than a forum. Write for more details. 

Tape version List $79.95 List Price $149.95 

CS PRICE $69.95 CS PRICE $09.95 
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My Micro Speaks Basex, Paul Warme, Hayden Book Com- 
pany Inc., softcover, 164 pp., $9.95. 

"Basex looks like an interesting beginner's language if you 
don't ask too much from it. The only problem is: How many 
beginners are going to be willing to tackle an offbeat language 
like this after learning Basic? Sure a newcomer to computing 
could learn Basex before being introduced to Basic, but that 
doesn't seem likely, given Basic's widespread popularity. One 
would be better off mastering Basic, then learning a higher- 
level language for speed." Microcomputing, November, 
p. 166. 


Basic Betting: The Microcomputer Edge, James Jasper, St. 
Martins Press, New York, 283 pp., softcover, $9.95. 

"Be forwarned: using this book is much more complicated 
than phoning your neighborhood bookie or making an 
educated guess at the Santa Anita racetrack. The programs are 
complex. For example, Jasper lists 22 items which he feels are 
crucial for picking winners in claiming races. By the time bet- 
ters run the programs, they're liable to be blind from poring 
over the Daily Racing Form to get the information." Popular 
Computing , December, p. 156. 


Astro-Blast, Mark Data Products, 23802 Barquilla, Mission 
Viejo, CA 92691, Color Computer, $24.95 tape, $29.95 disk. 
". . .another space game you may ask, well you may be 
right but this one is done with class. . . . The graphics are excel- 
lent, the sound is good, and the action is very good. I found 
myself looking for the coin slot to pay my quarter." Color 
Computer News, October, p. 26. 


TRS-80 Model III Programming and Applications, Larry Joel 
Goldstein, Prentice-Hall, Englewood Cliffs, NJ, softcover, 
$12.95. 

"Goldstein has taken a very simple, hand-holding approach 
to the Model III. He has chosen to assume little or no 
knowledge and he leads the reader carefully through the steps 
of using and programming his Model III. . . . Many people will 
not like this as much as David Lien's hand-holding books. 
Goldstein has a different style. But this is a solid and factual 
book." 80 U.S., November, p. 108. 


The Moses Lightpen, Moses Engineering, Rt. 7, Greenville, 
SC 29609, Color Computer, $40 assembled, $19.95 kit. 

"The Moses Engineering Lightpen is a full function light- 
pen that interfaces with the TRS-80C joystick. A standard 
joystick modified to accept the joystick is included.. . .The 
program sampler includes some games, an event counter, col- 
or detector, and other applications software. All programs are 


Address Factory, Computerware, Box 668, Encinitas, CA 
92024, Color Computer, $17.95 tape, $22.95 disk. 

"If you write many letters or need mailing labels, the Ad- 
dress Factory can save you time and trouble. The program 
handles 55 addresses in a 16K Color Computer or 125 address- 
es in a 32K Color Computer. . . . You won't be able to use the 
Address Factory unless you own a printer. If you select the 
Print mode without a printer on line, the program will hang 
up." Info World, October 25. 


written in Basic. Micro, October, p. 97. 


Katerpillar, Tom Mix Software, 3424 College N.E., Grand 
Rapids, MI 49505, Color Computer, $24.95. 

"Katerpillar is very similar to the original. . . .Personally I 
prefer the joystick action over the roller-ball of the original. 
This factor along with the excellent color graphics and sound 
rates Katerpillar quite favorably with the arcade game. " Color 
Computer News, October, p. 60. 






PrintCC, J. Gary Bender, Box 773, Los Alamos, NM 87544, 
Color Computer, $15. 

"PrintCC is designed to let your Model I or Model III act as 
a printer buffer to your existing parallel printer. Its basic pur- 
pose is to act as a buffer for printed data-like letters. It can 
support the Semi-graphics 4-mode (Set/Reset graphics) and 
screen dumping, force output in all capital letters or 
64-character print width. . . . Would I buy the program? I just 
wish I had known about it before I bought my serial-to- 
parallel converter." 80 U.S., November, p. 111. 


Home Money Minder, Computerware, Box 668, Encinitas, 
CA 92024, Color Computer, $19.95. 

"Home Money Minder is merely an electronic checkbook 
with a few sorting and printing routines built in. ... For 
$19.95, you get a usable program that functions as advertised. 
If you are looking for more features and safeguards, wait until 
you get a disk drive before you devote a lot of time and effort 
to typing your checkbook into your computer." Info World, 
October 25, p. 67. 
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Dot Writer Ver. 1.5 

NOW TRUE PROPORTIONAL PRINT ON YOUR EPSON 



FEATURES: 

• GEAP CHARACTER FONTS 

• CREATE HI-RES DRAWINGS WITH- 
OUT TRS-80 MODIFICATIONS OR 
PROGRAMMING KNOWLEDGE 

. CREATE OR MODIFY FONTS 



PRINT TIME OPTIONS SUCH AS 
MAGNIFY, DOT SPACING CON- 
TROL, REVERSE CHARACTERS, 
UNDERSCORING, TRUE PRO- 
PORTIONAL PRINT 



• WORKS WITH TRS-80 MODELS1&I 

• SUBSCRIPT, INTERMIX FONTS 
AND HI-RES GRAPHICS ON THE 
SAME LINE 

• EXPANDED PRINT AND MORE! 



ACTUAL CHARACTER FONTS/SIZE 



flBCD EF- RBCD abcE 123456 • HBCD abed 123456 
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additional fonts available 
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TRUE PROPORTIONAL PRINT 

They said a couldn't be done' But. you're looking at the true 
proportional print from an Epson HXB0 printer. Of course this text has 
been reduced to fit the ad, but you can't faKe the proportional print 

Now you can have type styles hKe those above and many more. You 
can also have true proportional print, user defined underlining, 
multiple underlining, bold underscoring, expanded characters 
and much more 

The feature packed Dot Hnter program allows you to use 
NewScnpl, or your word processor, to create special print features 
that you won't believe You can mix fonts with hi-res graphics You will 
also be able to mix fonts on a line or within a word Now you can use 
your Epson's true power Also. looK for our new printer capability. The 
Prownter will be supported soon and we don't plan to stop there' 

GEAP - The ultimate in TRS-80 Graphics. GEAP 2.1 - Instant Graphic 
Letters. Create screen graphics easily by magnifying, reversing, multiply- 
ing, rotating, merging and much more. Let GEAP 2.1 create a BASIC 
program to recreate your graphic masterpiece! Numerous expansion 
modules give GEAP 2.1 limitless power: EPSON/OKIDATA/ 
Radio Shack LPV/IV printer block graphics; QuickCursor with 2, speed 
controllable cursors, instant line, rectangle and circle. NewScript inter- 
active expansion module. Much more! There is NO other graphic utility 
on the market that is as powerful, versatile and easy to use as GEAP 2.1. 
GEAP 2.1 $49.95 

DOT WRITER 1.5 - The undisputed leader in High Resolution graphics. 
Numerous special Hi-Res type fonts for your Epson MX 80/100. Create 
your own type fonts or Hi-Res graphics. No hardware or modifications 
needed! Now, true proportional print, underlining, expanded print, and 
much more! Dot Writer 1.5 + GEAP 2.1 turns your TRS-80 and EPSON 



into a Hi-Res Graphic typesetter! Requires 48K. disk and Epson MX 80/ 100 
with Graftrax 80/PLUS. Graftrax available for easy home installation. 
DOT WRITER 1.5 $69.95 



GEAP 2.1 and DOT WRITER 1.5 



le still only 



$99.95 



Additional disks ready nowl Dot Writer comes with 12 type styles, but each 
of these styles can be expanded, reversed or magnified to create a mini- 
mum of 36 unique fonts. In addition, we now have 2 disks with 10 fonts each. 
The first disk includes some unique, stylized fonts. Disk 2 includes 10 
italicized versions of our most popular fonts. 
EACH ADDITIONAL DISK $30.00 

ADDITIONAL PRODUCTS 

In addition to our own products, we also carry the following fine software. 

NewScript 7.0 - NewScript is the best and most powerful word processor available 
for the TRS-80. S124.9S 

Electric Webster - Cornucopia Software's top-notch spelling checker. A 50.000 word 
dictionary that you can customize to your needs. Error free hyphenation and unique 
grammar checking are extras that make Electric Webster a must for your work station! 
With correction feature! $149.50 

Falter - Also a fine print product from ProSott. Faster optimizes BASIC code. $25.95 
Trashman - A utility that reduces string compression time by as much as 95%.$39.95 
Quick Compress - A real space saver from ProSoft software. $19.99 

RPM - A real time disk motor speed analysis program. Keep your disks running per- 
fectly! $24.95 
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I'd also like to finally make a little 
money from the Creator. My royalties 
have so far come to $0.00. I managed 
this through a combination of improper 
marketing, a poor choice of associates, 
and not enough cash to market it 
myself. 

The Creator is a program that writes 
data-base programs in Microsoft Basic 
for the Model I. With slight modifica- 
tions, it will do so for a number of other 
Radio Shack and non-Radio Shack 
computers. It will run unchanged on the 
Model III. As far as I know, the DOS 
you use doesn't matter. The Creator is 
especially good at mailing lists, inven- 
tory programs, accounts payable and 
receivable, and general data-base 
applications. 

A number of dedicated data-base 
programs exist for the TRS-80. These 
programs are good, but misguided; 
since they are usually written in Assem- 
bly language, anything they create and 
modify is not transportable, nor is the 
application they generate. Modifica- 
tions are generally impossible. 

But programs the Creator generates 
can be transported to nearly any ma- 
chine running Microsoft Basic or a rea- 
sonable facsimile thereof. The generat- 
or itself can also be modified, if you 
have the time and patience. 

Since neither the Creator nor the pro- 
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grams it writes calls any Assembly-lan- 
guage routines or depends on the oper- 
ating system for anything, the programs 
are also highly portable. The operating 
system only matters to the extent that it 
affects Basic: Since Basic tends to 
disguise any differences that exist, 
you're assured that your software in- 
vestment is protected. 

A Short History 

I write and develop application and 
utility software for a living. I've written 
programs for all the popular microcom- 
puters, and I believe they're generally of 
high quality. The Creator was one of 
the better ones. 

So why wasn't it commercially suc- 
cessful? 

First, a short history is in order. 

I got the idea for the Creator toward 
the end of 1978. 1 was working as a sys- 
tems engineer for a company (which I 
will call Noname) selling computers to 
Radio Shack. 

Noname did not want to sell any soft- 
ware other than languages, unless the 
software came from out-of-house. They 
feared the amount of support that mar- 
keting a piece of software would re- 
quire. When they decided to end all 
field software support for all their prod- 
ucts in favor of a plan to do all support 
from the home office, I decided to 



strike out on my own. In about a week I 
found two possible backers and was out 
of a job. 

In a spirit of boundless optimism, I 
began the project about an hour after I 
left Noname. In about two weeks (some 
200 hours of work), I had a version of 
the Creator running well enough to 
demonstrate. I took a listing to my 
lawyer and submitted it for a copyright. 
No money was coming in and my wife 
was becoming worried. I continued 
working on the program for several 
more months, ironing out the bugs and 
adding features. 

Meanwhile, I showed the program to 
the potential backers, and they agreed 
to supply money in return for a finan- 
cial interest in the company that would 
market the program. The major backer 
took 50 percent and the minor one 25 
percent. Also, the company was to have 
exclusive marketing rights. In return, 
ownership of the program and all modi- 
fications remained mine, and I was to 
receive royalties from each sale. 

I got a TRS-80 Model I toward the 
end of February. I began getting money 
and the company incorporated in 
March. We almost immediately sold a 
number of programs for $295. As a 
matter of fact, the first 22 individual 
demonstrations produced 21 sales. The 
future was looking better. But as it 




turned out, this was to be the high 
point. After a year, my health was poor, 
my wife was threatening to take herself 
and the kids back to her mother, and 
my finances were a disaster. 

Down the Tubes 

I made some bad choices. I had asso- 
ciates who knew nothing about soft- 
ware, little or nothing about computers, 
and no time or willingness to learn. I 
even had one associate who believed I 
spent my time loafing around and doing 
nothing. 

I chose dealers and distributors who 
paid the company (my associates) royal- 
ties. I never saw any of it. 

And I did too much business by 
handshake. To quote L.B. Mayer, "An 
oral agreement isn't worth the paper it's 
printed on." 

My situation may not be typical. 
Many software authors have gotten a 
good income from distributors and 
have been treated well. By and large, 
distributors are not crooks. But if 
you're going to try to market your soft- 
ware, you should protect yourself. 

First, you should see a good lawyer 
and follow his recommendations. 
Friendship and business should never be 
confused: One should have nothing to 
do with the other. 

Be aware that distributors want close 



Program Listing I 

1 PRINT "COPYRIGHT 1980 BY BRUCE TONKIN ALL RIGHTS RESERVED" 

2 PRINT "SERIAL NUMBER" 

3 FOR 1=1 TO 2000:NEXT I 
10 REM THE CREATOR 

20 REM 

30 REM 

40 REM 

50 REM VERSION 1.1 DATED 2-28-80 

60 REM BASIC DATA BASE PROGRAM: WRITTEN AND ADAPTED FOR TRS 80 

BY BRUCE TONKIN 

70 CLEAR3000:CLS 

80 PRINT"THIS IS THE CREATOR, TRS-80 VI. 1. IT WILL ALLOW YOU" 

90 PRINT"TO GENERATE A PROGRAM WHICH WILL CREATE AND ACCESS A DA 

TA FILE" 

100 PRINT"FOR LATER USE. PLEASE INPUT THE PROPOSED PROGRAM NAME. 

110 PRINT"YOU ARE LIMITED TO 8 ALPHABETIC CHARACTERS." 

120 PRINT"PROGRAM NAME="; :LINEINPUTPN$ 

130 F0RI=1T0LEN(PN$) :A$=MIDS(PN$,I,1) :IFA$>"Z"ORA$<"A"THENPRINT" 

ALPHA CHARACTERS ONLY1 ":GOTO120 

140 NEXTI 

150 IF LEN(PN$) >8THENPRINT"TOO LONG " : GOTOl 2 

160 PRINT"WHEN THE PROPOSED PROGRAM IS RUN. WHICH DRIVE WILL CON 

TAIN THE" 

170 PRINT"DATA FILE(0-3)?"; 

180 AN$=INKEY$:IFAN$=""THEN180 ELSEIF(AN$>"3"ORAN$<"0") THEN170 

190 PRINTAN$ 

200 PRINT"WHICH DRIVE DO YOU WANT THE PROGRAM WRITTEN ON? (0-3) 

210 DN$=INKEY$:IFDN$=""THEN210 ELSEIF{DNS>"3"ORDN$<"0 B ) THEN200 

220 PRINTDN$:DN$=":"+DN$ 

230 DF$=PN$+"/DAT:"+AN$:PN$=PN$+"/BAS":PQ$=PN$+DN$:OPEN"0",l f PQ$ 

240 PRINT#1,"1 REM******PROGRAM NAME: ";PN$; "******" 

250 PRINT#1,"2 REM******DATA FILE NAME: " ;DF$; "******" 

260 PRINT#1,"3 REM******DATA FILE IS ON DRIVE" ;AN$; "******" 

270 INPUT"WHAT IS THE MAXIMUM DATA FILE SIZE, IN # OF RECORDS" iM 

S 

280 INPUT"WHAT IS THE RECORD LENGTH ( 1-255) ";RR:IFRR<10RRR>255THE 
N280 ELSER%=256/RR 

Listing I continues 
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and continuing support. They don't 
want to buy your program, they want to 
rent your program and buy you. If you 
can't provide the support, don't go to a 
distributor. 

(Incidentally, that's why this pro- 
gram isn't going through a distributor 
now: I can't support it because I no 
longer have a machine that will run the 
program. Nor do I really want one.) 

Distributors want to pay royalties of 
5 to 25 percent, depending on the pro- 
gram and its selling price. I feel that's 
unfair. Distributors insist it is not, and 
some of them aren't very rich, so maybe 
it isn't. If you feel as I do, don't go to a 
distributor. Otherwise, you're just in- 
viting mental anguish, especially when 
customers complain that your software 
is overpriced. 

Expect a lag of 10 to 90 or more days 
after a program is sold before you get 
any royalties. Distributors have to deal 
with returned merchandise and slow 
payments from dealers — they can't pay 
you what they don't have. In the mean- 
time, existence can be somewhat painful. 

Not all distributors are entirely scru- 
pulous. Anyone can make his books 
look good to a nonprofessional. If 
you're not an accountant or can't af- 
ford to hire one, you'll just have to take 
a good guess. You'll need to spend 
some time to choose only honest dealers 
and distributors. Picking honest men is 
not easy for some people. I guessed 
wrong a lot of the time. 

One other thing. Distributors and 
dealers have been known to go bank- 
rupt. When they do, you lose your 
money. I can offer no suggestions for 
you there. 

The Flip Side 

Is there any reason to go to a distribu- 
tor? Yes. Distributors can and do suc- 
ceed in doing the following: 

• They evaluate your package. If it's 
weak, they'll tell you. If the software is 
salvageable, they'll offer suggestions 
for improvement. This can be the most 
valuable service they can perform. 

• They advertise and promote your 
package far beyond what you could do, 
unless you're wealthy and a good adver- 
tising copywriter. 

• They screen dealers and handle the 
bad apples for you. 

• They provide at least some of the 
support. A good distributor and dealer 
team can save an awful lot of your time. 
Without this, you'd better like talking 
on the telephone. (You won't believe 
the questions you'll get, either!) 

• They provide the niceties, such as 
packaging and printing. Believe me, this 
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Listing 1 continued 

290 IFMS*256/R%>85760THENPRINT"NOT ENOUGH ROOM ON A SINGLE DISK 

FOR THIS.":GOTO270 

300 PRINT#1,"4 REM******MAXIMUM FILE SIZE IS";MS;" RECORDS****** 

310 PRINT#1,"5 REM******RECORD LENGTH IS" ;RR; "PACKED" ;R% ; "PER SE 

CTOR******" 

320 Q$=CHR$(34) 

330 PRINT"PLEASE TYPE IN A TITLE FOR YOUR GENERATED PROGRAM. ":LI 

NE INPUT TI$ 

340 LN=LN+10:PRINT#1,LN;"REM CHANGE DISKS — REINITALIZE HERE" 

350 LN=LN+10: PRINT tl,LN; "CLEAR 3000" 

360 LN=LN+10:PRINT#l,LN;"OPEN";Q$;"R";Q$;" f l,";Q$;DF$;Q$ 

370 LN=LN+10 : PRINTtl, LN;"ONERRORGOTO25001" 

380 LN=LN+10:PRINTtl,LN;"DIMF$(22) ,G$(22) " 

390 PRINT#1, "25000 REM******BEGIN ERROR ROUTINE******" 

400 PRINT#1, "25010 PRINT" ;Q$; "ERROR ENCOUNTERED IN LINE" ;Q$; " ;ER 

L" 

410 PRINT#1, "25020 PRINT ";Q$; "ERROR #=";Q$; "; ERR/ 2+1: CLOSE: RUN" 

420 PRINTtl, "25001 IFERL<10000ANDERL>1000THENPRINT" ;Q$; "PROBABLE 

ERROR IN EDIT SPECIFICATIONS. " ;Q$ 
430 PRINTtl, "32000 REM******INITIALIZE THE HASHED FILE******" 
440 PRINTtl, "3 2010 PRINT" ;Q$; "THIS WILL ERASE ALL PREVIOUS ENTRI 
ES,IF ANY!";Q$ 

450 PRINTtl, "32020 PRINT", «Q$; "TO CONTINUE INITIALIZATION, HIT TH 
E C KEY";Q$ 
460 PRINTtl, "32035 PRINT" ;Q$; "THIS WILL TAKE A LITTLE WHILE. ";Q$ 

470 PRINTtl, "32030 AN$=INKEY$: IF AN$=" ;Q$;Q$; "THEN32030ELSEIFAN$ 

<>";Q$;"C";Q$; "THENRUN" 

480 PRINTtl, "32040 FIELD tl,255 AS AZ$,1 AS DZ$:LSET AZ$=STRING$ 

(255,255) :LSET DZ$=CHR$(255) " 

490 PRINTtl, "32050 FOR 1=1 TO"; INT( .99+MS/R%) ; " :PUTl ,I:NEXT:RUN" 

500 DIMF$(22) 

510 CLS: PRINT" YOU MAY NOW CHOSE AN EXIT CODE OR MESSAGE WHICH WI 

LL ALLOW THE" 

520 PRINT"OPERATOR OF YOUR PROGRAM TO EXIT DATA ENTRY OR UPDATE 

WITHOUT" 

530 PRINT" SAVING HIS LATEST CHANGES TO DISK, AND ENABLE A RETURN 

TO THE" 
540 PRINT"PROGRAM MENU. DO YOU WISH SUCH AN EXIT MESSAGE (Y/N) ?" 

550 O0$=INKEY$:IF 00$="" THEN 550 ELSE IF 00$<>"Y"ANDOO$<>"N"TH 

EN510 

560 IF 00$="Y" THEN PRINT"WHAT IS YOUR EXIT MESSAGE OR C0DE?";:L 

INE INPUT 0T$ 

570 CLS:PRINT"NOW WE MUST DESCRIBE THE POSITIONS OF THE FIELDS I 

N THE FILE." 

580 PRINT"THE NUMERIC FIELDS CAN BE PACKED. WHOLE NUMBERS FROM - 

32767 TO" 

590 PRINT"32767 CAN BE STORED AS PACKED INTEGERS IN TWO SPACES." 

600 PRINT"NUMBERS NEEDING 6 DIGITS OF ACCURACY CAN BE PACKED INT 

O 4." 

610 PRINT"NUMBERS NEEDING UP TO 16 DIGITS OF ACCURACY WILL TAKE 

8 SPACES." 

620 PRINT"PACKED 6-DIGIT-ACCURACY NUMBERS ARE PACKED SINGLE PREC 

IS ION." 

630 PRINT"PACKED 1 6-DIGIT-ACCURACY NUMBERS ARE PACKED DOUBLE PRE 

CISION." 

640 PRINT"PLEASE TAKE CARE TO ALLOCATE THE CORRECT NUMBER OF SPA 

CES." 

650 PRINT" FROM LEFT TO RIGHT IN YOUR RECORD, TELL ME HOW MUCH SP 

ACE" 

660 PRINT"T0 ALLOCATE TO EACH FIELD. YOU HAVE 255 SPACES IN EACH 

RECORD , " 
670 PRINT"AND UP TO 22 FIELDS. TYPE IN 999 WHEN YOU ARE DONE." 
6 80 A=l 

690 PRINT"FIELD t";A;" USES: ";: INPUT F$(A) 

700 EX=EX+VAL(F$(A) ) : IFEX>RRANDF$(A) <>" 999 "THENPRINT" EXCEEDS " ;RR 
;"TOTAL SPACES:TRY AGAIN. " : EX-EX-VAL(F$ (A) ) :GOTO690 
710 IFF$(A)="999"ORA=22THEN780 
720 PRINT"IS THIS FIELD SIZE 0K?(Y/N)"; 

730 EX$=INKEY$:IFEX$=""THEN730 ELSEIFEX$="N"THENEX=EX-VAL(F$(A) 
) :GOTO6 90 :ELSEIFEX$O"Y"THEN720 
740 IFRR-EX=0THENPRINT : A=A+1 : GOT07 80 

750 PRINT" "; EX $: PRINT "THEN YOU HAVE";RR-EX; " SPACES LEFT." 
760 A=A+1 : G0TO6 90 

770 LN=LN+10:PRINT*1,LN;"REM******SET UP FIELDS IN DATA FILE**** 
**" 

780 A=A-l:LN=LN+10:SL=LN:PRINTtl,LN;"FIELD 1 , " ; :OF$="FIELD 1," 

790 F0RI=1T0A-1:V=VAL(F$(I)) :V$=MID$(STR$(V) ,2) : I$=MID$(STR$(I) , 

2) 

800 PRINTtl, V$; "AS F$( " ; 1$; ") , " ; 

810 OF$=OF$+V$+"AS F$("+I$+")," 

820 NEXTI 

830 PRINTtl,MID$(STR$(VAL(F$(A))) ,2) ; "AS F$ ( " ;MID$(STR$(A) ,2);") 

Listing I continues 
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840 LN=LN+10 : PRINT#1 , LN ; "FORI=lT022 : G$ ( I) =" ; Q$ ; Q$ ; " : NEXT : FC=0 : UF 

=0:G$=";Q$;Q$;":CLS" 

850 LN=LN+10:PRINT#1,LN;"PRINTTAB(19) ;" ;Q$; "PRODUCED BY THE CREA 

TOR";Q$ 

860 LN=LN+10:PRINT#1,LN;"PRINT";Q$;STRING$( ( (60-LEN(TI$) )/2) ,32) 

;TI$;Q$ 

870 LN=LN+10:PRINT#1,LN; "PRINT" 

880 LN=LN+10:PRINT#1,LN; "PRINT" ;Q$; "ENTER DATA 

DEPRESS E" ;Q$ 

890 LN=LN+10:PRINT#1,LN;"PRINT";Q$;"LOOK UP A RECORD 

DEPRESS L" ;Q$ 

900 LN=LN+1 : PRINTtl, LN;" PRINT" ;Q$;" SCAN ALL RECORDS ON FILE 

DEPRESS S";Q$ 

910 LN=LN+10:PRINT#1,LN;"PRINT";Q$; "UPDATE A RECORD 

DEPRESS U";Q$ 

920 LN»LN+10:PRINT#1,LN;"PRINT";Q$; "DELETE A RECORD 

DEPRESS D" ;Q$ 

930 LN=LN+10:PRINT#1,LN;"PRINT";Q$;"INITIALIZE THE FILE 

DEPRESS I";Q$ 

940 LN=LN+10:PRINT#1,LN;"PRINT";Q$;"EXIT THE PROGRAM 

DEPRESS X" ;Q$ 

950 LN=LN+10: PRINT #1,LN; "PRINT" ;Q$; "PLEASE DEPRESS THE LETTER 

F YOUR CHOICE: NO ENTER KEY IS NEEDED" ;Q$ 

960. IF 00$="Y" THEN LN=LN+10:PRINT#1,LN; "PRINT" ;Q$; "TO RETURN TO 

THE MENU FROM UPDATE OR ENTRY WITHOUT SAVING YOUR MATERIAL TO 

THE DISK, ENTER ";OT$;" FOR A FIELD ENTRY. ";Q$ 
970 LN=LN+10:PRINT#1,LN;"AN$=INKEY$:IF AN$=";Q$;Q$; "THEN";LN 
980 LN=LN+10:PRINT#1,LN;"IFAN$O";Q$;"E";Q$;"ANDAN$O";Q$;"L";Q$ 
;"ANDAN$<>";Q$;"U";Q$;"ANDAN$<>";Q$;"D";Q$;"ANDAN$<>";Q$;"I";Q$; 
"ANDAN$0";Q$;"X";Q$;"ANDAN$0";Q$;"S";Q$;"THEN";SL 
990 LN=LN+10:PRINT#l,LN;"IFAN$=";Q$;"E";Q$;"THENl000" 
1000 LN=LN+10:PRINT#1,LN;"IFAN$=";Q$;"L";Q$;"THEN10000" 
1010 LN=LN+10: PRINT #1,LN; "IFAN$=";Q$; "S";Q$; "THEN35000" 



1020 LN=LN+10:PRINT#1,LN;"IFAN$=' 

1030 LN=LN+10:PRINT#1,LN;"IFAN$=' 

1040 LN=LN+10:PRINT#1,LN;"IFAN$=' 

1050 LN=LN+1 : PRINT* 1,LN;" CLOSE: NEW" 

1060 DIM D%(22) 

1070 PRINT#1, "10000 REM******BEGIN THE FILE LOOK-UP ROUTINE***** 



Q$;"U";Q$;"THEN11000' 
Q$; "D";Q$;"THENl2000' 
Q$;"I";Q$;"THEN32000' 



1080 PRINT#1, "11000 REM******BEGIN THE FILE UPDATE ROUTINE****** 

1090 PRINT#1, "12000 REM******BEGIN THE RECORD DELETE ROUTINE**** 

**■ 

1100 INPUT"WHICH FIELD IS THE KEY FIELD? INPUT THE FIELD NUMBER: 

";KF 

1110 OF$=OF$+F$(A)+"AS F$("+MID$(STR$(A) ,2)+")" 

1120 IF R%>1 THEN R=INSTR(OF$, " , ") :OF$=LEFT$(OF$,R) +MID$(STR$(RR 

),2)+"*P% AS TX$,"+MID$(OF$,R+l) 

1130 PRINT#1, "35000 FOR K=0 TO";MS-l; " :RP=K:OS=1:GOSUB27040" 

1140 PRINT#1, "35010 IF F$( ";KF; ") >CHR$(249) THEN35990" 

1150 PRINT#1, "35050 GOSUB28000:REM UNPACK RECORD FOR DISPLAY" 

1160 PRINTtl, "35960 GOSUB29000:REM DISPLAY THE RECORD" 

1170 PRINT#1, "35970 FOR J=l TO 2000:NEXTJ:REM WAIT A LITTLE BIT 

BEFORE NEXT RECORD" 

1180 PRINT#1, "35990 NEXTK:GOTO";SL 

1190 LN=1000:PRINT#1,LN;"CLS:REM******BEGIN ENTRY******" 

1200 GOSUB1210 :GOTO1450 

1210 PRINT"NOW WE MUST DESCRIBE THE INPUT PROMPTS THE OPERATOR W 

ILL SEE," 

1220 PRINT"THE EDITS TO BE PERFORMED, AND THE DATA TYPE FOR EACH 

FIELD." 
1230 PRINT"TO DO THIS, WE WILL ASK A SERIES OF QUESTIONS ABOUT E 
ACH FIELD." 

1240 PRINT"TO THE QUESTION" ;Q$; "KIND OF DATA" ;Q$; "THE POSSIBLE A 
NSWERS ARE:" 

1250 PRINT"N NUMERIC DATA, NOT PACKED-STORED AS C 

HARACTER " 

1260 PRINT"PI PACKED INTEGER DATA, STORED AS 2 CHA 

RACTERS . " 

1270 PRINT"PS PACKED SINGLE-PRECISION NUMBER, 4 CH 

ARACTERS " 

1280 PRINT"PD PACKED DOUBLE-PRECISION NUMBER, 8 CH 

ARAC T ERS n 

1290 PRINT"C CHARACTER DATA-ANY CHARACTER IS OK" 

1300 PRINT"YOU MAY TYPE THE WORD HELP TO REPEAT THESE INSTRUCTIO 

NS LATER." 

1310 PRINT"HIT ANY KEY TO CONTINUE." 

1320 P$=INKEY$:IF P$="" THEN1320 

1330 CLS:PRINT"TO THE PROMPT QUESTION, TYPE IN THE OPERATOR'S QU 

EST ION." 

1340 PRINT"TO THE BAD INPUT IF QUESTION, INPUT AS MANY EDITS AS 

YOU WANT " 

1350 PRINT"OF THE FORM: <999 =3 >456.5 <=9" 

1360 PRINT"<";Q$;"A";Q$;" NOTE THE QUOTES AROUND ALPHABETIC ED 

ITS." 

Listing I continues 
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NEW SYSTEM MAKES 
TRS-SO m A TOTAL 
CASH REGISTER & 
POINT-OF-SALE 
COMPUTER 

Which performs all the normal 
functions of a computer and is 
specially programmed to.... 



■ COMPUTE Sales Taxes, Discounts, 
Special Sales and Promotions 

■ TRACKS Sales by Type, such as Visa, 
Mastercard, Check, Charge, etc. and by 
Employee /Operator for up to 30 people 

■ SELF-PROMPTING to Cashiers 

■ Produces Audit Trails and ACCOUNTING 
DATA for entire operation 

■ CONTROLS up to 20,000 INVENTORY 

LINE ITEMS on our Hard Disk Drive 

■ CONTROLS up to 1,500 INVENTORY 
LINE ITEMS on your Floppy Drive 

■ Complete, Ready-to-Run SOFTWARE 
comes with Cash Control Drawer Unit 

■ AUDIBLE SIGNAL produced when any 
key is depressed by any operator 

■ DRAWER operates automatically or by 
manual override anytime 

■ Generates RECEIPTS on Printer 

■ Available to display in English, French, 
Spanish, or German Languages 

■ Operates on 110AC or 220AC...just plug 
it in 

■ NO INTERFERENCE with or modification 
of regular TRS-80 Mod III. ..plugs right 
into computer 

FREE Specifications and Data Package or 
order complete Operating manual for $15 
from 

ICR/FulureSofl 

Box 1446 • Orange Park, Florida 32073 

(904) 269-1918 lor technical assistance 

and Dealer Information 

Integrated Cash Register Systems from 
as low as $449. 
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can be a real pain if you have to do it 
yourself, even if your family helps. Un : 
paid labor has been known to strike 
over working conditions. 

What Customers Expect 

There is no essential difference be- 
tween buying software and buying a 
pair of shoes. Any salesman will tell you 
the customer is looking for fit, style, 
and price. Which one is most important 
depends on the customer. Your soft- 
ware must "fit" the customer's needs. 
Style applies to both packaging and 
program appearance. Price depends on 
the program's function. 

A word about pricing. Generally, if 
you go through a distributor, a program 
must either be a game or sell for over 
$50. Otherwise, it's not worth his time. 
In my opinion, most of the $50 pro- 
grams should sell for about $10, and 
most of the $100-$ 150 programs should 
sell for about $20. The difference is 
just about the dealer's and distributor's 




markup. 

Of course, if a program is to be sold 
at all, it must be advertised. Advertising 
and demonstrations can cost half or 
more of a package's selling price. I can 
only afford to sell this program for $10 
because this article is essentially free 
advertising. 

Customers have grown to expect fan- 
cy packaging and well-printed (not nec- 



essarily good, but good-looking) manu- 
als. I think this is unreasonable: It 
prevents many packages from ever 
reaching the marketplace. Most cus- 
tomers will never read the documenta- 
tion, anyway. The lesson here: Make 
your software so easy to run that little 
or no documentation is required. 

I would advise software purchasers to 
buy generic, but buy with care. Organ- 
ize or join a club. Pool your funds, and 
have the club buy one package for 
evaluation. If the software is worth- 
while, then have the interested members 
each buy a copy. 

Never pirate software. It's not fair 
to the writer. If you want to see 
something even better than the piece of 
code in your hot little hands, encourage 
the author with some rightfully earned 
profit. 

On the other hand, stay away from 
over-priced software. Sooner or later, 
the price will come down, even if not all 
the way to $10. 



Expectations and Enhancements 



Here is what I expected the pro- 
gram to do: 

1. Write bug-free Basic programs. 
Ideally, no bug could ever be gener- 
ated, no matter what the provocation; 
program size limitations and program 
speed trade-offs resulted in a modifi- 
cation of this. Generally, I achieved 
this objective. 

2. The programs could access rec- 
ords in a data file by a key. This access 
had to be quick (preferably less than 
one second), operator transparent, re- 
quire no sort, and make no assump- 
tions about the operating system or 
the processor chip used. I wanted to be 
completely flexible, and not be com- 
mitted to just Radio Shack gear. This 
meant I could not use a sort, since it 
would have to be written in Basic (and 
at the TRS-80's operating speed, be 
painfully slow). 

A sort presented several other prob- 
lems. Any sort would not be operator- 
transparent. Also, any access or write 
based on a sort (even B-TREE) would 
be either slow to read or slow to write a 
record. This was unacceptable. Final- 
ly, if a sorted index file were used, then 
disk failure would cause terrible prob- 
lems for the user. 

Therefore, I reasoned, why should 
any sort be used? The sort, after all, 
would only be needed when and if the 



records had to be printed in sorted or- 
der. Access, in Basic, is by record 
number: thus, what I needed was a 
way to convert the key to a record 
number. 

I wondered (and I still do) why ev- 
eryone else seemed to have settled on 
sorting and binary search. There is, af- 
ter all, a big difference between re- 
trieving records and printing reports. 

I investigated several methods, but 
settled on hashing. Hashing, as I used 
it, consisted of taking a key composed 
of one of more alphanumeric charac- 
ters and converting it to a number in 
the range of 1 to the maximum num- 
ber of records permitted on a single 
disk. The hashing algorithm had to be 
reasonably random. I tested it to make 
sure it was: the generator I used was 
capable of generating numbers more 
random than Microsoft's RND func- 
tion. I used a simple Chi-squared test 
to be sure. 

The record access had to be reason- 
ably quick. A peculiarity of Microsoft 
Basic and a floppy-disk-based com- 
puter is that it is much quicker to read 
even 10 long records placed consecu- 
tively than it is to read just two records 
placed widely apart. (That, by the 
way, is why a binary search technique 
is necessarily inferior to hashing for 
speedy access.) For that reason, I 



wrote the Creator so that the generat- 
ed programs would search consecutive 
locations in the data file after generat- 
ing the hashed record number; any ac- 
cess past the end of the file would 
wrap around to the beginning. Hash- 
ing has another benefit, particularly 
important to anyone using a disk 
drive: head movement is generally less 
than with any other approach. There- 
fore, disk drives should last longer be- 
fore needing repair or adjustment. 
The result is that a program generated 
by the Creator can read any record 
within about a half-second after the 
disk drive is turned on. 

3. Records needed to be capable of 
being updated on any field. This 
was easy. I just fixed it so that 
an update on the key field deleted 
the old record and wrote a new one at 
the new hashed position. Otherwise, 
the updated record would be written at 
the same position. 

4. Records had to be any length, up 
to the maximum length of a record 
permitted within Basic. This was 255 
bytes, at the time. 

5. I wanted at least 20 fields allowed 
per record. 

6. The data file had to be as bullet- 
proof as possible. Bad sectors, power 

Continues on p. 85 
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Listing I continued 

1370 PRINT"NOT NUMERIC NO ENTRY LENGTH < 9" 

13 80 PRINT"NOT ALPHA CONTAINS" ;Q$; "Z" ;Q$ 

1390 PRINT :PRINT"TO THE QUESTION ERROR MESSAGE TYPE THE MESSAGE 

TO BE DISPLAYED" 

1400 PRINT"IF THAT ERROR IS MADE BY THE OPERATOR." 

1410 PRINT"YOU MAY SIGNAL COMPLETION OF EDITS FOR ANY FIELD BY M 

AKING NO" 

1420 PRINT"ENTRY AND HITTING THE ENTER KEY. HIT ANY KEY TO CONTI 

NUE." 

1430 P$=INKEY$:IFP$=""THEN1430 

1440 RETURN 

1450 FOR I=1T0A:I$=MID$(STR$(I) ,2) 

1460 PRINT"FIELD #";I;" LENGTH=" ; :L=VAL(F$( I) ) ,-PRINTL 

1470 P$="": PRINT "PROMPT:"; :LINE INPUTP$: IFP$="HELP"THENGOSUB1210 

:GOTO1470 
1480 K$="":INPUT"KIND OF DATA" ;K$: IFK$="HELP"THENGOSUB1210 :GOTO 
1480 

1490 IFK$0"N"ANDK$0"PI"ANDK$<>"PS"ANDK$<>"PD"ANDK$<>"C"THENPRI 
NT"INVALID KIND OF DATA. N, PI, PS, PD, OR C PLEASE. " :GOTO1480 
1500 IF(K$ = "PI"ANDLO2)0R(K$="PS"ANDL<>4)0R(K$»"PD"ANDLO8)THENP 
RINT" INCORRECT FIELD LENGTH FOR DATA TYPE. " :GOTO1480 
1510 LN=LN+10:PRINT#1,LN; "PRINT" ;Q$;P$;Q$:BL=LN 
1520 IF K$O"C"THENPRINT#1,BL+1;"IFUFO0ANDG$=";Q$;Q$;"THENG$»G$ 

(";i$;")" 

1530 LN=LN+10:PRINT#1,LN;"LINE INPUTG$( " ; 1$; ") "; :D% ( I) =LN: IFOO$= 

"N" THEN PRINT#1," " ELSEPRINTtl ," : IFG$( " ; I; ") =" ;Q$;OT$;Q$; "THEN 

";SL 

1540 IF K$="PI"THENPRINT#1,LN+1;"IFUFO0THENG1=INSTR(G$(";I$;") , 

";Q$;"MORE";Q$;") : IFG1>0THENG%=CINT(VAL(G$( "; 1$; ") ) +VAL(G$) ) :G$( 

";I$;")=MID$(STR$(G%) ,2+SGN(G%) /2) " 

1550 IF K$="PI"THENPRINT#1,LN+2;"IFUFO0THENG1=INSTR(G$(";I$;") , 

" ; Q$ ; "LESS" ; Q$ ; " ) : IFG1 >0THENG%=CINT ( -VAL { G$ ( " ; I $ ; " ) ) +VAL ( G$) ) : G$ 

(";I$;")=MID$(STR$(G%) ,2+SGN(G%) /2) " 

1560 IFK$="PS"THENPRINT#1,LN+1;"IFUFO0THENG1 = INSTR(G$(";I$;") ," 

;Q$;"MORE";Q$;") : IFG1>0THENG=CSNG(VAL(G$( ";I$; ") ) +VAL(G$) ) :G$("; 

I$;")=MID$(STR$(G) ,2+SGN(G)/2) " 

1570 IFK$="PS"THENPRINT#1,LN+2;"IFUFO0THENG1=INSTR(G$(";I$;") ," 

;Q$;"LESS";Q$;") : IFG1>0THENG=CSNG(-VAL(G$( " ;I$; ") )+VAL(G$) ) :G§(" 

;I$;")=MID$(STR$(G) ,2+SGN(G)/2) " 

1580 IFK$="PD"THENPRINT#1,LN+1;"IFUFO0THENG1=INSTR(G$(";I$;") ," 

;Q$;"MORE";Q$;") : IFG1>0THENG#=CDBL( VAL(G$( " ; 1$; ") ) +VAL(G$) ) :G$(" 

;I$;")=MID$(STR$(G#) ,2+SGN(G#) /2) " 

1590 IFK$="PD"THENPRINT#1,LN+2;"IFUFO0THENG1=INSTR(G$(";I$;") ," 

;Q$;"LESS";Q$;") : IFG1>0THENG#=CDBL(-VAL(G$( " ; 1$; ") ) +VAL(G$) ) :G$( 

";I$;")=MID$(STR$(G#) ,2+SGN(G#)/2) " 

1600 IFK$="PI"THENLN=LN+10:PRINT#1,LN;"IFABS(VAL(G$(";I$;")))>32 

767THENPRINT";Q$; "NUMBER OUT OF RANGE. MUST BE FROM -32767 TO 32 

767 i ";Q$;":GOTO";BL 

1610 IFK$="PI"THENLN=LN+10:PRINT#1,LN;"IFINT(VAL(G$(";I$;"))) <>V 

AL(G$(";I$;") ) THENPRINT" ; Q$; "MUST BE WHOLE NUMBER. " ;Q$; " :GOTO";B 

L 

1620 BI$="":PRINT"BAD INPUT IF: "; :LINEINPUTBI$: IFBI$=""THEN1760 

1630 IF BI$="HELP"THENGOSUB1210 :GOTO1620 

1640 PRINT"ERROR MESSAGE: "; :LINEINPUTEM$: IFEM$="HELP"THENGOSUBl 2 

10 :GOTO1640 

1650 IFINSTR(BI$,"NOT NUMERIC") >0THEN1660 ELSEIFINSTR(BI$, "NOT A 

LPHA") >0THEN1670 ELSEIFINSTR(BI$, "NO ENTRY") >0THEN1680 ELSEIFINS 

TR(BI$, "CONTAINS") >0THEN1690 ELSEIFINSTR(BI$, "LENGTH") >0THEN1720 

ELSE1730 
1660 LN=LN+10:PRINT#1,LN;"CD$=G$(";I$;") : E=0:GOSUB3 0000: IFE=1THE 
NPRINT";Q$;EM$;Q$;":GOTO";BL:GOTO1620 

1670 LN=LN+10:PRINT#1,LN;"CD$=G$(";I$;") : E=0 :GOSUB31000: IFE=1THE 
NPRINT" ; Q$ ; EM$ ; Q$ ; " : GOTO" ; BL : GOTO1620 

1680 LN=LN+10:PRINT#1,LN;"IFLEN(G$(";I$;") ) =0THENPRINT";Q$;EM$;Q 
$;":GOTO";BL:GOTO1620 

1690 FH=INSTR(BI$,Q$) :IFFH<1THENPRINT"Y0U FORGOT QUOTES. " :FH=0 :G 
OTO1620 

1700 IF FH>1THENFH$=MID$(BI$,FH+1,1) :LN=LN+10 :PRINT#1 ,LN; "IFINST 
R(G$(";I$;") , " ;Q$;FH$;Q$; ") >0THENPRINT" ;Q$;EM$;Q$; " :GOTO";BL:FH= 
0:GOTO1620 
1710 PRINT"SYNTAX ERROR. THE WORD CONTAINS SHOULD NOT BE SET OFF 

BY QUOTES":GOTO1620 
1720 FH=INSTR(BI$, "LENGTH") :LN=LN+10 :PRINT#1 ,LN; "IFLEN(G$( " ; 1$; " 
) ) ";MID$(BI$,FH+6) ; "THENPRINT";Q$;EM$;Q$; ":GOTO";BL:FH=0:GOTO162 


1730 IFINSTR(BI$,">") <1ANDINSTR(BI $,"<") <1ANDINSTR( BI$,"=") <1THE 
NPRINT"SYNTAX ERROR. REPEAT COMMAND, PLEASE. " :GOT01 620 
1740 C=INSTR(BI$,Q$) : IFO0THENLN=LN+10 :PRINT#1,LN; "IFG$( " ;I$; ") " 
;BI$; "THENPRINT" ;Q$;EM$;Q$;":GOTO";BL:GOTO1620 

1750 LN=LN+10:PRINT#1,LN;"IFVAL(G$(";I$;") ) " ;BI$; "THENPRINT" ;Q$; 
EM$;Q$;":GOTO";BL:GOTO1620 

1760 LN=LN+10:IFK$="PI"THENPRINT#1,LN;"G$(";I$;")=MKI$(VAL(G$("; 
1$;")))" 

1770 IFK$="PI"THENPRINT#1,11900+I;-IFUFO";I$;"THENG$(";IS;")=MK 
I$(VAL(G$(";I$;")))" 

1780 i( IFK$="PI"THENPRINT#l,RL+28000;"G$(";I$7")=STR$(CVI(F$(";I$; 

Listing 1 continues 



FOR TRS-80 MODEL I OR III ^ 
IBM PERSONAL COMPUTER 

MORE SPEED 

10-20 times faster than Interpreted BASIC. 

MORE ROOM 

Very compect compiled code plus VIRTUAL MEMORY 
makes your RAM act larger. Variable number of block 
buffers. 31-char.-unlque wordnames use only 4 bytes In 
header! ' 

MORE INSTRUCTIONS 

Add YOUR commands to Its 79-STANDARD-plus 
Instruction set! 

Far more complete than moat Forths: single & double 
precision, arrays, string-handling, clock, graphics (IBM 
low-res. glvea BAM and 16 color or 200 tint color display). 

MORE EASE 

Excellent full-screen Editor, structured & modular 

programming 

Word search utility 

THE NOTEPAD letter writer 

Optimized for your TRS-80 or IBM with keyboard repeats, 

upper/lower case display driver, full ASCII. 

MORE POWER 

Forth operating system 

Concurrent Interpreter AND Compiler 

VIRTUAL I/O for video and printer, disk and tape 

(10-Megabyte hard disk available) 

Full 8080 or 8088 Assembler aboard 

(Z80 Assembler also available for TRS-80) 

Intermix 35- to 80-track disk drives 

IBM can read, write and run M.3 disks 

M.3 can read, write and run M.1 disks 




FORTH 



THE PROFESSIONAL FORTH SYSTEM 
FOR TRS-80 It IBM PC 

(Thousands of systems in use) 

M , M „ S . F0 5 TH , D i sk s y»'« m (requires 1 disk drive, 32K RAM) 

V2.0 for Radio Shack TRS-80 Model I or III $129.95* 

V2.1 for IBM Personal Computer (80-col. screen) .... 1249.95- 

AND MMS GIVES IT PROFESSIONAL SUPPORT 

Source code provided 

MMSFORTH Newsletter 

Many demo programs aboard 

MMSFORTH User Groups 

Inexpensive upgrades to latest version 

Programming staff can provide advice, modifications and 

custom programs, to fit YOUR needs. 

MMSFORTH UTILITIES DISKETTE: includes FLOATING POINT 
MATH (BASIC ROM routines plus Complex numbers, Rectan- 
gular-Polar coordinate conversions, Degrees mode, more): a 
powerful CROSSREFERENCER to list Forth words by block 
and line; plus (TRS-80) a lull Forth-style Z80 assembler 
(requires MMSFORTH V2.0, 1 drive & 32K RAM) $39.95* 

FORTHCOM: communications package provides RS-232 
driver, dgmb terminal mode, transfer of FORTH blocks, and 
host mode to operate a remote FORTHCOM system (requires 
MMSFORTH V2.0. 1 drive & 32K RAM) $39.95* 

THE DATAHANDLER: a very last database management 
system operable by non-programmers (requires MMSFORTH 
V2.0. 1 drive & 32K RAM) $59.95* 

FORTHWRITE: fast, powerful word processor w/easy key- 
strokes. Help screens, manual & demo files. Full proportional 
w/tabs, outdenting. Include other blocks, documents, key- 
board inputs, & DATAHANDLER fields— ideal for form letters 
(requires MMSFORTH V2.0, 2 drives 8 48K RAM) .... $175.00* 

MMSFORTH GAMES DISKETTE: real-time graphics & board 
games w/source code. Includes BREAKFORTH, CRASH- 
FORTH. CRYPTOQUOTE, FREEWAY (TRS-80), OTHELLO & 
TICTACFORTH (requires MMSFORTH V2.0, 1 drive * 32K RAM) 
$39.95* 



Other MMSFORTH products under development 

FORTH BOOKS AVAILABLE 

MMSFORTH USERS MANUAL - w/o Appendices $17.50* 

STARTING FORTH - best! S1S.9S* 

THREADED INTERPRETIVE LANGUAGES - advanced, 
analysis of FORTH internals $18.95* 

PROGRAM DESIGN & CONSTRUCTION - Intro, to structured 
programming, good for Forth $16.00* 

FORTH-79 STANDARD MANUAL - official reference to 
79-STANDARD word set, etc $13.95* 

FORTH SPECIAL ISSUE. BYTE Magazine (Aug. 1980) - A col- 
lector's item for Forth users and beginners $4.00* 

* - OROERING INFORMATION: Software prices include 
manuals and require signing of a single computer license for 
one-person support. Describe your hardware. Add $2.00 S/H 
plus $3.00 per MMSFORTH and $1.00 per additional book; 
Mass. orders add 5% tax. Foreign orders add 20%. UPS COD, 
VISA and M/C accepted: no unpaid purchase orders or refunds. 

Send SASE lor tree MMSFORTH information. 
Good dealers sought 

Get MMSFORTH products from your 
computer dealer or 

MILLER MICROCOMPUTER SERVICES 

61 Lake Shore Road, Natick, MA 01760 

(617)653*6136 



sSee List ot Advertisers on Page 435 
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SFINKS 
3.0 

CHESS 
PROGRAM 


Rrl 




PRIZEWINNER 

1981 Paris 

World 

Microcomputer 

Chess 
Championship 


the 

finest 

available! 

See 80 U.S. 
June 1982 


•32 book openings 
•chess clock 
•printer output 
•problem mode 
•audio alert 
•thinking on 
opponent's time 
•infinite levels 


32K 

Model 1 (E.I.) 
or Model 3 

tape or disk 
only 

$39.95 


SFINKS 
1.81 

Plays Chess 

Pre-Chess and 

Transcendental 

Chess 


PRIZEWINNER 

1980 San Jose 

U.S. 

Microcomputer 

Chess 
Championship 


•nine levels 
•problem mode 
•move suggestion 
•move take back 
•audio alert 
•good 
documentation 


32K 

Model 1 or 3 

tape or disk 
only 

$24.95 i 


SFINKS 

CHESS 
TUTOR 

Learn to 
play chess 


Step-by-Step 

Programmed 

Learning 

for the 

Newcomer 


•tutor 

•3 level game 
•problem mode 
•audio alert 
•printer output 
•book openings 
•superb graphics 


32K 

Model 1 or 3 

disk only 
only 

$19.95 


Please specify 

tape or disk and 

Model lor 3 

Include $2.00 

Shipping 

WILLIAM FINK 

SUITE 24B 

1105 N. MAIN ST. 

GAINESVILLE, FL 

32601 


EXCEPTIONAL 

DEALER 

DISCOUNTS 

(904) 377-4847 

^^L ^ 212 

/SFINKS 1 ^, 



Listing 1 continued 


) 






1790 


IFK$="PS" 


THENPRINTtl,LN;"G$(";I$;")=MKS$(VAL(G$(";I$;" 


)))" 


1800 


IFK$="PS* 


THENPRINTtl, 1190 0+1 ; "IFUFO" ; 1$; "THENG$( " ; 1$ ; 


")=MK 


S$(VAL(G$(";I$; n )))" 






1810 


IFK$="PS P 


THENPRINTtl,RL+28000;"G$(";I$;")=STR$(CVS(F$( 


";i$; 


")))' 










1820 


IFK$="PD" 


THENPRINTtl,LN;"G$(";I$;")=MKD$(VAL(G$(";I$;" 


)))" 


1830 


IFK$="PD" 


THENPRINTtl, 1190 + 1; "IFUFO"; 1$; "THENG$( " ; 1$; 


")=MK 


D$(VAL(G$( n ;I$; n ))r 






1840 


IFK$="PD" 


THENPRINTtl ,RL+280 ; "G$ ( " ; I $ ; " ) =STR$ ( CVD ( F$ ( 


";i$; 


")))* 










1850 


IFK$="N"ORK$="C"THENPRINTtl,RL+28000;"G$(";I$;")=F$("; 


i$;") 


1860 


RL=RL+10 


LN=LN+10 : PRINTtl ,LN; "RETURN" :NEXTI 




1870 


PRINT#1,' 


10200 


GOSUB28000" 




1880 


PRINT#l f ' 


11200 


GOSUB280 00" 




1890 


PRINTtl,' 


12200 


GOSUB28000" 




1900 


PRINTtl,' 


1005 FC=FC+1" 




1910 


PRINTtl,' 


1006 ONFCGOSUB"; 




1920 


FORI=lTOA-l : PRINT#1 , MID$ ( STR$ ( D% ( I) -10 ) , 2) ; " , " ; : NEXT : PRINT* 


1,D%(A)-10 








1930 


PRINTtl,' 


1007 IFFC< n ;A;"THHNl00 5ELSE I, ;LN+10 




1940 


PRINTtl,' 


10010 


CLS:GOSUB 270 00 'TRY 


TO FI 


ND THE RECORD* 








1950 


PRINTtl," 


10199 


REM******UNPACK THE FIELDS IN THE FILE 


FOR D 


ISPLAY******" 








1960 


PRINTtl, "11010 


CLS:GOSUB27000 'TRY 


TO FI 


ND THE RECORD 








1970 


PRINT#1, "11199 


REM******UNPACK THE FIELDS IN THE FILE 


FOR D 


ISPLAY******" 








1980 


PRINT#1, 


12010 


CLS:GOSUB27000 'TRY 


TO FI 


ND THE RECORD 








1990 


PRINT#1, 


12199 


REM******UNPACK THE FIELDS IN THE FILE 


FOR D 


ISPLAY******" 








2000 

It " 


PRINTtl, 


10799 


REM******DISPLAY RECORD IF MATCH ON KEY***** 


2010 


PRINT#1, 


10800 


GOSUB29000" 




2020 

*•* 


PRINTll, 


11799 


REM******DISPLAY RECORD IF MATCH ON KEY***** 


2030 


PRINTtl, 


11800 


GOSUB29000" 




2040 


PRINT#1, 


•12799 


REM******DISPLAY RECORD IS MATCH ON KEY***** 


2050 


PRINT#1, 


'12800 


GOSUB29000" 




2060 


PRINT#1, 


'28998 


RETURN" 




2070 


PRINTtl, 


'28999 


REM******DISPLAY FOUND RECORD******" 




2080 


PRINTtl, 


'27999 


REM ****** UN p AC K FIELDS IN RECORD****** 


f 


2090 


PRINTtl, 


'29000 


CLS:IF OS=0 THENPRINT";Q$;"IS THIS IT? 


(PLEA 


SE PRESS Y IF 


CORRECT) ";Q$ 




2100 


PRINTtl, 


'29010 


FORI=lTO";A 




2110 


DIMH$(22 








2120 


PRINT"WHEN THE 


DATA IS DISPLAYED, WHAT TITLE WILL EXPLAIN T 


HE DATA IN" 








2130 


FORI=lTOA 






2140 


PRINT"FIELD NUMBER:";I; :LINEINPUTH$( I) 




2150 


PRINTtl, 


22000+I;"DATA ";H$(I) 




2160 


NEXT 








2170 


PRINTtl, 


'29020 


READR$:PRINTR$;";Q$;":";Q$;";G$(I) "; 




2180 


PRINTtl, 


, ; n ;"TAB(50) ;";";" ;Q$; "FIELD t";Q$;";I" 




2190 


PRINTtl, 


'29030 


NEXT: RESTORE" 




2195 


PRINTtl, 


'29035 


IF OS=l THEN RETURN" 




2200 

if it it it 


PRINTtl, 


'12900 


REM******DELETE CODE WRITTEN IN ALL FIELDS** 


2210 


PRINTtl, 


'12905 


R%=(RP-1)/";R%;"+1:P%=(RP-1)-(R%-1)*"; 


*% 


2220 


PRINTtl, 


'12910 


FIELD 1,";RR;"*P% AS DX$,";RR;" AS DL$ 


LSET 


DL$= 


3TRING$(255,250 


:PUT l,R%:GOTO";SL 




2230 


PRINTtl, 


*29050 


AN$=INKEY$:IFAN$=";Q$;Q$;"THEN29050" 




2240 


PRINTtl, 


'29055 


IFAN$O";Q$;"Y";Q$;"THENGOSUB27040:GOSUB280 


0:GOTO29000" 








2250 


PRINTtl, 


"10860 


GOTO";SL 




2260 


PRINTtl, 


"11810 


PRINT" ;Q$; "WHAT FIELD NUMBER DO YOU WANT TO 


UPDATE? ";Q$ 








2270 


PRINTtl, 


"11820 


INPUTUF" 




2280 


PRINTtl, 


"11840 


IFUF>";A;"ORUF<lTHENPRINT";Q$; "INVALID 


FIELD 


";Q$ 


;":GOTO11810" 






2300 


PRINTtl, 


"11860 


ONUFGOSUB"; 




2310 


FORTZ=1TOA-1 : PRINTtl ,MID$ ( STR$ ( D% ( TZ ) -10 ) , 2) ; " , " ; : NEXT: PRIN 


T#l, 


D%(A)-10 








2320 


PRINTtl, 


"11865 


R%=(RP-1)/";R%;"+1:P%=RP-1-(R%-1.)*";R% 




2330 


PRINTtl, 


"11870 


IFUFO" ;KF;"THEN11900ELSEZZ$=G$(";KF;" 


:FIEL 


Dl," 


RR;"*P% AS DX$ 


,";RR;"AS DL$:LSET DL$=STRING$(255,250) 


:PUT 1 


,R%: 


3OSUB26000" 






2340 


PRINTtl, 


"11900 


REM******BEGIN OUTPUT******" 




2350 


PRINTtl, 


"11995 


";OF$ 




2360 


PRINTtl, 


"11998 


REM******INSERT CHANGED FIELDS INTO RECORD A 


ND SEND****** 


n 






2370 


PRINTtl, 


"11999 


FORI=lTO";A;":LSET F$( I) =G$ ( I) :NEXT:PUT 1,R% 


:GOTO";SL 














Listing I continues 
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Words are not enough. 




Experience goes beyond words. We believe adven- 
tures should too. The Asylum Series is Med Systems' 
premiere line of 3-D graphics adventures for the 
TRS-80 and IBM personal computers. What is an 
Asylum? An Asylum is a real-time simulation that 
takes place in a building with 1500 locations. Both are 
inhabited by crazed inmates, sadistic guards, and evil 
doctors. Your goal? ESCAPE! 

Our 3-D graphics are recognized throughout the in- 
dustry for their machine-language speed and clarity. 
Hallways recede into the screen as though you are ac- 
tually there. Doors open and close. Beds, desks, and 
other inmates are drawn on the screen. Instantaneously! 

Asylums understand complete sen- 
tences, not just choppy one and two word 
commands. Sentences like "Drop every- 
hing on the desk except the matches" are 
interpreted and acted on instantly. Fur- 
ther, the command "VOCABULARY" will 
show you the entire dictionary, eliminat- 
ing the need to second-guess program de- 
signers you have never met. 

But don't take our word for it. See the 
reviews in '80 Microcomputing (Feb. 1981, 
Aug. 1981, May 1982). And remember, 
Med Systems offers to refund your money 
if you aren't satisfied. Just return the 
game within 14 days of receipt. 



Although Asylum II is the sequel to 
Asylum I, you need not have played one to 
play the other. Asylum I and Asylum II re- 
quire at least 16K of RAM, and are avail- 
able on tape or disk (please specify). Hint 
sheets are available for each Asylum for 
$1.00. 



lum I 

(cassette or diskette) .. $19.95 
Asylum II 

(cassette or diskette) .. $19.95 
Asylum I & Asylum II 

(one diskette) $34.95 



MED SYSTEMS SOFTWARE 

P.O. BOX 3558 CHAPEL HILL, NC 2751 4 
TO ORDER, CALL 1 -800-334-5470 

Or see your dealer. 
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WHY BUY A JOY 
wf STI CK TWICE ! 

u sWeadyhave 
Atari Joystick, 

can use'i+Wfour 
WtHiOUrKrf- 

JOY STICK KIT "^ 

Without Joy Stick Model l/lll $15.95 

With Joy Stick Model l/lll $26.95 

— Be Your Own SYSOP !!!!!— 

Bullet-80 Bulletin Board Model I $130.00 

Bullet-80 Bulletin Board Model III $150.00 

Screen Artist ll-Create Graphics, 

Save As Basic Routines $32.95 

Panik-New From Fantastic Software 

Model l/lll Disk $24.95 

Panik-Model l/lll Tape 16K $19.95 

Bounceoids-New From Cornsoft 

Model l/lll Disk $19.95 

Bounceoids-Model l/lll Tape $15.95 

We Also Have In Stock A FULL LINE Of Software 
From ALL The Major Houses. 
Please Call For Information About Any Products. 
After-Market Computer Gallery* ^ 257 
P.O. Box 993 

14 Summit Street (Mail Order) Aft 

1 Franklin Street (Retail Outlet) ^^ 
Danbury, CT 06810 m£^ 

Voice Line -203 743-1299 

Bullet 80 Computer Line - 203 744-4644 

(300/1200 Baud) 

•A Division 0* Computer Services Of Danbury 



PEl/Tnlnl announces two great new 
machine language arcade games w/sound 
for TRS-80 MOD I or III, disc or tape 




You're a rabbit trying to get to your cove! Cross 
highways and rivers-dodge moving cars and trucks-jump 
from boat to boat - an incredible journey. Gets harder 




Play fast paced indoor soccer against a 
friend or the computer. Dribble, pass, steal the 
ball, use the boards-control the whole team!! 
When you're done, lay down-exhausted. ^ 324 




P.O BOX 1026 
SOUTHAMPTON 
PENNA 18966 
215-947-2334 



*• Specify Mod I or III. disc (32) 
or tape <16k) 

* Add $2.00 postage and handlir 

* Phone or mail / 3C & <S5! accf 

* Dealers inquiries welcome" . 

* Pa. residents add 6% sales ta> 



Listing I continued 

2380 PRINTtl, "27000 

2390 PRINTtl, "27010 

2400 PRINTtl, "27020 

2410 PRINTtl, "27030 

NE, GET POS." 

2420 PRINTtl, "27040 

IN AGAIN @ tl" 

2430 PRINTtl, "27045 

2440 PRINTtl, "27046 

2445 PRINTtl, "35005 

2450 PRINTtl, "27047 

2460 PRINTtl, "27050 

NRETURN" 

2470 PRINTtl, "27055 

,R% : IFZY$=STRING$ ( " ; 

$;":RUN" 

2490 PRINTtl, "27057* 

2500 PRINTtl, "27060 

2510 PRINTtl, "29999 

******* 



REM******LOOK FOR RECORD SUBROUTINE******" 

GOSUB " ; D% ( KF) -10 ; " : KF $=G$ ( " ; KF ; " ) " 

OS=0" 

ZZ$=KF$:GOSUB26000 'GO TO HASHING ROUTI 

RP=RP+1:IFRP>";MS;"THENRP=1 "NOT FOUND? BEG 

R%=(RP-1)/";R%;"+1:P%=(RP-1)-(R%-1) *";R% 

";OF$ 

";OF$ 

IF OS=l THEN GET 1,R%: RETURN" 

GET 1,R%:IFLEFT$(F$(";KF;") ,LEN( ZZ$) ) =ZZ$THE 

FIELD 1,";RR;"*P% AS DX$,";RR;" AS ZY$:GET 1 
RR;", 255) THENPRINT" ;Q$; "RECORD NOT FOUND. ";Q 

;OF$ 

GOTO27040 'NO MATCH: TRY NEXT RECORD" 

REM******NUMERIC FIELD EDIT CHECK SUBROUTINE 



2514 PRINTtl, "30002 CD=INSTR(CD$, ";Q$; "-";Q$; ") : IFCD>0 AND INSTR 
(CD+1,CD$,";Q$;"-";Q$;") >0 THEN E=1:RETURN" 

2515 PRINTtl, "30000 CD=INSTR(CD$,CHR$(32) ) : IFCD>1THENCD$=LEFT$(C 
D$,CD-1)+MID$(CD$,CD+1) :GOTO30000:ELSE IF CD=1THENCD$=MID$(CD$,2 
) :GOTO30000" 

2520 PRINTtl, "30005 FORZZ=lTOLEN(CD$) " 

2530 PRINTtl, "30010 IFMID$(CD$,ZZ,1) <";Q$; "0";Q$; "ORMID$(CD$,ZZ, 

1) >";Q$;"9";Q$;"THENIFMID$(CD$,ZZ,1) <>";Q$; " . " ;Q$; "ANDMID$(CD$,Z 

Z,l) <>";Q$;"-";Q$;"THENE=1:RETURN" 

2540 PRINTtl, "30020 NEXTZZ" 

2550 PRINTtl, "30030 RETURN" 

2560 PRINTtl, "30999 REM******ALPHA FIELD EDIT CHECK SUBROUTINE** 

2570 PRINTtl, "31000 FOR ZZ=lTOLEN(CD$) " 

2580 PRINTtl, "31010 IF(MID$(CD$,ZZ,1) <" ;Q$; "A" ;Q$; "ORMID$(CD$,ZZ 

,1) >";Q$;"Z";Q$;")ANDMID$(CD$,ZZ,1) <>CHR$ ( 32) THENE=1: RETURN" 

2590 PRINTtl, "31020 NEXTZZ" 

2600 PRINTtl, "31030 RETURN" 

2610 LN=LN+10:PRINTtl,LN;"ZZ$=G$(";MID$(STR$(KF) ,2) ;") :GOSUB2600 

0" 

2620 PRINTtl, "25999 REM******HASHING ALGORITHM SUBROUTINE******" 

2630 PRINTtl r "26000 FORZZ=lTOLEN( ZZ$) " 

2640 PRINTtl ,"26010 Xt=Xt+ZZ*ASC(MID$(ZZ$,ZZ,l) ) " 

2650 PRINTtl, "26020 NEXTZZ" 

2660 PRINTtl, "26030 Xt=Xt*Xt*Xt*Xt:X$=STR$(Xt) :RP=VAL(MID$(X$,5, 

4)) :Xt=0" 

2670 PRINTtl, "26040 RP=";MS; "*RP/9999:RETURN" 

26 80 LN=LN+10 : PRINTtl, LN;" REM******LOOK FOR RECORD SPACE******" 

26 90 LN=LN+10: PRINTtl, LN; "GOSUB" ;LN+10;":GOTO";LN+60 

2700 LN=LN+10 : PRINTtl, LN; "RP=RP+1: IFRP>" ;MS; "THENRP=1" 

2710 LN=LN+10: PRINTtl, LN; "R% = (RP-1)/";R% ; "+1:P% = (RP-1) -(R%-1) *"; 

R% 

2720 PRINTtl, LN+5; "FIELD 1,";RR;"*P% AS DX$,";RR;"AS ZY$" 

2730 PRINTtl, "11890 GOSUB" ;LN-10 

2740 LN=LN+10 : PRINTtl, LN; "GET 1,R% : IFZY$<CHR$( 250) THEN"; LN-20 

2750 LN=LN+10:PRINTtl,LN;OF$ 

2760 LN=LN+10:PRINTtl,LN; "RETURN" 

2770 LN=LN+10 : PRINTtl, LN;"FORK=lTO"; A 

2780 LN=LN+10:PRINTtl,LN;"LSET F$(K) =G$(K) :NEXT:PUT 1,R%" 

2790 CLS:PRINT"NOW WE ARE ALMOST DONE. WE NEED TO ASK IF THE OPE 

RATOR IS DONE." 

2800 PRINT"NOTE: DONE REFERS TO DATA ENTRY OPERATIONS ONLY!" 

2810 PRINT"YOU MAY CHOOSE THE MESSAGE YOU WISH. THE OPERATOR'S R 

EPLY WILL" 

2820 PRINT"BE LIMITED TO A SINGLE KEY DEPRESSION. I'D SUGGEST A 

MESSAGE" 

2830 PRINT"OF THE FORM ARE YOU DONE(Y/N)?" 

2840 PRINT"TYPE IN YOUR MESSAGE BELOW." 

2850 LINEINPUTTM$ 

2860 PRINT" IF THE OPERATOR IS NOT DONE, WHAT SHOULD THE REPLY BE 

?" 

2870 ND$=INKEY$:IFND$=""THEN2870 ELSEPRINTND$ 

2880 PRINT" IF THE OPERATOR IS DONE, WHAT SHOULD THE REPLY BE?" 

2890 ID$=INKEY$:IF ID$=""THEN2890 ELSEPRINTID$ 

2900 LN=LN+10:PRINTtl,LN;"PRINT";Q$;TM$;Q$ 

2910 LN=LN+10 : PRINTtl, LN; "TM$=INKEY$: IFTM$=" ;Q$;Q$; "THEN" ;LN;" EL 

SEPRINTTM$":BL=LN-10 

2920 LN=LN+10: PRINTtl, LN;" REM******IF DONE, END: IF NOT, RETURN 

TO MENU, ELSE REPEAT***" 
2930 LN=LN+10: PRINTtl, LN; "IFTM$<>" ;Q$;ID$;Q$; "AND TM$<>" ;Q$;ND$; 
Q$; "THENPRINT" ;Q$; "PLEASE ANSWER " ;Q$; " ; " ;Q$; ID$;Q$; " ; " ;Q$; " OR 
";Q$;";";Q$;ND$;Q$;":GOTO";BL 

2940 LN=LN+10 : PRINTtl, LN; "IFTM$=" ;Q$; ID$;Q$; "THEN" ;SL 
2950 LN=LN+10: PRINTtl, LN; "FORI=1T022:G$( I) =";Q$;Q$; ":NEXT:FC=0:U 
F=0:CLS:GOTO1000" 
2960 CLOSE: END 
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AMAZING! 

NEW LOW PRICE— $99.50 

How else can you describe the Exatron Stringy Floppy system? You could 
say that it's an under $100, compact, reliable, robust, high-speed, 
computer-controlled, easy-to-use, well-supported alternative to disk 
drives, for a Model I or III TRS-80— simply amazing! 

Amazing Technology 

Based on a special endless-loop tape cartridge, called a Wafer, the 

ESF system was designed specifically for computer data storage. 

The direct-drive transport mechanism has only one moving part, 

and data is transferred to and from the tape at a rate of 7200 baud. 

Amazing System 

Thousands of ESF buyers have been amazed by 16K programs loading 

in less than 20 seconds; automatic verification of saved programs; up 

to 70K bytes, and 99 files, on a single Wafer; a ROM operating system 

(RAM based in Model III); no need for an expansion interface; and 1-year 

parts and labor warranty. 

Amazing Support 

With an ESF system you don't just get a piece of hardware, you get total 
support with hundreds of user workshops; dozens of high-quality, reason- 
ably priced programs (such as Electric Pencil 2.0, Electric Spreadsheet, 
File Management System and Technical Word Processor); access to 
hundreds of FREE public-domain programs; an @NEWS user 
column in 80-US; @LOAD program magazine; and a 
jfitofm^ toll-free information line. 



Amaze Yourself 

To see for yourself how amazing the ESF sys- 
tem is, or for more detailed information, call 
us toll-free at 800-538-8559 (inside Cali- 
fornia 408-737-7111) and take advantage 
of our 30-day money-back return policy. 
Copies of the 80-page manual are available 
for $4.95 (which you can credit towards an 
ESF), and while you're on the line ask about 
our equally amazing 64K RAM/ROM board 
for the Model I. 




fci 
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TRS-80 is a trademark of Tandy Corporat, 
Stringy Floppy is a trademark of Exatron Corp 




excellence in electronics 

exatron 

181 Commercial Street, 
Sunnyvale, CA 94086 




Microline 83A 

DOT MATRIX PRINTER 



$694.88 



UPS DELIVERED 



1 20 cps, bi-directional, losic-seeking print action 
Parallel & RS-232C interfacing standard 
True descenders on 9x9 matrix, full 96 character ASCII 
Program-selectable pitch, emphasis, & linespacing 
Rear & bottom paper paths take four-part forms 

OKIGRAPH Dot-addressable ROM *44» 



PRINTERS 

Anadex DP-9500A $1459.88 

Anadex DP-V50IA $1459.88 

Anadex DP-9629A $1549.88 

Centronics 122-1 $829.88 

Centronics 122-3 949.88 

Centronics 352 $1649.88 

Centronics 353 $2324.88 

C Ron Prcrwnter $499.88 

W/RS-232C $614.88 

C. Itoh Prownter 2 $734.88 

W/RS-2J2C $794.88 

C.lton F-10 Starwnter, 40 cps 

Parallel or RS-232C $1499.88 

Cltoh F-10 Printmaster, 5b cps 

Parallel or R5-232C $1799.88 

F-10 Traaor $289.88 

Dasywriler 2000 $1089.88 

Daswvnter Tractor $149.88 

Daeywriter Cable $49.88 

DMP-85 Printer $469.88 

/ 




The "generic' version of the NEC & 
Prownter. Features 120 cps, bi-direc- 
tional, logic-seeking print action. 9 
pin printhead produces 4 fonts (in- 
duding proportional), 8 sizes, sub- 
scripts, superscripts, underlining & 
Greek/math fonts. Dot-addressable 
graphics matrix is 160 x 144 dpi, with 
1/144" line feed Friction & tractor 
feed is standard (takes 9W paper). 

IDS Micropnsm $684.88 

IDS Prism 80 $1174.88 

Pnsm 80 w/4-color $1539.88 

IDS Prism 132 $1254.88 

Prism 132 w/4-color $1699.88 

Microline 80 $349.88 

Micrame 82A $439.88 

80/82A Tractor $59.88 



PRINTERS 

82A Ral Faper Hotaer $49.88 

tf/A Olograph ROM $44.88 

Microline 84 w/giapncs, tractor 

Parallel, 20u cps $1044.88 

KS-232C, 200 cps $1 164.88 

NEC PC-8023A $509.88 

NEC351U $1929.88 

NEC J5J0 $1809.8tt 

NEC JSSO $2199.88 

3500 Iractot $239.88 

NEC //I0 $2559.88 

NEC 7/30 $2559.88 

7700 Iractor $359.88 

Uume Spnnt 9/45 $2109.88 

Smith corona TP-l $599.88 

10 or 12 cp, parallel or KS-232C 

CALL FOR PRICES on Epson, DIP, MPI, 
Datasouth, Qume & otner pnnters. 

MODEMS 
i £ 4 

& V 




The LYNX 1RS-80 direct-connect 
modem features auto-del, auto-answer, 
0-300 baud transmission, Will work with- 
out KS-232C interface on Mooel Ills. 
Comes complete with hardware 

LYNX $229.88 




Hayes Smartmouems feature program- 
ability in any language, auto del & auto 
answer, full & half duplex, keyboard con- 
trol, uscr-selectadle prameters, / LhD 
status lights & an audo monitor. Comes 
complete with power supply and mod- 
ular telephone cable 

30u Baud $239.88 

HMO baud $569.88 

Signalman Mark I $89.88 

TRS-80 SOFTWARE 

DOSPLUS 3.4 

The preferred disk operating system tor 
Moaei I or III. Features BASIC array sort, 
(.multi-key, multi-array), active DO', de- 
vice routing, DOS command repeat, etc. 
Exceptional. Specify Model I a\lll, single 
or double track, 40 or 80 track drfve 
uOSPLUSJ.4 $119.88 

MICROTERM 

A terminal program Irom Micro- Systems 
Software, makers ol DOSPLUS. Micro- 
term supports the features on auto-del & 
answer modems like tne Lynx & Smart- 
mooem. Features pre-programmed del 
& transmit, direct me transfer, 34K capture 
buffer, and high operational baud rate 
(near 9600). Specify Model I or Model III 
when ordering 

Microterm $79.88 



Information & Orders 

(603)673-8857 

Orders Only: (800)-343-0726 
NO HIDDEN CHARGES 

FREE UPS snipping on all orders- No extra cierge to use credit caros-Ail equipment 
shipped factory f'esn witn manufacturer's warrancy-cOD orders accepted (S i0 lee 
added)— No purchase orders accepted— No foreign or APO orders accepted- 
minimum SSO per oroer— Prices subject td crenge. 



TRS-80 SOFTWARE 

NEWSCRIPT 

Prosoffs NEWSCRIPI is the oest woro 
processing software avaieole tor the IRS- 
8u Model I or ill. NtWbCWP I supports the 
features of most popular pnnters, in- 
cluding NEc, C Itoh, Okidata, Epson, 
Centronics, etc. 

NEWSCRIPT features true proportional 
spacing, single and double wrath type, 
subscripts, superscnpts, underlining, 
boldiace, multiple pitches, fun-screen 
editing, global searcn & replace, and 
customized form ' letters that also will 
create a MAIL LABEL (see below). 

A typeaheacl/pnntahead butter maxi- 
mizes printer & computer speeo. Plan 
English commands simplify operation 
and editing. NEWSCRIPT comes with a 
complete manual, including many ap- 
plications, and support from the 
authors, specify Model I or III 
when ordering 

NEWSCRIPT $109.99 

MAIL LABEL OPTION 
Create mailing ebes irom NEWSCRIPI 
hies. Format 2 up, 3 up, etc. lor use on 
envelopes, packages. Not a mail list pro- 
gram witn sort options. Available only 
with purchase of NEWSCRIPT (not as an 
upgrade). 
Mailing Label Option $15.00 

SCRIPSIT/NEWSCRJFT CONVERSION 

lakes either Electric Pencil or Scnpsit hies 
and converts them to NEWSCRIPT files. 
Upgrade your older library of tiles with 
tnts handy program. 
Scnptsit Conversion $15.00 

ELECTRIC WEBSTER 

A 50,000 word dictionary for NEWSCRIPT. 
It can be selected from the main menu, 
used, then returns you to mam menu. The 
Electric Webster features bpell checking, 
options on change, & a browse' feature 
allowing you to choose spellings or to 
enter your own Fully compatible with 
NEWSCRIPI. 
Electric Webster $134.88 



HIGH TECHNOLOGY AT AFFORDABLE PRICES 

THE BOTTOM LINE 




MILFORD NH 03055-0423* 



Continued from p. 78 

failures, and operating system bugs 
had to do minimal damage to records. 
This condition meant I had to pre-al- 
locate all the space in a file. Doing this 
verifies that the disk (at least at the 
start) is error-free and has sufficient 
space to hold the proposed file. Fur- 
thermore, once all the space is pre-al- 
located, if any sector is damaged, only 
that sector is lost. Only a directory 
read error might damage the whole 
file; that was something I couldn't 
guard against. However, copying the 
directory from a back-up disk to the 
damaged disk would suffice to com- 
pletely recover the data, provided the 
data disk and its backup were identical 
in the directory. 

Pre-allocation assures that the two 
disks can be made to have identical di- 
rectories. The trade-off, here, is that 
initializing the data file becomes a ne- 
cessity, and adds to the time necessary 
to set up the generated program to 
run. After my Model I had crashed 15 
times or so, I was convinced I had 
made a wise choice. About 70 percent 
of the first 100 or so crashes were 
hardware-related, and I was able to 
successfully recover all data more than 
90 percent of the time. 

7. Anyone using my program gen- 
erator needed complete freedom to 
check for data-input errors, print er- 
ror-messages of his choice, display 
computed data based on fields in the 
record, update fields based on the re- 
sult of a computation, and state rec- 
ord length, field length, field type, and 
number of fields. 

8. Record space utilization had to 
be efficient. 

Fortunately, Microsoft Basic on the 
TRS-80 lets you pack any numeric 
data. Other Basics, such as CBasic or 
Applesoft, do not allow such space 
savings. CBasic, in fact, requires rec- 
ord and field delimiters or substring 
operations to extract field data. This 
capricious requirement is extraordi- 
narily wasteful of disk space: in fact, 
CBasic records can be as much as 8 
times as long as Microsoft packed 
data, and normally are about twice as 
large. Anyone who has bought CBasic 
for a computer that permits only a 
limited amount of disk storage (less 
than several megabytes) has, in my 
opinion, made a serious error. Even 
for a computer with essentially unlim- 
ited disk space, larger records mean 
longer access times. For many other 



reasons, CBasic is much the inferior of 
Microsoft, and (again in my opinion) 
Tandy's decision to put this extraordi- 
narily good version of Microsoft Basic 
on the TRS-80 was one of the best de- 
cisions they ever made. 

Incidentally, 1 find it almost incred- 
ible how many microcomputer manu- 
facturers produce and proudly sell 
machines as "business solutions" 
when simple things like packing data, 
multiple-precision arithmetic, line in- 
put, substring matching and print for- 
matting are impossible without all 
kinds of gyrations. If those nameless 
manufacturers of 6502-based toys had 
paid Microsoft to put a good Basic on 
their machines, I seriously doubt the 
cost would have amounted to as much 
as a dollar a machine. Yet nobody but 
Radio Shack, of all companies, saw fit 
to make this honest effort. Instead, 
the 6502-based computer manufactur- 
ers spent a lot of money on half-truth- 
ful celebrity advertising, graphics, and 
games. Then, promoting their ma- 
chines for business applications, they 
sold a ton of these game machines. 
Ah, well. 

9. The program generated needed 
to handle an indefinite number of 
records on an indefinite number of 
disks. 

Yet another reason to go to hash- 
ing: no key file space is needed, no 
tables to store in memory and take up 
program space, no worry about the 
time needed to do a binary search. The 
programs generated can handle mil- 
lions or billions of records, given a 
sufficient number of floppy disks and 
a patient operator. 

10. The program had to be easy to 
run, even for someone not knowing 
much about Basic. I tested the pro- 
gram on my associates, both of whom 
were well-qualified on this score. 

11. The program had to run in a 
single-drive 32K system, to maximize 
the number of possible customers. 

Unfortunately, this meant I could 
not continue improving my program 
past a certain point. Once memory be- 
came too short, I had to quit the im- 
provements and leave at least a little 
space to fix later bugs. The Creator 
will still run in a 32K machine, but it 
could have been a better program, 
with more error-checking and more 
capabilities. 

12. The generated program had to 
be as modular as possible, and permit 

Continues on p. 86 



iMDCflT 

Remarkable Disk Directory 

Catalog Si/stem 

For use on Radio Shack TRS-80 Model 

1 and 3 microcomputers. 

Unique abstract feature permittjibsitiue file identifi- 
cation. Catalog includes a first faKjjk-eirark fromeCjtaji'rype 
file. Includes human readaWeremarli* frdrn njAchjffe code 
files. Contains ID. name, date, frewg|>ace, nitspec, and 
remark. ^ VW '„,,©) "' *,. * 

Read any size dutupty'lram atj> si*« disl* of any density 
with any number. atliacks arithmympifeer of sides. Sort by 
any field. M<flti-foi-ma</j»rint in; ^rfy sorted order. Single 
sheet or ^jftyiuonf* foriws. Save: to disk option. Very fast 



machitftt 




User friendly. Complete 
itation. 
mSdEL and DOS when ordering. 
*lwo drives MIN and 48 K RAM. 



Satisfa< lion Guaranteed -- Ten day return privilege. 
SMp5 • $2.00 Shipping & Handling 
*Checflfc,,/ Money Order Visa Mastercharge* 
Don Fielding 
k 2207 N.W. 61 Place D Margate, FL 33063. 
(305) 972-6744 




MEMORY JOGGER" 

DATA BASE MANAGEMENT SYSTEM 
S34.00 

A Powerful, INEXPENSIVE, Relational 
DBMS For Home, Personal and 
Business use. 

• Extremely user friendly 

• Completely menu driven 

• Multiple keyword retrieval 

• For TRS-80 Models I & III 

(minimum configuration 48K, 
1 drive and TRSDOS) 



For disk, source code & manual, send 
check or money order for $34.00 ppd 
(specify model) or write for informafion 
brochure. 

MICRO SOFTWARE'™* 



205 Dumaine Court 

Ft. Walton Beach, FL 32548 

(904) 862-5588 



^209 



TRS-80 8t TRSDOS - trademarks of Tandy Corp. 



DISK DRIVES 

For Mod I, III & PC 

TAN DON 

TM 100-1 SS,40T $195 

TM100-2 DS.40T $259 

TM 100-3 SS,80T $275 

TM100-4 DS,80T $349 



Terms: Check. MasterCard. VISA 
N.J Residenls add lax Shipping extra. 



^215 



VLM 
Computer Electronics 

(201)267-3268 

10 Park Place, Morristown, N.J. 07960 



sSee List of Advertisers on Page 435 
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easy customization later. 

This meant that the program would 
not necessarily be generated with the 
line numbers in order, since the logical 
order in which the modules would be 
generated by the Creator would not 
match the order the modules would be 
placed in the program. Under TRS- 
DOS, NEWDOS, or CP/M, this does 
not cause any problem, because the 
actual line numbers used will be placed 
by the Basic interpreter in their correct 
order. Since anyone with a TRS-80 
has easy, cheap access to at least 
TRSDOS, and since any alternative 
operating system permits transfer 
from TRSDOS to itself, 1 believed 
there would be no problem in writing 
the program lines out of order. 

Anyone running an altered version 
of Microsoft Basic should check to see 
if their Basic meets this requirement 
before trying to run the Creator under 
their version of Basic. 

Design Limitations/ 
Possible Enhancements 

I could have made a number of 
modifications to the Creator. Custo- 
mers, associates, dealers, and friends 
asked me, in nice and not so nice ways. 
One dealer threatened to pirate my 
software with his modifications if I re- 
fused to do them myself. I refused, 
anyway. As far as 1 know, he didn't 
pirate the software. 

Here are the changes you might 
make, and the reasons I did not: 

/. Add a sort for the report pro- 
gram generator. I didn't do this for 
several reasons. First, any Basic sort 
program would be too slow. Second, 
any assembler sort would be nontrans- 
portable. Third, sort programs (then 
and now) are cheap. Why should I 
waste my time reinventing the wheel 
for a small return in a crowded field? 

Nonetheless, I did write a simple 
sort program for the Model II and the 
CP/M market. 1 came to regret it, too. 
Customers complained it was too slow 
and found numerous ways to make it 
even slower or fail to run at all. No 
sort in the world will sort a data file 
correctly when asked to sort the wrong 
field. 

2. Add user customization to the 
screen display. 1 refused to do this be- 
cause of memory problems. Fancy 
screen displays, in my opinion, are 
puffery for serious business applica- 

Continues on p. 89 



Program Listing 2 

10 CLS:PRINT"COPYRIGHT 1980 BY BRUCE W. TONKIN; ALL RIGHTS RESER 

VED" 

20 PRINT"SERIAL NUMBER=SAME AS CREATOR" 

30 PRINT"THIS IS THE REPORT WRITING PROGRAM. CHOOSE ONE OF THE F 

OLLOWING:" 

40 PRINT-RUN A PREVIOUSLY WRITTEN PROGRAM DEPRES 

S R" 

50 PRINT"WRITE A NEW REPORT DEPRES 

S W" 

60 PRINT-EXIT THE PROGRAM DEPRES 

S x- 

70 PRINT: PRINT" PLEASE ENTER THE LETTER CORRESPONDING TO YOUR CHO 

ICE"; 

80 A$=INKEY$:IF A$="" THEN 80 ELSE IF A$="R"THEN90 ELSEIFA$= 

"W"THEN110 ELSEIFA$="X"THEN1870 ELSEPRINT"YOU MUST CHOOSE EITHE 

R R, W, OR X. PLEASE TRY AGAIN. " :GOTO30 

90 PRINT A$ 

100 PRINT"WHAT IS THE NAME OF YOUR PROGRAM?" ; :LINEINPUTPN$: RUN P 

N$ 

110 CLEAR 3000 

120 PRINT A$ 

130 PRINT"WHAT IS TO BE THE NAME OF YOUR PROGRAM?" ; :LINEINPUTPN$ 

140 IF INSTR(PN$,"/") <lANDINSTR(PN$ f "/BAS")<lTHENPN$=PN$+"/BAS" 

150 OPEN"0" f l,PN$:Q$=CHR$(34) 

160 PRINT"WHAT IS TO BE THE TITLE OF YOUR REPORT? TYPE IT ON THE 

NEXT LINE" 
170 LINEINPUTT$ 

180 PRINT"WHAT FILE ARE YOU GOING TO READ FOR YOUR REPORT? TYPE 
ITS" 
190 PRINT"COMPLETE NAME. DO NOT OMIT THE FILE EXTENSION IF THERE 

IS ONE.". 
200 LINE INPUTF$ 
210 PRINT" IS THE REPORT TO GO TO THE SCREEN OR THE PRINTER (S/P) 

220 INPUT PR$:IF INSTR( "SP" ,PR$) <1 THEN 210 

230 IF PR$="S" THEN PR$="PRINT" :CL$="CLS" :GOTO250 

240 PR$="LPRINT":CL$="LPRINTCHR$(12) " 

250 PRINT#1,"10 CLEAR 5000" 

260 PRINT#l, n 30 T$=";Q$;T$;Q$;" 'REPORT TITLE" 

270 PRINT#1,"40 OPEN";Q$;"R";Q$;",l f ";Q$;F$;Q$;" 'OPEN REP 

ORT FILE" 

280 PRINT"WHAT IS THE RECORD LENGTH OF EACH RECORD (1-255) ";: INP 

UT RL:IF RL>255 OR RL<1 THEN PRINT"INVALID. " :GOTO 280 

290 NR%=256/RL 

300 PRINT"NOW YOU MUST DESCRIBE THE FIELDS IN EACH RECORD OF YOU 

R FILE." 

310 PRINT"YOU MUST GIVE THE FIELDS IN ORDER, FROM LEFT TO RIGHT. 

TELL ME" 
320 PRINT"HOW MUCH SPACE TO ALLOCATE TO EACH FIELD." 
330 PRINT"WHEN YOU ARE DONE, TYPE IN 999 AS THE AMOUNT OF SPACE. 

340 A=1:DIM F% ( 50) ,D$ ( 50) 

350 XZ=0 

360 PRINT"FIELD NUMBER" ; A; : INPUT F% (A) 

370 IF F%(A)=999 THEN410 ELSEIFF% (A) >RL THEN PRINT" INVALID. MUS 

T BE NOT GREATER THAN RECORD LENGTH. " :GOT03 60 

380 XZ=XZ+F%(A) :IF XZ>RLTHENXZ=XZ-F% (A) :PRINT"TOTAL EXCEEDS RECO 

RD LENGTH" :GOT03 60 

390 IFXZ=RLTHENA=A+1:GOTO410 

400 A=A+1:GOTO360 

410 XF$="FIELD 1,("+STR$(RL)+"*(CT-1)) AS DU$," 

420 PRINT#1,"50 DIM F$ ( " ; A-l ; ") ,P( " ; A-l; ") ,P$( " ; A-l ; ") ,C# ( 50) ,P# 

(";A-1;") ,C(50) ,C$(50) ,H$(50) " :A=A-1 

430 FOR 1=1 TO A-1:XF$=XF$+MID$(STR$(F%(I) ) ,2)+"AS F$( "+STR$( I) + 

") ,":NEXT 

440 XF$=XF$+STR$(F%(A))+"AS F$( "+STR$( A) +") " 

450 PRINT#1,"45 REM *****NOW WE DIMENSION THE MATRICES USED **** 

460 PRINT#1,"55 REM *****HERE WE SET UP THE FIELDS IN THE FILE * 

470 PRINT #1,"56 CT=0:RL=";RL 

480 PRINT"WHAT ARE YOUR COLUMN HEADINGS TO BE? PLEASE SET UP A L 

EG END FOR" 

490 PRINT"EACH COLUMN YOU WILL USE IN YOUR REPORT. TYPE IN 999 T 

END." 

500 DIM C$(25) 

510 B=l 

520 PRINT#1,"65 REM *****FOLLOWING ARE THE COLUMN HEADINGS ***** 

530 PRINT"COLUMN NUMBER" ;B; : LINE INPUT C$(B):IF C$(B) ="999"THENC 

$(B)="":B=B-1:GOTO550 

540 B=B+1:GOTO53 

550 LN=70 

560 FOR 1=1 TO B 

570 I$=MID$(STR$(I) ,2) :PRINT#1,LN;"H$("+I$+")=";Q$;C$(I) ;Q$:LN=L 

N+10:NEXT 

580 DIMT(50) 

Listing 2 continues 
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A Computer That 
Writes Programs 
For You. 

What will they think of next..? 



Your computer is fantastically fast, once it knows what 
to do. You probably realize that a computer is really 
the combination of hardware and software, working 
together smoothly, to give you what you want. Either 
one alone is useless. Software is really the key. ..the 
"mind" of a computer system. Every project or task 
you want to do requires a new specific software ap- 
plication to make it behave exactly the way you desire. 

Of course, you may be able to "force-fit" an application 
into some existing canned program you have, but to 
really get results, you need a separate application 
program to run on your computer. 

Until now, that meant you were forced to pay money 
for application software off the shelf, or if you could 
afford it, have it custom written for you, or, if you are 
qualified, do it yourself. ..spending endless hours 
figuring it out and writing it. Now, your computer can 
write individual application programs for you. These 
programs are each separate, unique software programs 
that run in standard Basic on your computer. 

A company named FutureSoft has developed this ex- 
citing and long awaited remarkable working tool for 
you. There are two versions called Quikpro+Plus and 
standard Quikpro. Both of them create unique separate 
Basic programs for you. ..to do exactly, precisely, what 
you want to do. And listen to this. ..you create a new 
program in minutes instead of hours. 

You can quickly generate a new program when you 
want it. You can generate thousands of different 
unique programs, each one standing alone as a com- 
plete program that runs in Basic. Best of all, you do not 
have to be a programmer to do it. The Quikpro soft- 
ware becomes your personal programmer, waiting to 
do your work for you any time of day or night you 
choose to use it. 

The custom programs you generate from this software 
provide for: Data Entry, Additions, Changes, Record 
Locating & Searches, great variety of Computations, 
and Report Printing (if you have a printer). It lets you 
decide what data to manipulate and how to manipulate 
it. It lets you decide the formats you want to appear on 
your screen and/or to print out in a report. It lets you 
use differing formats on the same data base. It lets' you 
make calculations from data within records without 
altering the data base. It lets you report results with or 
without including the base data from which results 
were calculated. 

All this is included in the ability/power of the program 
you create. You do it by simply answering questions 
that appear on your screen. Instantly, the Quikpro soft- 
ware instructs the computer to perform complex and 
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error free instructional sequences. You get the im- 
mediate benefits of professionally written software for 
your application. 

The resulting custom program is truly a separate Basic 
program. You can list it, you can modify it, you can ac- 
tually see what makes it tick. You can even ask it to 
print out its own operating instruction manual so others 
can run it for you. Finally, you can really tap the speed 
and power of your computer the way you really want. 
You can create new programs for every use you have in 
Business, Science, Education, and Hobby areas. And 
you can start now. 

The software is available immediately from the 
creators. It comes in two versions. If you want to 
generate separate Basic programs with all the data 
handling plus Calculations and Report Printing 
features, you want Quikpro+Plus. Specify to run on 
TRS80 Model I and Model III at only $149; to run on 
TRS80 Model II at $189. 

If you do not need Calculation ability or Report Print- 
ing in the separate Basic programs you will create from 
this program generating software, then standard Quik- 
pro will do the job for you. Standard Quikpro to run on 
TRS80 Model I or Model III is $89; to run on TRS80 
Model II is $129. (Later on you can always trade up to 
the Plus Versions for only the cost difference between 
the two). 

Both programs are available to run on many other 
computers besides TRS80. Details are available by 
calling or writing. 

You can order right now by phone or mail. If you have 
Visa/Mastercard, call toll-free from: 

All States except CA-AL-H I 1-800-824-7888 OP# 441 

From California call 1-800-852-7777 Op# 441 

From Alaska/Hawaii call 1-800-824-7919 Op# 441 

Operators on duty 24 hours daily. Operators can not 
answer technical questions. If you need technical in- 
formation or want to order from Canada or other 
nations, call 1-904-269-1918 during office hours, Eastern 
Time, Mon.-Fri. 

Send mail orders with check, money order or credit 
card information to: FutureSoft, P.O. Box 1446-D, 
Orange Park , Florida 32073. FutureSoft gives you a 
satisfaction or your money refunded guarantee for 10 
days from delivery. You can run the software yourself 
on your own computer and see with your own eyes 
what it can do for you. Order now. ^ee 
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Listing 2 continued 

590 PRINT"WE NEED TO SET THE TABS FOR YOUR" ;B; "COLUMNS. INDICATE 

THE SET:" 
600 FORI=lTOB 

610 PRINT"TAB SETTING FOR COLUMN NUMBER"; I; ":";: INPUT T(I) 
620 IF T(I)>255 OR T(I)<1 THEN PRINT"NOT A VALID TAB SETTING. ":G 
OTO610 
63 NEXT 

640 PRINT#1, "30050 DATA "; 
650 FOR 1=1 TO B-l 
660 PRINT#1,T(I) ;","; 
67 NEXT 
680 PRINT#1,T(B) 

690 LN=LN+10: PRINT* 1,LN;"PG=1 'INITIALIZE PAGE COUNTER" 
700 PRINT#l,LN+5;"REM*****NOW FOLLOWS THE RECORD RETRIEVAL SECTI 

QfJ***** » 

710 PRINT"DO YOU WANT THE PAGES NUMBERED (Y/N)?"; 

720 PG$=INKEY$:IFPG$=""THEN720 ELSE IF(PG$O n Y"ANDPG$<>"N") THEN 

PRINT" INVALID ANSWER. " :GOT07 10 

730 LN=LN+10:PRINT#1,LN;"FORI=1TO10000" 

740 LN=LN+10:KZ=LN 

750 LN=LN+10:PRINT#1,LN;"IFF$(1) <CHR$( 1) THEN20000" 

760 IFPG$="Y"THENPRINT"HOW MANY LINES PER PAGE" ; : INPUTL 

770 L=L-1 

780 PRINT"THE DATA TO BE PRINTED IN THE VARIOUS COLUMNS OF THE R 

EPORT" 

790 PRINT"COMES FROM THE FIELDS IN THE RECORD. NOW WE MUST FIND 

OUT WHAT" 

800 PRINT"KIND OF DATA IS IN EACH FIELD. YOU MUST TELL ME IF IT 

IS" 

810 PRINT "CHARACTER (C) , NUMERIC UNPACKED (N) , PACKED INTEGER (P 

I) ," 

820 PRINT"PACKED SINGLE PRECISION (PS) , OR PACKED DOUBLE PRECISIO 

N(PD) ." 

830 PRINT"YOU MUST DESCRIBE EACH FIELD IN THE RECORD. IF THERE I 

S A FIELD" 

840 PRINT" IN THE RECORD YOU ARE NOT USING, DESCRIBE IT AS CHARAC 

TER(C) ." 

850 FOR 1=1 TO A 

860 PRINT"FIELD NUMBER" ; I; " :LENGTH IS" ; F% ( I) ; " :DATA TYPE IS";:IN 

PUTD$(I) 

870 IFD$(I) <>"C"ANDD$(I) <>"N"ANDD$(I) <>"PI"ANDD$(I) <>"PS"ANDD$(I 

) <>"PD"THENPRINT"C,N,PI,PS,OR PD ARE THE ONLY VALID DATA TYPES." 

:GOTO860 

880 IF D$(I)="PI"ANDF% (I) <> 2 THEN PR I NT "WRONG LENGTH FOR PACKED IN 

TEGER.":GOTO860 

890 IF D?U)="PS"ANDF%(I) <>4THENPRINT"WRONG LENGTH FOR PACKED SI 

NGLE PREC I S ION . " : GOT08 6 

900 IFD$(I)="PD"ANDF%(I) <>8THENPRINT"WRONG LENGTH FOR PACKED DOU 

BLE PRECISION. ":GOTO860 

910 NEXT 

920 FORI=lTOA: PRINT"FIELD NUMBER: " ; I ; "LENGTH=" ; F% ( I) ; "TYPE: " ;D$ ( 

I) :NEXT 

930 PRINT"ARE THESE FIELD DEFINITIONS CORRECT? DEPRESS N FOR NO. 

940 JX$=INKEY$:IFJX$=""THEN940 ELSEIFJX$O"N"THEN980 

950 PRINT"WHICH FIELD IS NOT CORRECT? TELL ME THE NUMBER. " ; INPUT 

I 

960 PRINT"WHAT IS THE DATA TYPE?" ;: INPUT D$(I) : IFD$( I) <>"N"ANDD$ 

(I) <>"C"ANDD$(I) <>"PI"ANDD$(I) <>"PS"ANDD$( I) <>"PD"THENPRINT"INVA 

LID TYPE.":GOTO960 

970 IF(D$(I)="PI"ANDF%(I) <>2) OR(D$ ( I) ="PS"ANDF% ( I) <>4) OR(D$( I) =" 

PD"ANDF%(I) <>8) THENPRINT "WRONG LENGTH FOR DATA TYPE. " :GOTO960 

980 PRINT: FOR 1=1 TO A 

990 LN=LN+10:IFD$(I)="C"ORD$(I)="N"THENPRINT#1,LN; "P$( " ; I; ") =F$( 

";I;")" 

1000 IFD$(I)="PI"THENPRINT#1,LN;"P(";I;")=CVI(F$(";I;") ) " 

1010 IF D$(I)="PS" THENPRINT#1,LN;"P(";I;") =CVS (F$ ( " ; I; ") ) " 

1020 IF D$(I)="PD" THENPRINT#1,LN;"P#(";I;")=CVD(F$(";I;") ) " 

1030 NEXT 

1040 PRINT"NOW WE MUST DESCRIBE WHAT IS TO GO INTO THE COLUMNS 

F THE" 

1050 PRINT"REPORT. YOU MUST WRITE SENTENCES OF THE FOLLOWING FOR 

M:" 

1060 PRINT"COLUMN(5) =FIELD(2) +FIELD(5) " 

1070 PRINT"COLUMN(l)=(FIELD(2)-FIELD(6) )/FIELD(7) 

1080 PRINT"IF COLUMN$(3)=";Q$; "JOHNSON", -Q$; "THEN COLUMN (3) =473 .6 

4" 

1090 PRINT"Vl=COLUMN(l) /COLUMN (2) : V2=100*Vl : COLUMN (3) =V2 

1100 PRINT"IF FIELD(3)=<0 THEN SKIP" 

1110 PRINT"IF FIELD(4)<100 OR FIELD$ ( 7) =" ;Q$; "LAWYER" ;Q$; "THEN S 

KIP" 

1120 PRINT :PRINT"WHERE THE V ARE WORK VARIABLES AND THE COLONS C 

AN BE USED TO" 

1130 PRINT" SEPARATE ANY ADDITIONAL COMMANDS YOU MAY WANT TO EXEC 

UTE ON THE" 

1140 PRINT"SAME LINE. THE COMPUTER READS THE COMMANDS FROM LEFT 

TO RIGHT." 

Listing 2 continues 



A Word About Documentation 

Frankly, the original documentation 
for the TRS-80 Model I and II versions 
of the Creator and Reportor was not 
very good. All the information you'll 
probably need was there — somewhere. 
Finding it was a little tricky. I don't 
think I write that poorly. But I made 
several errors when writing the manual. 
Here's were I went wrong. 

First, I wrote the entire manual on a 
typewriter. After you've typed 60 or 80 
pages, you'll find that it's too late and 
too frustrating to revise and add materi- 
al. Proofreading is more trouble than it 
should be. Making copies is a chore. 

I suggest that you write your manual 
with a word processor. Any is better 
than none at all — it is not possible to do 
worse than with a typewriter and paper. 

Second, I wrote the manual myself. 
Nothing wrong there, except that I 
wrote the programs. It's difficult for a 
programmer to anticipate the questions 
and errors a user might make. If you 
must write the manual yourself, have 
some interested and intelligent nonpro- 
grammer read your copy and make sug- 
gestions. Then give the manual to sever- 
al idiots and ask them to run your 
program. Watch how they go wrong 
and take notes, but do not help them. 
When you've recovered from the shock, 
rewrite your manual and try the whole 
procedure again. Repeat, using differ- 
ent idiots, until even they get every- 
thing right. 

Third, one of the associates absolute- 
ly insisted that the manual be retyped to 
make a camera-ready copy. If you use a 
word processor, do not (under any cir- 
cumstances) permit this step. When 
my Apple manual was retyped, it ended 
up with over 100 typographical errors 
(the associate didn't believe in proof- 
reading), some of which were disas- 
trous. The first 100 copies had to be dis- 
carded, and this was the single act that 
led to the demise of the corporation. 

Beg, borrow, or steal a good letter- 
quality printer. Dump your manual to 
it. Any error will be yours. 

Fourth, be careful to organize your 
manual well. Include plenty of indexes, 
and a table of contents. The contents 
should be organized logically, so that 
anyone running the program will not be 
skipping from one section to another. 
Put anything technical in appendices. 

Fifth, include lots of examples, in- 
cluding at least one complete run- 
through of your program. 

Finally, be prepared to have users ig- 
nore the manual, and reviewers criticize 
it for shortcomings. My experience has 
been that only about 20 percent of the 
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Continued from p. 86 

tions. Furthermore, after investigating 
the matter, I decided that the ques- 
tions I would have to ask, and the pos- 
sible input errors I would need to 
check, would require enough memory 
to demand a 48K machine. Not only 
that, but such routines would make 
the Creator and the generated pro- 
grams less transportable. 

3. Add routines to mask input, 
character by character, for undesir- 
able responses. Again, Basic was too 
slow and assembler too nontransport- 
able. Even worse, such routines seem 
to provoke garbage collection on the 
part of the Microsoft interpreter; the 
worst time to have something like gar- 
bage collection is during data input. I 
thought this modification would be a 
terrible one, and still do. 

4. Add more features: more error 
checking, more help messages, flexible 
levels of help messages, etc. The prob- 
lem here was simple. I wanted to do 
this, but memory limitations did not 
permit it. 

5. Separate the "get the user re- 
sponse" section from the "generate 
code" section. I thought about this 
and rejected it for the TRS-80 market. 
The modification was attractive and 
would have freed more memory for 
each module, but it would have made 
the Creator more complex to operate 
and would have demanded a more so- 
phisticated operator than I saw at the 
time. I still think this was the right 
decision; I can remember getting some 
unbelievable calls for support from 
people who didn't know how to for- 
mat disks, enter Basic, or load pro- 
grams. Adding another program 
module meant another module to de- 
stroy or misunderstand. 

I made this modification for the 
CP/M market. The file containing the 
operator responses looks like a Basic 
program to the Microsoft interpreter, 
and can be loaded and modified with- 
out rerunning the program generator. 
The "generate program specifica- 
tions" module is separate from the 
"generate a program from specifica- 
tions" module. Indeed, the latter con- 
sists of three separate programs, in the 
CP/M version. Operators haven't had 
much trouble with this, so perhaps I 
was wrong to leave it out of the 
TRS-80 version. 

Continues on p. 91 
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"I BOUGHT IT" 

"My biggest loss 
of programming 
time using 
Snappware's 
EXTENDED BASIC 
is spent 
inserting 
my diskette." 

SCOTT ADAMS -PRES. OF ADVENTURE INTL. 




Reduce your programming time significantly with Snappware's EXTENDED 
BASIC. The program is written entirely in machine language., for super fast 
execution and is fully integrated into the TRSDOS* BASIC interpreter, re- 
quiring no user memory. Here are just some of the ways EXTENDED 
BASIC can make your programming task easier: 

• Quick way to recover BASIC program following a New, System 
. or Accidental re-boot. 

• Single character abbreviations for the most frequently used 
commands. 

• Six single key stroke commands to list the first, last, previous, 
next or current program line. Even edit current line. 

• A powerful cross-reference facility with output to display 
and/or printer. 

• Ability to trace a variable through the code. 

• Determine easily if a variable is in use. 

• Permits programmer to display and/or print the value of any or all 
program variables. 

• Identifies the variable type for all variables. 

• Lists each element of any array separately. 

• Program line renumbering facilities allowing for specification of 
an upper Jimit of the block of lines to be renumbered, relocation 
of renumbered blocks of.code and duplication of blocks of code. 

• Cross reference facility for key words and character strings including 
global replacement of key works. 

• Compresses your BASIC program to an absolute minimum by remov- 
ing extraneous information. 

• Merge lines. 

• Deletes statements that could not be executed. 

If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 



'TRSDOS™ Tandy Corporation 



MODEL II . . . 
MODEL III . . 



. . .$200.00 
. . .$125.00 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENT&CALL 
COLLECT: (513) 891-4496 
3719 Mantell 
Cinti., Ohio 45236 
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Listing 2 continued 

1150 PRINT" *=MULTIPLICATION, /=DIVISION, [=EXPONENTIATION, -=SUB 

TRACTION," 

1160 PRINT"AND + IS EITHER ADDITION OR CONCATENATION." 

1170 PRINT"DEPRESS ANY KEY TO CONTINUE." 

1180 AN$=INKEY$:IFAN$=""THEN1180 

1190 CLS: PRINT "YOU MUST REMEMBER TO ENCLOSE CHARACTER DATA WITH 

QUOTES . " 

1200 PRINT"YOU MUST ALSO REMEMBER TO PUT A $ SIGN AFTER A COLUMN 

1210 PRINT"WHICH WILL PRINT STRING DATA. PLEASE REVIEW YOUR MANU 

AL." 

1220 PRINT"BECAUSE THIS IS VERY IMPORTANTl FOLLOW THE EXAMPLES G 

IVEN." 

1230 PRINT"COLUMNS WHICH CONTAIN DOUBLE PRECISION NUMBERS SHOULD 

BE" 

1240 PRINT" INDICATED BY APPENDING A # SIGN, AS IN THE EXAMPLES." 

1250 PRINT"YOU CAN STORE RUNNING TOTALS WITH STATEMENTS LIKE:" 

1260 PRINT n V3=V3+FIELD(6) " 

1270 PRINT: PRINT"YOU MAY TYPE AS MANY -MANIPULATIONS AS YOU WANT 
FOR ANY COLUMN" 

1280 PRINT" IN ANY ORDER. TYPE IN 999 <ENTER> WHEN YOU ARE COMPLE 

TED." 

1290 M$=STRING$(50,32) 

1300 LINEINPUTSX$:IFSX$="999"THEN1470 

1310 C=INSTR(SX$, "FIELD") : IFC>1THENSX$=LEFT$(SX$,C-1) +"P"+MID$(S 

X$,C+5) :GOTO1310 

1320 IFC=1THENPRINT"FIELDS CANNOT BE REDEFINED. PLEASE REVIEW DO 

CUMENTATION.":GOTO1300 

1330 D=INSTR(SX$, "COLUMN") :Dl=INSTR(SX$, "=") 

1340 C=INSTR(SX$,"OLUMN") : IFC>1THENSX$=LEFT$(SX$,C-1) +MID$(SX$,C 

+5) :GOTO1340 

1350 IFC=1THENPRINT"SYNTAX ERROR. " :GOT013 00 

1360 PRINT"IS THIS OK? IF NOT, DEPRESS N TO DELETE THE INSTRUCTI 

ON." 

1370 JX$=INKEY$:IFJX$=""THEN1370 ELSEIFJX$="N"THEN1300 ELSEPRINT 

"OK, READY FOR NEXT COMMAND (999 TO EXIT)" 

1380 IF LEFT$(SX$,1)="V" OR LEFT$(SX$,2) ="IF" THEN LN=LN+10:PRIN 

T #l,LN;SX$:GOTO 1300 

1390 IFD<10RDKDTHENPRINT"WAIT A MINUTE. 

ITION: RE-INPUT. ":G0T013 00 

1400 LN=LN+10 : PRINT #1,LN;SX$ 

1410 D=INSTR(SX$,"(") :D1=INSTR(SX$,")") :D$=MID$(SX$,D+1 ,Dl-l) 

1420 D=INSTR(D$," ") : IFD=1THEND$=MID$(D$,2) :GOTO1420 

1430 IFD>1THEND$=LEFT$(D$,D-1) :GOTO1420 

1440 D=VAL(D$) 

1450 IF INSTR(SX$,"$")>0 AND( INSTR(SX$, "$")<INSTR(SX$,"=") ) THEN 
MID$(M$,D,1)="S":GOTO1460 

1451 IF INSTR(SX$,"#")>0 AND( INSTR(SX$,"#")<INSTR(SX$, "=") ) THEN 
MID$(M$,D,1)="M":GOTO1460 

1452 MID$(M$,D,1)="D" 
1460 GOTO1300 

1470 LN=LN+10:PRINT#1,LN;"M$=";Q$;M$;Q$ 

1480 IF PR$="PRINT" THEN LN=LN+10 :PRINT#1,LN; "IFL=0THENCLS: PRINT 

TAB(30) ;T$:"; :GOTO 1500 
1490 LN=LN+10:PRINT#1,LN;"IFL=0THEN";PR$;"CHR$(12) ;TAB(30) ;T$:"; 
1500 IF PG$="Y"THENPRINT#1,PR$;" TAB(65) ; " ;Q$; "PAGE NUMBER";Q$;" 
;PG" ELSE PRINT#1," " 

1510 LN=LN+10:PRINT#1,LN;"IF L=0 THEN ";PR$; " :GOSUB30000" 
1520 PRINTtl, "30000 FOR J=l TO";B 

1530 PRINTtl, "30010 READ T:";PR$;" TAB(T) ;H$( J) ; " 
1540 PRINT#1, "30020 NEXT:RESTORE" 
1550 PRINTtl, "30030 " ;PR$; "-.RETURN" 
1560 LN=LN+10 : PRINTtl, LN; "FOR J=l TO";B 
1570 LN=LN+10:PRINT#1,LN;"IF MID$(M$,J,1) =" ;Q$; "S" 

T:";PR$;" TAB(T) ;C$( J) ; " 
1580 LN=LN+10:PRINT#1,LN;"IF MID$(M$, J,l) =" ;Q$; "D' 

T:";PR$;" TAB(T) ;C( J) ; " 
1590 LN=LN+10:PRINT#1,LN;"IF MID$(M$, J,l) =" ;Q$; "M" ;Q$; "THEN READ 
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';Q$;"THEN READ 
';Q$;"THEN READ 



T:";PR$;" TAB(T) ;C#( J) ; " 
1600 LN=LN+10:PRINT#1,LN; 1 
1610 LN=LN+10:PRINT#1,LN; 1 
1620 LN=LN+10: PRINTtl, LN; 



NEXT : " ; PR$ ; " : RESTORE" 
L=L+1 : IFL>" ; L ; "THENPG=PG+1 : L=0 " 
NEXT" 
1630 PRINTtl, KZ; "FIELD 1 , ( " ;RL; "* (CT-1) ) AS DU$,";RL;" AS ZU$:GE 
T 1,1+((I-1)/";NR%;") :IF ZU$=STRING$( ";RL; " ,255) OR ZU$=STRING$( 
";RL;",250) THEN";LN 

1640 PRINT #1,KZ+1;"IF ZU$=STRING$( " ;RL; " ,0) THEN 20000" 
1650 PRINT#1,KZ+5;XF$ 

1660 PRINT#1,KZ-5;"CT=CT+1:IF CT=" ;NR%+1; "THEN CT=1" 
1670 PRINTtl, KZ+7;"GET1,1+(I-1)/";NR% 
16 80 CLS:PRINT"HAVE YOU SAVED ANY TOTALS YOU WANT PRINTED AT THE 

END? (Y/N) " 
1690 YN$=INKEY$:IF YN$=""THEN1690 ELSEIF (YN$<>"Y"ANDYN$O n N n ) THE 
NPRINT"Y OR N ONLY, PLEASE. " :FORI=1TO300:NEXT:GOTO1680 
1700 PRINTtl, "30040 REM*****THESE ARE THE TAB SETTINGS*****" 
1710 PRINTtl, "29990 REM*****BEGIN PRINTING COLUMN HEADINGS*****" 
1720 IF YN$="N"THENPRINTtl, "20000 CLOSE: END" :GOT01 870 
1730 PRINT"THEN YOU MUST TELL ME WHICH VARIABLES YOU WANT PRINTE 
D IN WHICH" 

Listing 2 continues 



program's users will read the manual, 
and only about 10 percent of that 20 
percent will read it thoroughly. The re- 
maining 90 percent will get frustrated 
and either throw the program out (and 
ask for a refund), work through the 
problem somehow, or give up and read 
the manual. We gave refunds to about 5 
percent of our buyers. 

Unfortunately, writing a program 
that doesn't need a manual makes the 
program attractive to pirates. Pirates 
don't like to copy documentation: It's 
expensive to do it right. 

Why I Gave Up on Tandy 

You'll notice that I could have made 
several improvements to the Creator 
that would have increased its usability, 
not to mention its salability. I never got 
around to it because I stopped writing 
software for the TRS-80 almost two 
years ago, when my company dissolved 
and I sold my Model I in favor of the 
CP/M-based Altos 8000-2. 

I do not wish to take a step backward 
and return to the Radio Shack market. 
Here are some reasons why. 

I thought then that TRSDOS would 
never be a standard operating system, 
that the "big" manufacturers would 
surely and soon enter the microcom- 
puter marketplace, and that CP/M 
would offer much more future poten- 
tial. Further, the little TRS-80 was un- 
healthy from the first day I had it. Mean 
time to disk-drive failure was about five 
days; mean time to repair was two. The 
local dealer was helpful — he even lent 
me replacement drives — but the annoy- 
ance and downtime was aggravating. 

The Model II was annoying, as well. 
The TRSDOS on that machine was as 
buggy as the TRSDOS on the little one, 
and the machine didn't like to run on 
hot days at all. I had CP/M for that ma- 
chine, bought from Pickles and Trout, 
but I had no faith in the hardware. (By 
the way, Pickles and Trout's CP/M is 
good, and I recommend it.) 

Even worse, the Model II TRSDOS 
kept being modified. The modifications 
were the sort that changed the disk for- 
mat, space available, and other low- 
level things. They meant that the pro- 
gram written for one DOS release was 
incompatible and unreadable under 
another. After several such modifica- 
tions, any user would have to go 
through several transfer programs to 
successfully upload a program. I felt 
that such DOS modifications were an 
indication that TRSDOS was going to 
be unusable. 

The Model II TRSDOS also had 
some features I didn't like at all. A one- 
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Continued from p. 89 

6. Allow automatic overflow of 
records from drive to drive. I didn't 
want this modification at all. It would 
not be transportable. Another more 
important reason is that it would 
demand that you place each disk 
on a special drive and/or that the 
program detect how many drives/ 
disks were in place. This would be 
nontransportable and an easy place 
for errors. To this day, I have no 
doubt whatsoever about the correct- 
ness of my decision here. 

7. Since "everyone" was running 
(choose one or more: NEWDOS, 
NEWDOS80, LDOS, ULTRA DOS), 
add enhancements for a version for 
that operating system. This turned out 
to be both an easy and a hard decision. 
I felt, then, that TRSDOS was terri- 
ble, but I wanted to stay transport- 
able. 1 was only one man, and my as- 
sociates wanted a version for the 
Apple (shudder) and the PET (two 
shudders) and other machines — even 
other languages. I didn't see how 
I could possibly support all those dif- 
ferent versions, make enhancements, 
provide customer support, check ad 
copy, eat and sleep at one time. I was, 
after all, working about 14 to 16 hours 
a day, seven days a week. Nor could 
the company afford to hire any help 
for me. 

8. Make the generated program 
faster. Actually, this was a continuing 
project. I have little doubt that the 
program would be even more stream- 
lined today if I had continued with the 
TRS-80. Still, I feel I could have done 
little to the program to appreciably 
speed its operation beyond its present 
abilities. One thing now possible is 
the Microsoft compiler for TRSDOS 
programs. Both the Creator and the 
generated programs could be com- 
piled; the only changes in the generat- 
ed program, I believe, would be the re- 
placement of the New command with 
an END, and inserting spaces where 
required. 

9. Reduce the memory require- 
ments in the generated program. This 
was a battle. I could have made the 
generated program smaller than it 
was, but at the cost of increased 
size in the Creator and decreased 
modularity and modifiability in the 
generated program. I struck a com- 
promise I felt was fair. 

10. Allow more fields in the gener- 

Continues on p. 92 







"\ BOUGHT IT" 

"My biggest loss 
of programming 
time using 
Snappware's 
EXTENDED BUILT IN 
FUNCTIONS is 
spent inserting 
my diskette." 

SCOTT ADAMS - PRES. OF ADVENTURE INTL. 



Snappware's EXTENDED BUILT IN FUNCTIONS is a collection of much 
needed additions to the TRSDOS* BASIC interpreter which greatly ex- 
tends its convenience and utility. The following features become part of 
your BASIC language and provide the enhancements without requiring 
any additional memory/The most important component of EXTENDED 
BUILT IN FUNCTIONS is an in-memory sort routine, guaranteed to be the 
fastest general purpose in-memory sort on the market. Along with this 
you also receive other EXTENDED BUILT IN FUNCTIONS. Here is a 
sampling: 

SRT— Sorts one or more arrays into a specified sequence 
FMT— Arranqes data into a string variable as with PRINT USING 
PDAT/U DATS— Permits user to do arithmetic on dates. 
PK$/UPK$— Compresses strings to save disk space. 
ETIM$— Shows the difference between two times. 
CLEAR— Specifies the number of file blocks to be allocated when 
you specify high memory and string space. . 
DELETE— Allows you to dynamically remove portions of a BASIC 
program. 

In addition to these, there are functions unique to Model II and to Model 

III. The exclusives to Model II are long error messages and PEEK/POKE. 

The exclusives to Model III are: 

SWAP— Supports exchange of variables with a single statement. 

HEX$— Converts numbers to hexadecimal strings. 

RESTORE— Allows you to set READ pointer to location of choice. 

If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 

MODEL II $100.00 

MODEL III $ 75.00 



*,: 



•TRSDOS™ Tandy Corporation 



mm 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513) 891-4496 
3719Mantell 
Cinti., Ohio 45236 



vSee List of Advertisers on Page 435 
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REMSOFT, INC. 

Let Your TRS-80® 

Teach You 

ASSEMBLY LANGUAGE 



Tired of buying book after book on assembly 
language programming and still not knowing your 
POP from your PUSH? 

REMsOFT proudly announces a more 
efficient way. using your own TRS-80' to learn 
the fundamentals of assembly language 
programming . . at YOUR pace and YOUR 
convenience. 

Our unique package. '■INTRODUCTION TO 
TRS-80 ASSEMBLY PROGRAMMING", will 
provide you with the following: 

• Ten 45-minute lessons on audio cassettes 

• A driver program to make your TRS-80' video 
monitor serve as a blackboard for the instructor 

• A display program for each lesson to provide 
illustration and reinforcement for what you are 
hearing. 

• Step-by-step dissection of complete and useful 
routines to test memory and to gain direct 
control over the keyboard, video monitor, and 
printer. 

• How to access and use powerful routines in 
your Level II ROM 

for Model 1 

REMASSEM-1(.a P e) only $69.95 

REMASSEM-1 (disk, only $74.95 

NOW AVAILABLE FOR MODEL 3 

REMASSEM-3(ta P e) $74.95 

REM ASSEM-3 (disk) $79.95 



LEARN TRS-80* 

ASSEMBLY LANGUAGE 

DISK I/O 



Your d'Sk system and you can really step out 
with REMSOFT'S Educational Module. 
REMDISK-1. a "short course'' revealing the details 
of DISK I O PROGRAMMING using assembly 
language. Intended for the student with 
experience in assembly language. 
COURSE INCLUDES: 

• Two 45-minute lessons on audio cassette 

• A driver program to make your TRS-80' video 
monitor serve as a blackboard for the instructor 

• A display program for eacn lesson to provide 
illustration and reinforcement for what you are 
hearing. 

• A booklet of comprehensive, fully commented 
program listings illustrating sequential file I 
random-access file I 0. and track and sector I O. 

• A diskette with machine-readable source codes 
for all programs discussed, in both Radio Shack 
EDTASM and Macro formats. 

• Routines to convert from one assembler format 
to the other. 

Presently available for model 1 only 
REMDISK-1 only $29.95 

Dealer inquiries invited 

These courses were developed and recorded by 
Joseph E. Willis and are based on the successful 
series o' courses he has taught at Meta 
Technologies Corporation, the Radio Shack 
Computer Center, and other locations in Northern 
Ohio. The minimum system required is a Level II 
16K RAM. 



REMSOFT, INC. 

571 E. 185 St. 

Euclid. Ohio 44119 
(216)531-1338 



SHIPPING CHARGES: .„ 

S2.50 WITHIN UNITED STATES • / "' a 

S5.00 CANADA AND MEXICO 
OTHER FOREIGN ORDERS ADD 20 c « 
OHIO RESIDENTS ADD 6' 2 ; c SALES TAX 

TRS-80' IS A TRADEMARK OF TANDY CORP. 




Listing 2 continued 

1740 PRINT "COLUMNS. I WILL GIVE YOU TWO DUMMY VARIABLES CALLED" 

1750 PRINT"T$ AND B$. T$ IS THE WORD TOTALS, AND B$ IS BLANKS." 

17 60 PRINT" IF YOU WANT TO PRINT THE WORD TOTALS IN ANY COLUMN, T 

ELL ME TO" 

1770 PRINT "PRINT T$; IF YOU WANT TO SKIP A COLUMN, TELL ME TO PR 

INT B$." 

1780 LN=20000:PRINT#1,LN;PR$ 

1790 LN=LN+10 :PRINT#1,LN;"T$=";Q$; "TOTALS" ;Q$;":B$=CHR$ (32)" 

1800 FOR 1=1 TO B 

1810 PRINT" VARIABLE TO PRINT IN COLUMN NUMBER" ; I; ":"; :LINE INPUT 

sxs 

1820 LN=LN+10:PRINT#1,LN;"READ T:";PR$;" TAB(T) ; " ;SX$; ">" 

1830 NEXT 

1840 LN=LN+10:PRINT#1,LN;CL$ 

1850 LN=LN+10:PRINT#1,LN; "CLOSE: END" 

1860 PRINTS1, "19990 REM*****PRINTING TOTALS SECTION*****" 

1870 CLOSE: END 



disk system required the operating 
system on all disks at all times, meaning 
I would have to ignore Tandy's 
copyright or sell every purchaser 
another copy of TRSDOS with each 
purchase of my software. Since every 
purchaser of a Model II got TRSDOS 
with his machine, this meant I had to 
sell him something he already had! 

I called Tandy, leaving my name and 
phone number. I told them I intended 
to sell copies of the software with 
TRSDOS on the disk, and might re- 
quire the purchasers to verify that they 
already had purchased TRSDOS; if this 
was illegal, please have someone at Tan- 
dy or Radio Shack contact me and tell 
me what I must do. I never heard from 
them. TRSDOS turned out to be unnec- 
essary, after all. Anyway, I thought 
their approach was dumb and probably 
illegal. 

The Model II had no PEEK and 
POKE commands. Factory software 
support was, I felt, miserable. On the 
other hand, the CP/M machine was 
never down. We even shipped it to the 



Continued from p. 91 

ated program. This modification was, 
and is, fairly easy to make. You will 
note that the generated program con- 
tains an On. . .GOSUB construction. 
The present limitation of 22 to 24 
fields is solely dependent on Basic's 
maximum line length. By weeding out 
spaces in the generated code, this 
could be increased to 47. By generat- 
ing a GOSUB to a program section 
containing a number of consecutive 
On . . . GOTO lines, any number of 
fields can be accommodated. This is 
necessary, because an On. . .GOTO 
will fall through when an over or un- 
derflow occurs, whereas an On. . . 
GOSUB over- or underflow returns an 



NCC and back one year as baggage, 
and accidentally dropped it on the mar- 
ble floor in Chicago's Northwestern sta- 
tion just before a demonstration. In 
fact, that machine went almost three 
years before anything at all went wrong 
with it (a bad transistor in the power 
supply), and downtime then was one 
day. I have had very good luck with my 
Altos 8000-2. 

The CP/M Microsoft Basic 5.2 was 
better than the TRS-80 Basic, as well. 
Program chaining with saved variables, 
40-character variable names, While. . . 
Wend loops, and a good compiler were 
available. The CP/M machine also had 
more disk space, and (at my actual in- 
complete count) 69 languages or ver- 
sions of langauges available. This 
meant a lot of flexibility. All this cost 
less than the Model II! 

The CP/M operating system had no 
discernable bugs, ran fast, and was well 
supported. I was not tied to one com- 
pany for languages and utilities. An as- 
sembler/editor came with the system. 
About 16 megabytes of public-domain 



error. The CP/M version, for that 
reason, permits up to 500 fields, 
limited only by memory. 

//. Make it easy to use the report 
program with sort programs. I never 
thought such use was difficult. The 
CP/M version will allow the specifica- 
tion of a sort index for a report at run- 
time, but the TRS-80 version can be so 
modified with a simple bit of code: to 
the generated report program, add 
one line opening an index file as a se- 
quential input file, file number 2. This 
index file should contain the record 
numbers to read, in sorted order. 
Then alter the beginning of the record 
read loop from "GET 1,1" to "IF 
EOF(2) THEN 20000: ELSE INPUT 
#2,K:GET 1,K". That's it! ■ 
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software was available, for about $8 a 
disk. This software included languages 
(like Pilot, Stoic, Algol, and Basic-E), 
communications programs, applica- 
tions software, games, and so on. I 
knew I'd have a long wait before I saw 
any of that stuff from Tandy. 

The decision I made was easy, and I 
have yet to regret it. I said goodbye to 
the Model I (and the Model II) and kept 
the Altos. 

The Dl-Fated Apple/PET Versions 

After about a year of my associate's 
cajolery and threats, I succeeded in get- 
ting someone to help me do an Apple 
version. I needed help, since I didn't 
have any knowledge of the Apple. I 
even got one. 

I hated the Apple, hated Apple's 
DOS, doubly hated Applesoft (not even 
an Else statement!), disliked the com- 
promises necessary with the Apple ver- 
sion, and gave the machine to one of my 
associates at the first opportunity, 
about three months later. Even today, I 
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never want to see another Apple again. I 
will have to admit that the Apple never 
broke, though. 

I never wrote a version for the PET. I 
got as far as reading the PET DOS man- 
ual, decided the machine was unsuitable 
for anything to do with business ap- 
plications (especially my program), and 
told my associates NO. In fact, I told 
them I'd leave if they ever brought it 
up again. 

What I really wanted to do was a 
CP/M version with the (then new) Mi- 
crosoft Basic compiler and Microsoft 
Basic 5.2. 

Have fun with the programs. Write 
me if you have questions about my ex- 
periences, comments about my deci- 
sion, or just want to share some experi- 
ences. I will do my best to reply, but 
I have a family to support so please 
understand: I may be too busy. I will 
read your letters with interest, though. 
I may even read the ones I'll prob- 
ably get from Tandy, Apple, and Com- 
modore. H (Continues) 








I BOUGHT IT 

My biggest loss 
of programming 
time using 
Snappware's 
AUTOMAP and 
AUTOFILE is 
spent inserting 
my diskette." 

SCOTT ADAMS - PRES. OF ADVENTURE INTL. 



When working with direct files or creating a formatted screen, Autofile 
and Automap are indispensible aids. 

Autofile is designed to automate for the BASIC programmer the task of 
moving data elements to and from a direct file. Previously, this was a 
time consuming chore because the FIELDed variables may not be directly 
referenced by user logic. The FIELD statement was eliminated, thereby 
relieving you of the guessing game as to where the FIELDed variable is. 
In addition, the LSET and the CVx functions are performed automatically. 
The software, when installed/becomes part of your BASIC interpreter 
providing the enhancements without additional memory. 

Automap is designed to automate for the BASIC programmer the task of 
presenting information on the video display and accepting information 
from the keyboard operator. The software consists of two main compo- 
nents: the OFF-LINE COMPONENT used to describe to the system the 
screen formats and the ON-LINE COMPONENT from within your BASIC 
program to initialize a screen, send data to the video display and receive 
data from the keyboard operator. This facility when installed, becomes 
part of your BASIC interpreter. 

Both products complement one another and, if used in conjunction, can 
save a significant amount of programming time. ■ 

If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 



AutomapMODEL II 
MODEL III 

Autofile MODEL II 
MODEL III 



^i 



$100.00 

$ 75.00 

$ 75.00 

$ 60.00 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513) 891-4496 

3719 Mantell i 

Cinti., Ohio 45236 ' 
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Sketchy Documentation 



Though this is not intended to be a 
complete set of instructions to all 
of the features of the Creator, the fol- 
lowing should let you successfully run 
the program. The Creator and the Re- 
porter (the report program generator) 
come as disk-based programs, called 
CREATOR/BAS and REPORTOR/ 
BAS. The disk also includes two dem- 
onstration programs, which are not 
provided here for reasons of space. 

The Creator and Reportor come on 
a nonbootable disk. For $10, 1 cannot 
afford to provide a DOS or a loader. 
If you have a single-drive system and 
your DOS requires that the disk in 
drive have an operating system, find 
a friend with a two-drive system and 
copy the Creator disk to a disk with a 
system on it. 

How to Load The Programs 

Enter Basic. The default number of 
files is all right. To run the Creator, 
just type RUN"CREATOR/BAS:x", 
where x is the drive number on which 
the Creator disk is loaded. 

Questions Asked by the Creator 

The questions asked, in order, are: 

1 . What's the name of the program 
being generated? Use up to eight al- 
phabetic characters. 

2. Which drive will contain the 
data file when the generated program 
is run? Enter a number, depending on 
the number of drives in your system. 

3. Which drive do you want this 
program written on? 

4. What is the maximum number 
of records desired in the file? Enter a 
number of reasonable value. 

5. What is the record length? 
Questions four and five generate a 

check to see if the file will fit on a stan- 
dard Model I disk; you might want to 
modify the check in Creator if your 
DOS permits more file space on a 
single disk. The Creator will generate a 
program that will block and deblock 
records within a sector (but will not 
span sectors); you will need to modify 
the Creator and Reportor if your Basic 
allows the specification of different- 
size records. Record length may be 
anything up to 255 bytes. 

6. What will be the title of your 
program? Enter up to 250 characters. 




Please do not enter anything with quo- 
tation marks. 

7. Do you want to use an exit code 
or message? This question will allow 
you to specify a character or group of 
characters that will allow you to exit 
data entry/update/retrieval and 
return to the menu. You'll never need 
to depress the break key to exit your 
program. 

8. If seven is answered Y: What is 
your exit code or message? Do not use 
quotation marks. 

9. Now comes a repetitive series of 
questions for each field you will be us- 
ing. First you are asked for the field 
size: packed fields can be eight, four, 
or two bytes, and character or un- 
packed numeric fields can be from 1 to 
255 bytes in length. You are then 
asked if the size you choose was cor- 
rect. The Creator will tell you how 
many spaces you have left and pro- 
ceed to the next field until no space re- 
mains in the record. 

10. What field is the key field? In- 
put the field number of the field by 
which data will be retrieved. This field 
must not be a packed field. 

11. Now comes another series of 
repetitive questions. Each field is cov- 
ered, in order. 

You must first tell the Creator the 
operator prompt that will request in- 
put for each field. This prompt must 
not contain quotation marks, but can 
contain anything else. 

You are then asked to tell the 
Creator what kind of data is being 
stored in each field. Your options are: 

• PI (Packed integer: whole numbers 
from -32767 to 32767). 

• PS (Packed single precision: 
floating-point numbers with six 
significant digits). 

• PD (Packed double precision: 
16-digit, floating-point numbers). 

• C Character data. 



• N Unpacked numeric data. Treated 
exactly as character data. 

You will then be asked for edits and 
error messages. The edits you may 
choose will determine the kinds of ac- 
ceptable responses the generated pro- 
gram will accept. 

When requesting edits, the program 
will display the message: 

BAD INPUT IF: 

Here are the permissible edits: 

• NOT NUMERIC (Operator input 
contains nonnumeric characters). 

• NOT ALPHA (Operator input con- 
tains digits). 

• CONTAINS"XX" (Forbidden 
character string contained in input). 

• NO ENTRY (Operator attempts to 
skip a field input). Note: The key field 
must use this edit. 

• LENGTH>xx (Supply a maximum 
length for entry to this field). 

• LENGTH<xx (Supply a minimum 
length for an entry to this field). 

• LENGTH = xx (Supply a forbidden 
length). 

• LENGTH< = xx LENGTH> = xx 
LENGTHOxx 

• <"abc" (Supply a character string. 
If the operator inputs a string alpha- 
betically less than the string you sup- 
plied, the input will be flagged as er- 
roneous). 

• >"abc" < = "abc" > = "abc" 
= "abc" < >"abc" 

• <xx.yy (Supply a number. If the 
number input is less than the number 
you choose, the input will be flagged 
as erroneous). 

• >xx,yy < = xx.yy > = xx.yy 
=xx.yy < >xx.yy 
Compound edits are permitted; 

every edit past the first one must refer 
to the field as G$(X), where X is the 
field number. Compound edits can be 
quite complex to implement; a little 
experimentation will serve to show 
you what techniques will work. For 
example: 

>xx.yy OR VAL(G$(4))<VAL(G$(3)) 

is a compound edit that will not permit 
the entry of a number to field 4 that is 
either >xx.yy or less than the numeric 
value of field 3. You don't need to 
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choose any edit (except, as noted, for 
the key field). Further, you can use as 
many edits as you want. You will, for 
each edit, be asked for an error mes- 
sage. The message you choose will be 
displayed if the edit is violated. Error 
messages are not mandatory. If an er- 
ror message is used, it cannot contain 
quotes. 

12. When you're done entering 
prompts, edits, and error messages for 
each field, you'll be asked for field 
titles. When the record is retrieved and 
displayed, these titles will appear next 
to each field's data. 

1 3 . You will then be asked for a ter- 
mination message. This message will 
be something of the form: 

ARE YOU DONE ENTERING DATA (Y/N) 

14. You will be asked for two per- 
missible single-key depressions. In this 
case, the first one, applied if the oper- 
ator is done, would be Y; the second, 
if the operator is not done entering 
data, would be N. When the generated 
program is being run, (in this case) a 
response of Y will return the operator 
to the menu and a response of N will 
continue with data entry. 

When this last question has been 
completed, your program is done. 
You can load it or run it; it's ready to 
go. Don 't forget: you must initialize 
your data file before entering any 
data! The initialization option will ap- 
pear in the menu of your generated 
program. The load may take a little 
while. Your program will be saved on 
the disk you indicated earlier as a text 
(ASCII) file, and the lines are out of 
order. If you want to arrange for 
speedier program loads in the future, 
just load and resave your program in 
the normal way. Future loads will be 
quite rapid. 

Updating Your Records 

You can update records in any of 
several ways. You can update a field 
by choosing the update option in your 
generated program's menu, and then 
entering the record's key and the field 
number to update. You can then di- 
rectly enter the updated value for the 
relevant field. If the field is a packed 
field, you can update the field com- 
putationally. This is done by entering 
a numeric value followed by the 
operator you choose. Permissible 
operators are + ,-, MORE, and LESS. 

Continues on p. 96 
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I BOUGHT IT 

"My biggest loss 
of programming 
time using 
Snappware's 
COLLEGE EDUCATED 
GARBAGE COLLECTOR 
is spent inserting 
my diskette." 

SCOTT ADAMS -PRES. OF ADVENTURE INTL. 



The Snappware College Educated Garbage Collector (SNAPP-VI) is an 
intelligent processing function which greatly improves performance of 
typical BASIC applications. And here's why. 
Microsoft uses a 'variable length string' in the BASIC interpreter. Each 
time the string is assigned a new value, it is relocated in a string pool. 
Periodically the string pool must be reorganized and condensed into a 
single contiguous area. Performing this string space reclamation is time 
consuming and inefficient because this approach evaluates and collects 
each string individually. The time required is roughly proportional to the 
square of the number of active strings in the resident program. During 
reclamation the system seems to 'lock-up' and does not respond to 
the operator until the process is completed. 

This time consuming approach requires a better solution. Snappware has 
developed a solution which takes advantage of the auxiliary memory .. 
available. SNAPP-VI requires only four bytes per active string as a work 
area. When free storage space is available, our system temporarily bor- 
rows, uses and returns the space to the free storage pool when com- 
pleted. If storage is not available, our system will temporarily transfer out 
to disk enough of the BASIC program to make room for our work area and 
return the 'paged out' information to its correct location when completed. 

Benchmarked times show, in some situations, SNAPP-VI performs one 
hundred times as fast as the Microsoft approach. . . 
If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 



MODEL II ........... 

MODEL III 



$100.00 

.$ 75.00 



•TRSD0S™ Tandy Corporation 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513)891-4496 

3719 Mantell 

Cinti., Ohio 45236 



•sSee List of Advertisers on Page 435 
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For example, updating a field con- 
taining the value 34.56 by entering 
1 .23 + will produce an updated field 
value of 35.78. This is especially handy 
for inventory, accounts-receivable, 
and accounts-payable applications. 
When your record has been updated, 
you can choose to update one or more 
additional fields, or you can choose to 
return to the menu. You can update 
the key field, if you wish. 

The Reportor 

Suppose you've generated your 
data file. The next thing you might 
want to do is print a list of the infor- 
mation contained in the file. You 
might want to perform computations, 
obtain totals, or skip certain records. 
The Reportor will let you do it. 

You can generate your report so 
that the report is printed to the screen, 
or so that the information is sent to 
your printer. The CP/M version will 
let you choose either or both options 
at the time the report program is be- 
ing run. 

You can load and run the Reportor 
by entering Basic and entering the 
command: RUN "REPORTOR/BAS: 
x", where x is the drive number on 
which the Reportor can be found. 

Here are the questions asked by the 
Reportor: 

1 . Do you want to write a new pro- 
gram, run a program, or exit? Choose 
the appropriate option. 

2. What is the name of the pro- 
posed program? Up to eight uppercase 
letters can be used. Do not choose a 
name identical to the name of another 
program on the same disk, or the old 
program will be overwritten. 

3. What will be the title of the re- 
port? This is the title that will be 
printed on the top of each page of the 
report. Do not include quotation 
marks, please. 

4. Do you want the report printed 
on the screen or the printer? 

5 . What is the name of the data file 
to read? Please include the full file 
name, including the password (if any). 
If you make a mistake here, you can 
correct the generated program in line 
40, later. 

6. What is the record length of 
each record in the data file? Answer 
this as you did when running the 
Creator. 

7. Now follows a series of repetitive 
questions asking about the field 



lengths for each field in the data file. 
You need not answer with the same 
numbers as earlier; however, the total 
of the field lengths must be the same as 
the record length. 

8. Now you are asked to enter the 
column headings for each of the col- 
umns you'll be using in your report. 
You can have more columns than 
fields, since one or more columns 
can be derived or computed. You 
can also have fewer columns than 
fields. Your column headings can in- 
clude spaces, but should not include 
quotation marks. 

9. What are the tab settings for 
each column of the proposed report? 
Enter numbers from 1-255. You can 
get some pretty fancy printing results 
by requesting that one column's tab be 
less than or equal to a previous col- 




umn; Basic will print that column at 
the correct tab position, but one line 
down. Ordinarily, I use this approach 
when printing mailing labels. You can 
also use tab settings greater than the 
width of the paper to achieve similar 
results. 

10. Here, the Reportor will want to 
know if you want the pages 
numbered, and the number of lines 
per page. You can have as many lines 
per page as you want. For mailing 
labels, I suppress the printing of the 
headings and title (after the first time) 
by telling the Reportor that I don't 
want the pages numbered, and I want 
1,000,000 lines per page. This should 
be sufficient: 1,000,000 lines, at 300 
lines per minute, takes 3,333.33 
minutes (about 3.5 weeks). If not, tell 
the Reportor you want 10,000,000 
lines per page. You either have an ex- 
tremely fast printer or an awful lot of 
patience. 

1 1 . Now you will see a screen full 
of information, telling you about the 
ways you can manipulate the data. 

You'll need to remember only a few 
things: 
• COLUMN(K) is the Kth column of 



your report. 

• FIELD(K) is the Kth field of your 
record. 

• Any packed fields are automatically 
unpacked. 

• If any field or column is either dou- 
ble precision or a character string, you 
must explicitly state that fact. For ex- 
ample, COLUMN$(K) is the Kth 
report column, and it contains 
character data. COLUMNAR) is the 
Kth report column, and it contains 
double precision data. FIELD$(K) is 
the Kth field of the record, and that 
field contains string data. 

12. You are then asked to state the 
data type for each field, just as with 
the Creator. The permissible data 
types are C, N, PI, PS, and PD. C and 
N are treated identically. 

13. Using the information from 
(11), you then state what you want 
printed in each column. You can state 
your requirements in any order you 
like. Any operation permitted in Basic 
is allowed. (If you have unpacked nu- 
meric data, be sure to convert the data 
to numbers using the VAL function 
before using that data in calculations.) 

Here are some examples of permis- 
sible operations, so you get the idea: 

COLUMN(4) = FIELD(5) 

COLUMN(5) = VAL(FIELD$(7))/FIELD#(6) 

COLUMN#(9) = (FIELD(4) - FIELD)2))/ 

INT(COLUMN(5)) 

IF COLUMN(3) = THEN SKIP 

COLUMN$(l) = "THIS IS THE NAME" 

+ FIELD$(4) 

IF COLUMN(7)>1000 THEN COLUMNS(IO) 

= "INVALID BALANCE" 

IF COLUMN(6)<X) THEN COLUMN(9) = 

COLUMN(4)/COLUMN(6) ELSE COL- 

UMN(9)=0 

COLUMN(3) = FIELD(l)*FIELD(I) + 

FIELD(2)*FIELD(2)-2*FIELD(1)*FIELD(2) 

COLUMN$(7) = MID$(STR$(FIELD(6) 

+ COLUMN(3)),2) 

14. If you need to use totals or in- 
termediate results, use any variable 
beginning with the letter V. For 
example: 

VX = VX + FIELD(7) VX = VX + 1 VX = VX 
+ VY + SQR(VZ) 

15. You can signal completion of 
this define-columns stage by entering 
the command 999 instead of defining 
a column. 

16. You will then be asked if you 
have any totals you wish printed at 
the end of your report. If you do, 

Continues on p. 98 
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Call or Write 
Your Nearest 
Snappware 
Distributor 



MICRO-80 

284 Goodwood Road 
Clarence Park 
Adelaide South Australia 
Ph-(08) 2117224 

DIGI-TEK SYSTEMS 
65 Thornridge Circle 
Kitchener Ontario N2M-4V9 
Ph-(519) 742-8205 

STRAWFLOWER ELECTRONICS 
50 North Cabrillo 
Half Moon Bay 
California 94019 
Ph-(415) 726-9128 

COMPUTER MAGIC 
115 Wiltshire Avenue 
Louisville, Kentucky 40207 
Ph-(502) 893-9334 

E-C DATA 
Tornevangsvej 88 
P.O.B. 116 
DK-3460 

Birkerod, Denmark 
Ph +45/2/81/8191 

SYSTEM SOFT 
49, Dunvegan Drive 
Rise Park 

Nottingham, England 
NG5 5Dx 
Ph-(0602) 275559 

CUSTOM COMPUTING 
104 Bushwick Rd. 
Poughkeepsie, NY 12603 
Ph-(914>471-9318 

AEROCOMP 
Redbird Airport 
Hanger 8 

Dallas, Texas 75232 
Ph-(214) 339-5104 



nappware 
Goes On Trial! 

You Be 
The Judge! 



Snappware knows your programming time is valuable. That's why we are 
offering a trial package that will cut your programming time up to 75%! 

This unprecedented offer allows you to judge for yourself the value of our 
software using your hardware at your convenience. Our five best selling 
products: EXTENDED BASIC, EXTENDED BUILT IN FUNCTIONS, COLLEGE 
EDUCATED GARBAGE COLLECTOR, AUTOMAP and AUTOFILE, are all 
available to you on a trial basis for only $50.00 for the Model II and 
$35.00 for the Model III. We're convinced that after you see how well our 
software helps you perform programming tasks, you will purchase them 
like thousands of others have. 

Our trial package consists of a master diskette which may be used to 
create one working copy. Your purchase price for the trial package will be 
credited toward the purchase of any software Snappware sells. 

If for any reason you are not satisfied, just return the trial diskette and 
working copy and we will refund your money, no questions asked. With 
an unconditional guarantee like this, you can't lose. 

Call our toll free number 800-543-4628 to put us on trial. We're sure your 
verdict will be: Snappware saves you time and money. 



MODEL II Trial Package $50.00 

MODEL III Trial Package $35.00 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513)891-4496 
3719 Manteil 
Cinti., Ohio 45236 



^See List of Advertisers on Page 435 
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then you will be asked for the variable 
to print. You can print any tem- 
porary variable you have defined, or 
you can print T$ (which prints the 
word TOTALS') or B$(which prints 
a blank). You can also print character 
strings or computations such as 
V1/(V2 + V3), if you wish. You can 
print additional information after the 
last report column by telling the Re- 
porter to print the added items fol- 
lowed by commas. For example, sup- 
pose column nine is the last report 
column, and you want to print V9 
there. You could print some more in- 
formation by telling the Reportor to 
print V9, V8, "HELLO THERE "; 
V7$, "REPORT ENDS" in column 
number nine. When you are done 
with this section or, if totals were not 
desired, you have completed question 
15, your report program has been 
written. You can run it immediately, 
or you may wish to load and resave it 
so that subsequent loads occur more 
rapidly. 

About Support for These Programs 

I'm sorry to tell you that I can- 
not support or enhance these pro- 
grams in any way. If there is suf- 
ficient demand, and reason to believe 
it might be worth my while, I might be 
convinced to change my mind. I think 



this is unlikely. 

What You Can and Cannot Do 

Given a 48K machine, you might 
wish to add some of the enhancements 
I mentioned. However, if you do, do 
not assume you can sell the enhanced 
version without my permission. You 
can make any enhancements you wish 
for your own use, however. I hereby 
publicly place my hashing algorithm 
and file-access methods uncondi- 
tionally in the public domain. You can 
use them, incorporate them in your 
future programs, sell them, or do 
whatever you like with them. 

For Information 

Send your check or money order for 
$10 ($20 for Model II) to: Bruce W. 
Tonkin, 34069 Hainesville Road, 
Round Lake, IL 60073. Add $1 for 
mailing in the continental U.S. (or suf- 
ficient funds if not in the continental 
U.S.), or write and tell me when and 
where you want to pick the programs 
up. Please don't come to my house: I 
don't like that, and I probably won't 
have anything to give you, anyway. 
Remember I don't have a machine: 
Several friends have agreed to make 
the copies or arrange for the copies to 
be made. I will try to fill all orders 
within two weeks of receipt. If I'm 
deluged with responses, I'll fill all 
orders as I receive them. You'll be 



notified if your order cannot be filled 
within 30 days. 

All disks for the Model I or III will 
be standard single-density miniflop- 
pies. All disks for the Model II (if 
there are any requests for that version) 
will be 8- inch. I don't know what for- 
mat TRSDOS is using now, so I'll pro- 
bably need to find out. It would help if 
you would tell me which version of 
TRSDOS you are running: If there are 
any difficulties in transferring from 
my 2-year-old copy to the present one, 
I may just have to return your money. 
If that happens, you can blame the 
whole thing on Tandy. 

If you want the CP/M version, send 
$99 or write for information. Shipping 
anywhere within the continental U.S. 
is included. Add funds for postage 
elsewhere: shipping weight will be 
three pounds. Please state the disk for- 
mat required. Anything other than 
standard 8-inch, single-density or 
Altos 8-inch, double-density disks 
might take some extra time to obtain. 

If you want the complete rewritten 
documentation for the TRS-80 ver- 
sions of these programs, send an ad- 
ditional $10 plus postage (shipping 
weight is one pound); I will have to 
arrange to have the manuals reprint- 
ed. If there is insufficient demand, I 
will return your money and not fill 
your order. The documentation will 
probably be shipped separately. ■ 



and CP/M Versions 



For those users running the Model 
II, a similar version of the Creator 
and Reportor is available. Since I no 
longer have a Model II, nor do I know 
anyone who might be willing to make 
copies, I will have to check around to 
see where I might make some copies. 

The Model II version, for those pa- 
tient enough to wait for it, has in- 
creased capabilities. Computational 
update allows * and /, the maximum 
number of fields is 47, computed data 
can be displayed with the record, a 
number of additional utility programs 
are provided, etc. The Model II ver- 
sion can be purchased for $20, plus 
mailing. It is also being placed in the 
public domain, for anyone's noncom- 
mercial use. 

There was an Apple version of the 
Creator. It was sold, about a year ago, 




i 



and I have no more interest in it. For 
those with Apples, you can try to 
modify the TRS-80 code shown. Good 
luck; you'll need it! 

The present version of the Creator 
for CP/M and Microsoft Basic 5.2, 
has been sold under a variety of 
names. To my knowledge, there are 12 
program generators for Microsoft 
Basic for micros on the market today. 
Four out of these 12 were my work. 
The selling price has been as high as 



$795. I am, herewith, reducing the 
price to $99 for the Creator (now 
called Progen), and the Reportor (now 
called Repgen) to readers of this 
article. Complete documentation will 
be provided with full support. 

Frankly, I don't think that you'll 
need any support. The CP/M version 
has more capabilities than any other 
program generator being sold. To give 
you an idea of the expansion, let me 
note that the code published with this 
article takes about 30K. The CP/M 
version includes some 240K of code. 

So, if you have CP/M, write me. I 
will send a brochure detailing the 
capabilities of the CP/M version and 
listing some of the other software I 
have for sale. (Plug, plug). Complete 
source code for this version is for sale, 
as well. ■ 
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REVIEW 



Forthwrite 



by Wynne Keller 



T 



he second generation of word processors is 
upon us. One newcomer, Forthwrite, deserves 
to be ranked with the best of them. 



• • • * 

Forthwrite 

Miller Microcomputer Services 
61 Lake Shore Road 
Natick, MA 01760 

$175 



Several new word processors have 
been introduced in the past year. Many 
reviewers use the term "second genera- 
tion" to describe these programs. The 
first generation included the original 
Electric Pencil and Scripsit. The second 
generation has arrived with far greater 
capabilities than the first. Forthwrite is 
in this new generation, which also in- 
cludes Lazy Writer, SuperScripsit, and 
Newscript. All cost over $100 and are 
intended for the serious writer or busi- 
ness user. 

Forthwrite is written in the Forth lan- 
guage and requires the MMSForth disk 
system to operate ($130 for the TRS-80, 
$250 for the IBM PC). Forth is a so- 
phisticated, highly flexible language 
known for its speed. MMSForth has 
been on the market for several years and 
is a respected implementation of Forth. 
Forthwrite is available for the TRS-80 
Model 1 and III and the IBM. 
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Editing Module 

On the assumption that many Forth- 
write users are former Scripsit users, 
some Scripsit commands have been re- 
tained, so learning Forthwrite is easy. 
The same letter abbreviations are used 
to set margins, turn justify on and off, 
center the text, and so on. These are en- 
tered in a command line within the text, 
and unlike Scripsit, can be in lowercase. 

The editing commands are more logi- 
cal than Scripsit 's, and they are easy to 
remember. In the TRS-80 version, the 
clear key is the control key, and all com- 
mands function by pressing control and 
one or two other keys. For example, 
control I toggles in and out of the insert 
mode, control D is for delete, and con- 
trol P for paragraph. Many commands 
offer additional choices; the delete com- 
mand, for instance, deletes one letter 
when first pressed with the option of 
further deletion of blanks, words, sen- 
tences, paragraphs, blocks, or pages, or 
to the end of text. These additional 
choices are displayed on the bottom line 
of the screen, so you don't have to re- 
member all the keys, just the control D. 

Those who already own MMSForth 
will recognize many Forthwrite com- 
mands from the Forth editor. Arrow 
keys provide complete cursor control 



and can be supplemented with com- 
mands for special cursor moves. Nine 
help screens can be accessed for 
assistance. 

You can reset a number of editing 
features, such as the cursor's blink rate 
and speed of movement, the number of 
type-ahead characters (which allow 
commands or text to be typed while the 
computer is busy with other tasks), and 
the number of lines to be jumped with 
the shift up and down arrows. Forth- 
write provides a screen of dots on which 
to type; it can be up to 255 characters 
wide. This helps you visualize layouts. 
If you don't like the dots, you can sub- 
stitute another character. 

Text blocks in Forthwrite are marked 
as in Scripsit, but there are many added 
features. For example, headers and 
footers can run more than one line. 
Forthwrite also has many convenient 
block features; it can get a block rather 
than just copy it (with Get, you don't 
need to delete the block from the former 
position when you are done). You can 
also save a block to disk, move it to an- 
other document, or include it in another 
document at printout time. The ability 
to include blocks allows considerable 
flexibility. You can create a file that 
calls in other blocks or other documents 
so material can be reused in multiple 
documents. Several" sample files on the 
Forthwrite disk illustrate this process. 

Column features are very sophisti- 
cated. Forthwrite has two types of tabs: 
visual tabs and printer's ems (measured 
in tenths of an inch). Visual tabs are dis- 
played on a bar at the bottom of the 



screen, as in Scripsit. A printer's ems 
tab appears at printout time, but its po- 
sition isn't shown on the screen while 
you're typing. Either system is easy to 
use, but the ems are more flexible and 
give true proportional appearance on 
the letter-quality Spinwriter-type print- 
ers and the new class of under-$700 dot- 
matrix proportional printers. 

Forthwrite's left-margin and para- 
graph-indent features produce profes- 
sional-looking documents. By adjusting 
these settings, single-word left columns 
can have an adjacent right column of 
several lines, indented automatically; 
you don't have to be concerned about 
where each line in the second column 
will end. In many word processors, this 
type of layout requires resetting the left 
margin frequently. With Forthwrite, 
you only adjust the setting once, before 
starting the columns. 

The directory is alphabetized for 
easy, sequential loading of documents 
with shift, control, and down arrow and 
for automatic printing of a range of 
documents. The directory is always 
available and file names can be capital- 
ized, lowercased, or a mixture. When 
asking for your file, you do not have to 
match the uppercase/lowercase display 
of the directory file name. Type the let- 
ters in any form, and they are adjusted 
to match the directory configuration. If 
you forget to save the file before leaving 
the program, a reminder appears on the 
screen. 

Complete find, replace, and wipeout 
functions are available. These are indif- 
ferent to uppercase/lowercase mis- 
matches and have a wildcard capability 
so you can ignore nonmatching charac- 
ters or control codes associated with the 
search word. The replace function can 
distinguish whether it is replacing a cap- 
italized letter or a lowercase letter, so it 
can globally replace a single word, capi- 
talizing the first letter if the word begins 
a sentence. Find, replace, and wipeout 
can be done on a global basis, with or 
without a verification before each 
change. 

Hyphenation is often unnecessary 
with right-justified proportional print, 
because words are evenly spaced on the 
line. However, long words may need 
hyphenation. Forthwrite provides a soft 
hyphen that is placed while typing with 
control J. During the printout, if the 
word falls on the right margin, it is hy- 
phenated. If the word occurs within the 
line, the hyphen does not appear. A 
hard hyphen, which is always printed, is 
also available. 

One advantage of the soft hyphen is 
that rehyphenation isn't needed if you 



change the document's margins. In 
Forthwrite, you can't see which words 
fall on the right margin until a printout 
is made, because paragraph indents do 
not occur on the screen, and true pro- 
portional print cannot be duplicated 
with the computer character set. So, 
you should either hyphenate long words 
with soft hyphens as you type or obtain 
a printout and choose those lines that 
you want hyphenated. Typical propor- 
tional print documents require about 
two hyphens per page. 

While editing a document, you might 
receive the error message "This com- 
mand illegal when in the white space." 
Forthwrite calls all the areas of the 
screen where typing has not occurred 
white space, since the background char- 
acters are white dots. As you type, each 
letter replaces a dot. However, if you 
decide to use the down arrow to drop 
the cursor onto the white dots and add a 
word to the end of a previous line, the 
cursor must occupy the space adjacent 
to the last letter. If the cursor is on a 
white dot, you can't type until it is 
moved or the text line is opened with 
control O. This is disconcerting at first, 
but it's not difficult once you are accus- 
tomed to it. 

Unfortunately, you can't determine 



the line number of the cursor. This is a 
handicap when trying to decide if a let- 
ter, for example, would fit on a single 
page. Cursor line numbering becomes 
meaningless if a document uses in- 
cluded blocks, but it would be useful for 
simple documents. Information on the 
number of characters in a document is 
provided, as well as the amount of 
memory available. 

Printouts 

Forthwrite has several printout 
modes. While typing and editing a doc- 
ument, a screenprint is always available. 
This duplicates the screen and does not 
format the document. 

Quickprint is a formatted printout of 
the document, and it is slightly faster 
than a regular printout because menu 
choices are not required. It retains the 
document in memory while the printer 
program overwrites the editor program. 
After a Quickprint, the document is still 
available in memory. 

A third printing method is a technical 
copy of the document as it appears on 
the disk. This method does not format 
the document. It includes all printing 
and formatting commands and is espe- 
cially useful when learning to use 
Forthwrite. 




PRINTER GRAPHICS FOR EPSON 

A picture is worth a thousand words. 
AUTOPLOT can tell your story with strik- 
ing graphics. Plot functions or tabulated 
data automatically in minutes. A few 
keystrokes select from many options, 
such as plot size, grid overlay, continuous 
curves and/or separate marks, multiple 
curves, linear or log plots, numeric 
integration or differentiation, . . . 



1976 1978 I960 1932 

From the review in INFOWORLD (7/12/82, p. 41) 



"SUMMARY: All in all, AUTOPLOT is a superlative 
program in its advertised form. It is extremely easy to 
use and well documented and provides Model I or III 
owners with capabilities they only dreamt of before . . . 



AUTOPLOT will work with: 

• TRSDOS, DOSPLUS, NEWDOS, NEWDOS80 or LDOS 

• EPSON MX-80 or MX-100 with GRAPFTRAX-80 or 
GRAFTRAX-Plus 

AUTOPLOT for TRS-80 

(Model I or III with 48k, 1 disk drive) 

on disk with 40 page manual $79.50 

AUTOPLOT for LNW-80 

(+ Hi-Res video graphics) $99.50 

NEW: AUTOPLOT for CGP-115 

Color Graphics Printer $69.50 

Please add $3.00 for shipping and handling 

CA residents please add 6% sales tax 

Phone orders, VISA and MASTERCARD welcome 

TRS-80: CGP-115: TM of Tandy Corp. MX-80, GRAFTRAX: TM ol EPSON Inc. k ' 524 
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Autoplot 2.2 
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Copyright 1982 by Popular Computing, 
Inc. a subsidiary ol CW Communications, 
Inc.. Framingham. MA— Reprinted trom 
Intoworld. 



MENLO SYSTEMS 

3790 El Camino Real, Suite 221 
Palo Alto, CA 94306, Tel. (415) 856-0727 
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Another interesting option is to 
"print" the file on disk rather than 
paper. In this mode, the file is format- 
ted as it would appear on paper, and it 
can be scanned for proper appearance. 
The idea is to save paper, noise, time, 
and to permit proofing even when no 
printer is available. I encountered two 
problems. One is that a document that 
fits in memory as a document might not 
fit when formatted. You might have to 
artificially break up the document to 
use this option. The other problem is 
that this feature cannot work if you use 
proportional type, since these charac- 
ters can't be accurately displayed on the 
screen. However, if the document is to 
be printed in standard pitch, the feature 
displays margins and page breaks as 
they will appear on paper. 



The fifth and most-used choice is a 
formatted printout of the document. 
This has a number of options. First, you 
should select a printer driver. Special 
drivers are available for the NEC Spin- 
writer, Epson MX-80, Daisy Wheel II, 
NEC 8023, and the C. Itoh Prowriter, 
in addition to a standard serial and par- 
allel driver that works with any printer 
but does not provide special features. 
Other options include multiple-copy 
printing, the page number to begin 
printing, and the page number for 
headers and footers to start printing. 
You can change the print buffer size, 
the baud rate (for serial printers), and 
the number of characters per interrupt, 
or you can request pauses for inserting 
text from the keyboard or changing 
print wheels. Not all these options are 



available from the printer program; 
some are part of a customization rou- 
tine, and many are commands within 
the document. 

One of the nice features of the system 
is its ability to embed special commands 
that only affect the printout if the prop- 
er printer is available. Otherwise, the 
program ignores the commands and 
prints the text normally. Special items 
such as condensed print, wide print, 
red-ribbon mode, emphasized mode, 
subscript, superscript, legal strike out, 
and underlining are all supported if 
your printer can do them and you have 
a printer driver. Because Forthwrite 
source code is provided you can adjust 
the existing printer-driver code tables 
for other printers. 

Forthwrite supports true propor- 



TWO GIANTS AT YOUR FINGERTIPS - - - 



THE MOST POWERFUL & MOST USER-ORIENTED 
COMMUNICATIONS SYSTEM TERMINAL PACK- 
AGE AVAILABLE FOR TRS-80 MODEL III USERS I 

TELETERM will turn any Model III, with at least 32 K of memory, 
single disk drive, and RS-232-C board and modem into an Intelligent 
Terminal capable of communicating with nearly all types of computer 
hardware. AND, it will allow you to define its parameters in virtually 
any way you wish I 

Only TELETERM gives you these (plus many more) features, all in 
a single package. 



DIRECT TRS-80 to TRS-80 
DISK TO DISK TRANS- 
MISSION* 

DIRECT FILE TRANS- 
MISSION FROM DISK** 
SUPPORTS PROMPTED OR 
NON-PROMPTED TRANS- 
MISSION 
ON-LINE/OFF-LINE TEXT 

EDITOR 

"when communicating with another TELETERM system 

VIDEO PAGING **to any computer with which you can communicate 

Available for MOD II & IBM-PC early in 1983 



SPLIT-WINDOW VIDEO 

RECALL SCREEN 

WORD WRAPPING 

USER-DEFINABLE 
TRANSLATION TABLES 

VIDEOTEX CODES 
SUPPORTED 



TELEBOSS — THE COMPREHENSIVE DATA 
ENTRY/OUTPUT PROGRAM GENERATOR 
THAT ALSO FORMS A NATURAL FRONT-END 
FOR TELETERM I 

With TELEBOSS, your Model llf's become powerful, user-friendly 
data entry terminals into mini's and mainframes. 

TELEBOSS allows you to enter, modify, validate, and store data 
on inexpensive floppy disks and then transfer these files without 
tying up expensive communications ports or CPU time on the main 
computer system. 

Best of all, you define all input and output specifiers . . . 



• Screen formats 

• Validation criteria 



Data file structures 
Report formats 



TELEBOSS interfaces with the highly flexible TELETERM commun- 
ications package, giving you the capability of communicating with 
virtually any kind of computer hardware.* 



* to any computer with which you can communicate 
Requires 48K computer 

Available for MOD II & IBM-PC early in 1983 



ORDER TODAY: Write or fill in the coupon and mail it 
TELEXPRESS, INC., P.O. Box 2 



with your check, money order, VISA or MasterCharge # to: 
7, Willingboro, New Jersey 08046 



Name. 



Address . 



TELEXPRESS " Inc. 

P.O. Box 217 

Willingboro, NJ 08046 
(609) 877-4900 



TRS-80 is a trademark 
of the Tandy Corporation 



City, State, Zip. 
Phone 



Payment: Check Money Order. 

VISA MasterCharge 

Amount of Payment $ 



Send me copies of TELETERM @ S 1 25 per copy 

including User's Manual. 
Send me copies of the TELETERM User's Manual 

@ S10 per copy (Refundable when 

TELETERM package is purchased). 
Send me copies of the TELEBOSS @ S 295.00, 

including User's Manuals. 



For Credit Cards Only: 



Acct # . 



Exp. Date. 



Credit Card Holders may expedite orders by 
phoning: |609J 877-4900. 
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tional print with right-justification and 
tabbing on capable printers. A complete 
test program is included for adjusting 
your type. The preset width of type 
characters can be changed. True pro- 
portional print means the individual 
characters are proportional. The j, for 
example, occupies less space than the w. 
The spaces between words are adjusted 
in fractions of a space, resulting in a 
pleasing text. 

Special Features 

Forth write can read MMSForth's 
Datahandler data-base program files, 
and you can include their fields as text 
blocks in documents. Format features 
include right-justification within a field 
and dollars and cents decimal point 
alignment, with dollar sign and com- 
mas. Names entered into the Data- 
handler in last-name-first, first-name- 
last order can be reversed for Forthwrite 
printouts. 

You can dictate a document and then 
use the Xscribe function to trigger the 
cassette port to turn the tape recorder 
on and off while typing. This is not as 
elegant as foot-activated transcription 
machines, but it is useful and is a nice 
"extra." 

I have had MMSForth for more than 



a year, and it is totally incompatible 
with most other Model I and III pro- 
grams, since it is not just a different 
DOS but a different language. Yet, 
since it is a fine system and is pleasant to 
use, I am tempted to say it is not out of 
step with the world, the world is out of 
step with it. 

Gradually, many specialized applica- 
tion programs are becoming available 
for the MMSForth system, and these 
programs are made to be compatible 
with each other wherever the compat- 
ibility would be useful, as it is between 
the Datahandler and Forthwrite. The 
problem is that this is a slow process, 
and some needed programs are not 
available. 

The obvious omission here is a spell- 
ing checker. Spelling programs are be- 
coming popular, but with Forthwrite, 
you can't use any spelling checker cur- 
rently on the market. 

Forthwrite provides a transfer mod- 
ule to take any standard TRSDOS (or 
IBM PC) file and move it to Forthwrite. 
This is intended for moving files from 
your old word processor to the new one. 
A program is under development to 
effect a transfer in the other direc- 
tion — onto a DOS; when it becomes 
available, the compatibility problem 
will be solved. Using a foreign DOS 



spelling checker will still cause some 
problems, but it can be used. 

Curiously, Forthwrite provides ex- 
traordinary compatibility between the 
Models 1, III, and the IBM Personal 
Computer. If you own all versions of 
the program, you can freely exchange 
files, on the same disk, among all three 
computers. By using Forthwrite, a 
modem, and the Forthcom communi- 
cations program, you can send a per- 
fectly formatted letter at 1,200 baud to 
any of the three machines. You can also 
send Forthwrite files to any brand of 
computer with Forthcom. However, 
they have to be edited, after they are re- 
ceived, to make them compatible with 
the format commands used by the re- 
ceiving computer. If you want to do 
word processing on your microcomput- 
er at home and transmit the results to a 
mini or mainframe computer at work, 
you should enjoy this feature. 

The Forthwrite program provides so- 
phisticated printer control, fast opera- 
tion, powerful include functions, Data- 
handler compatibility, on-screen help, 
modular source code that can be altered 
by the end user, and much more. It can 
rightfully take its place among the top- 
quality word processors for the TRS-80 
and the IBM PC.B 



WHY $ IN DISK . . .WE'VE PUT SENSE IN CASSETTE 



RELIABLE LOW-COST HIGH-SPEED TAPING 




t*e* 



C-LEGS 



NO-FUSS HIGH SPEED SOFTWARE 

KWICOS (Mod 1,4k to 48k) $26 

KWIK Cassette Operating System for Mod 1 . The easy-to-use Level 
II enhancement for reliable fast taping (select 1000-3000 baud). 
Features: save, load, verify, search, chain-load, catalog, and test- 
read of both BASIC and machine-code programs . . . plus: long pgm 
names, passwords, debounce, slow 'list', self backup', and more. 

K0S3 (Mod 3, 16k to 48k) $26 

The KWIK Cassette Operating System for Model 3. All kwicos - 
features at 2200 baud, plus KWIK set of: clock display, Time, Date, 
Cassette high/low, I/O routing, etc. 

KWIKIT (specify Model) $12 

Mini-system for BASIC programs only. 
EasyLoad 1 000 baud for Mod 1 , 2200 baud 
for Mod 3. Many kwicos features. 

KWINK (Model l,4k-48k) $15 

Makes stand-alone fast-loading (2x-6x) 
copies of any standard 500 baud "SYS- 
TEM'' program. (At 6x, 3 minute program 
loads in 44 sec!) 

KL0AD (Model 1) $15 

Similar to kwink , but for BASIC pgms only. 
(Specify 16-32-48k) 

KL0AN (Mod 3, I6k-48k) $12 

Makes 500 or 1 500 baud copy of any other 
standard system' pgm. 

KWIK Software 

Box 328 

i> Bolivar, M0 65613 

OO Phone (417) 326-7154 



CASSETTE EJECTS 
INTO YOUR HAND 




NO-FUSS ANY-SPEED HARDWARE 

The amazing LemonAid Loader takes the 'finickies' out of Model I 
loads, but even more amazing . . . make KWIK copies of your Model 
I programs and load them flawlessly at 6x speed! Instant installa- 
tion . . . simply plug between your cable and recorder. No internal 
batteries or external power needed. 

All Loaders for Model I, switchable to Model III 

Model L80 Deluxe loader plus speaker/earphone output jack $19.99 

Model L80M Like L80 but with built-in audio monitor $23.50 

Model LS80M L80M plus LSS SOFTROL (below) in one $37.50 

(Above for Radio Shack CTR80 or 80A. No modifications 
needed. May or may not work with other recorders.) 
Model LS81M Loader/Softrol/Monitor for new RS CCR81. 
Built-in auto-powered amplifier 
for marginal tapes $44.50 

Model LSS-2 Solid state SOFTROL (1 ) elimi- 
nates switch-hits (2) pushbutton and slide switch 
control of CTR Motor makes tape positioning a 
snap with no plug pulling (3) cushioned motor- 
off delay pulls end of programs past CTR pinch 
rollers so you get no pinch-hits, plus (4) auto- 
matically gaps between saved programs. May 
be used to computer-switch other DC loads up 
to 15 volts and 1.5 A. Works with all standard- 
plug recorders and computers $18.99 



$2.99 with order 

from either company; 

Otherwise S4. 99 ppd. 
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LEMON AID LOADER 



^ 



SKEPTICAL? Any doubt 
that KWIK model I speed-up 
programs work? Send $3 for 
DEMO tape or request FREE 
with any order. 




LEMONS 
TECH 

325N.Hwy65 
P.O. Drawer 429 
Buffalo, M0 65622 
(417) 345 7643 



Call either number til 10 prn most any oay for into or order U.S. orders postpaid, add $3 for COD or overseas. Missouri residents add sales tax 



^358 
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TUTORIAL 



Selling Your Software 



by Neil J. Salkind 



s 



o you've decided to put your program on the 
market. Should you sell it through a pub- 
lishing house? Neil tells you how to begin. 



You've just finished writing the 
greatest program in the world! You 
want to let thousands of other micro us- 
ers in on the fun, but how? 

You can share the code with your lo- 
cal user group, publish it in 80 Micro, 
or, as many amateur programmers are 
doing, try to sell it commercially. 

The market for software is booming. 
As the personal computer permeates 
everyday life, the market is wide open 
for innovative and well -written software. 

Your First Decision 

So you've decided to sell your soft- 
ware. Do you want to market your soft- 
ware directly or work with an estab- 
lished software company? 

If you decide to market your software 
directly, you probably will advertise in 
magazines and newsletters, purchase 
mailing lists from direct-mail brokers, 
mail flyers, and even visit user groups. 
Don't underestimate the time and mon- 
ey you must spend — typical headaches 
include increasing postage costs, poorly 
targeted mailing lists, and documenta- 
tion that's never quite complete. 
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The advantage to handling all sales 
and marketing yourself is that you keep 
every penny sales earn. 

There are also distinct advantages to 
working with a commercial publisher. 
First, they have established technical 
support and marketing systems. Next, 
they have the people and the skills to 
adapt your program to new systems 
(other than the one the software was de- 
veloped on) so that the entire market 
can be tapped. Finally, they are virtual- 
ly impossible to compete with financial- 
ly. They have salespeople, lots of mon- 
ey for advertising, and a network of re- 
tailers already in place. 

Let's assume you decide to sell your 
work through a software house. How 
do you go about that? 

Choosing a Publisher 

Finish your program; be sure that it 
operates without problems, and fully 
document its operation. (If your pro- 
gram is accepted by a publisher, be pre- 
pared for some final editing. What you 
think is the best way of saying some- 
thing might indeed be best for you, but 



not for the thousands of potential users.) 

What are publishers looking for? In 
general, the things you want from your 
own software. It should be user friendly, 
able to handle errors, show good pro- 
gramming practice, and be unique. Few 
publishers are looking for another pro- 
gram that can balance your checkbook. 

Review the advertisements in popular 
magazines and see what kinds of soft- 
ware different companies publish, and 
which company's advertisements ap- 
peal to you. Some companies deal only 
with business software, while others 
may focus almost entirely on arcade 
games. You want to target your efforts 
where they will produce the highest like- 
lihood of success. 

Remember also that not all software 
firms deal with outside authors. Many 
commercial publishers conduct all writ- 
ing and documentation using their own 
staff and are not interested in purchas- 
ing out-of-house materials. 

After you have found a company that 
looks right, give them a call and ask to 
speak to someone in acquisitions, new 
submissions, or marketing. Depending 
upon the company, different depart- 
ments handle such calls, so be patient in 
your search to locate the right person. 
Tell what you have done, and see if they 
are interested in learning more. Many 
firms use a submissions packet consist- 
ing of all the materials you need to sub- 
mit your work for consideration. Oth- 
ers might simply want a listing of the 
program. Under no circumstances 
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Prices per Game TRS-80* 16K Level II Mod I/Mod III Cassette $15.95 Talking and sound effectsare playable through 

TRS80" 32K Level II Mod I/Mod III Diskette $19.95 th ® cassette AUX plug. High scores are auto- 
matically saved after each game on disk 
10% discount for 2 items. 15% for 3 or more. Please add S2.50 per order for postage & version. Joystick compatible, 
handling Michigan residents add A% sales tax. Outside USA (except Canada) please Call or write for our f 
add S 10.00 per order for postage & handing. complete catalog. I 
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should you ever send your materials, 
either in disk, cassette, or printed form 
to a publisher without first making an 
inquiry and then fully protecting your- 
self (which we'll get to in a moment) 
against misuse of your materials. 

If you are hesitant to call and want to 
write a letter instead, be sure to include 
as much as you can about the program's 
development, any limitations there 
might be (for example, memory needed) 
the system it was developed on, as well 
as a full description of what it does. 

Do not be discouraged by disinterest- 
ed companies. Try other firms until 
you've at least one invitation to submit 
your materials for consideration. If 
your work is good, someone will surely 
be interested. 

Finally, although it's a good idea to 
send inquiries to more than one com- 
pany at the same time, be careful not to 
send off the actual materials to too 
many publishers at once. Go first with 
the one you feel can best serve your 
needs, and then work your way down if 
your program is not accepted. 

Protecting Yourself 

Sometimes people do make the mis- 
take of sending their programs to a 
company without first making in- 



quiries. The next thing they know, their 
software is being passed around and 
they've lost any chance at the market. 
When you deal with any company, you 
must protect yourself by using a nondis- 
closure form and by copyrighting your 
materials. 

A nondisclosure statement simply 
says that the company will not disclose 
or reveal the contents of your work to 
anyone else while discussions with you 
are underway or thereafter if they don't 
choose to publish. In other words, they 
cannot discuss your work outside of 
their own company. Any company that 
does not suggest you complete such a 
"orm should not be considered. 

The next step you should take is to 
copyright your work, a much easier and 
more inexpensive procedure than most 
people think (see "How to Copyright," 
page 154). 

In 1978, with the increase in the num- 
ber of programs being written, the 
Copyright Law (P.L. 96-517) was 
amended to include computer programs. 

It is important to understand that the 
Copyright Office only acts as an office 
of record. They will not verify whether 
your program works. For them, a com- 
puter program is defined as "a set of 
statements or instructions to be used di- 



rectly or indirectly in a computer to 
bring about a certain result." In other 
words, they assume what you send them 
is what you claim it to be. The copy- 
righting of the material in no way vali- 
dates that claim. 

When you are ready to copyright 
your work, you should enter as a com- 
ment in your printout the word "Copy- 
right," your name, and the year. You 
should also have it incorporated into 
your program itself if there is any kind 
of visual output. (Next time you play 
Pac-Man, glance at the bottom of the 
screen.) Send to the Copyright Office 
(Library of Congress, Washington, 
DC) for one copy of form TX. Com- 
plete this form, and send it along with 
$10 plus a listing of your program to the 
Copyright Office. Your certificate will 
arrive within a few weeks. The people 
who work in the copyright office are 
very helpful — feel free to call them if 
you have questions. 

When you send a listing of the pro- 
gram, be sure that it is in a high-level 
language rather than machine language 
since the examiners will want to read at 
least part of it. Since some programs 
run very long, send only the first and 
last 25 pages of the listing if it is more 
than 50 pages. 
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Nanos System 

REFERENCE CARDS 

For Models f, II, III, Color, Pocket and Apple II & II Plus 

At last! No more Hipping through the pages of the Basic manual! No more working through the maze ol 
machine language instructions!. These cards completely summarize the Basic and Assembler manuals' 
FEATURES (on most cards): 

memory map, eyeball graphics, math Instructions, basic commands, store Instructions, basic (unctions, load 
instructions, basic statements, move instructions, special keys, exchange Instructions, print using 
examples, shift instructions, basic special characters, compare Instructions, basic and assembler 
messages and codes, branch instructions, basic facts, data alteration Instructions, reserved words. 
I/O instructions, ROM routines, complete character chart with graphics and space^compression 
codes, hex-dec chart, control code cross-reference, assembler instructions commands and 
operators, screen line layout, editor commands & subcommands, condition code easy access. 

Model I: BASIC only FC1001 $2.95 

Model I: BASIC and Assembler FC1002 $4.95 

Model II: BASIC and Assembler FC1005 $5.95 

Model III: BASIC only FC 1004 $3.95 

Model III: BASIC and Assembler FC1003 $5.95 

Color. BASIC and Extended FC1006 $4.95 

Apple II A II plus BASIC FC1007 $3.95 ™ 

Apple II & II plus BASIC & 6502 FC1008 $4.95 

Pocket: BASIC only FC1009 $2.95 

^^ff^f\ NEW 

_^-*^^^^f^A''^'\B|X^ Z-80 Machine Language $4.95 

\ ModoilLSVC $2.95 

\ Model II: Commands and 

Utilities $3:95 

Model II: TRS-80 Commands 

and Utilities FC1010 $3.95 

Z-80 Microprocessor 

FC1011 $4.95 

ZX80. ZX8t. and Tnnox Sinclair 
1000FC1012 $5.95 

Prices do not include shipping and handling charges. Sorry no COD orders. 

Use the order card in this magazine to order. Allow 4-6 weeks for delivery. 

Shipping and handling for card3 only $1.00 per order. 

80 Microcomputing Bookshelf • Peterborough, NH 03458 

1-800-258-5473 

J "TRS-80 Is a Registered Trademark of Tandy Corp. 

Computer picture reprinted permission Tandy Corp. VISA ! 

APPLE Is a registered trademark of Apple Computing Inc. ■ 
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10% discount for '?. items. 15% for 3 or more Please add 52 50 per order for postage & 
handling. Michigan residents odd 4% sales ?ax Outside USA (except Canada) please 
add S10 00 per order for postage & handing 



C0 ^Tft Y 

FRIED 
CHICKEN 



Talking and sound effects are playable through 
the cassette AUX plug. High scores are auto- 
matically saved after each game on disk 
version. Joystick compatible. 
Call or write for our 
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What You Should 
Expect from a Publisher 

A publisher should provide good de- 
sign and coding assistance, documenta- 
tion (if yours is not perfect, which it 
rarely is), telephone support for users 
(especially if the program is very 
complex), on-going maintenance (en- 
hancement and revisions for different 
operating systems), sales and marketing 
systems already in force (not just adver- 
tising), and finally, a royalty rate that 
you find acceptable. 

Royalties are always a sticky situation 
and vary widely from publisher to pub- 
lisher. In general, publishers pay 
around 30 percent of their net sales. 
What this means is that they might sub- 
tract production costs (disks, printing 
and binding costs for the documenta- 
tion, and so on) from the sales cost. In 
numbers, the net cost is 80-85 percent 
of the retail costs, and this figure is what 
your royalty would be based on. For ex- 
ample, if the retail price of the program 
is $20, the net (85 percent of $20) is $17, 
and your 30-percent royalty is $5.10. 

The dealer, of course, also gets a dis- 
count of around 40 percent. In the end, 
the publishing company itself has per- 
haps 20-25 percent as their profit. You 



can see they need to sell a good number 
of any software package to recoup de- 
sign and production costs. 

The larger the predicted sales are, the 
more likely it is that your royalty will be 
higher. In the same sense, the more the 
publisher has to invest in bringing your 
software on line, the less your royalty 
will be. 

Finally, programmers who have an 
established reputation can demand a 
higher royalty. I have not heard of any 
software designer getting an advance 
for his or her work (much like the book 
publishing industry does on a regular 
basis), but I certainly wouldn't be 
surprised if this is a common practice in 
the future. 

What the Publisher 
Does with Your Software 

When you send your materials to the 
publisher, and after the nondisclosure 
form is signed, the company will begin 
evaluation. This can be done in several 
ways. One way is to have their own staff 
do the evaluation. Some companies, 
however, send it to outside evaluators 
who test the program on their own ma- 
chines and can get a feel for the every- 
day value of your idea. 



This evaluation process can take up 
to three months in some cases, and only 
a few weeks in others. It depends upon 
the backlog of programs to be reviewed 
and the publisher's procedure for re- 
viewing. Don't call the publisher every 
few days asking if a decision has been 
made yet. They want the evaluations 
back as quickly as you do, so you will 
both have to wait. 

Virtually all software that comes to a 
commercial firm needs some additional 
work, and the amount of time that it 
will take to get the bugs out, rewrite the 
existing documentation, and produce 
the final version are all factors that en- 
ter into the publisher's final decision 
whether to offer you a contract. 

Although it might seem to you that the 
market is saturated (because most com- 
puter magazines are full of advertise- 
ments), this is simply not the case. The 
potential for sales of new programs with 
new uses, or even new programs that do 
a better job than others, is expanding 
every day. Get to work writing and stick 
with it until you're successful! ■ 



Neil J. Salkind, a developmental 
psychologist, lives at 1235 Tennessee 
St., Lawrence, KS 66044. 




EPSOIT 

MX-80AND MX-100 

OWNERS 



GIVES YOU 
CONTROL OF YOUR PRINTOUT 

SELECT CONDENSED, BOLD, OR WIDE 
PRINT INSTANTLY USING THE PRINTER 
PANEL BUTTONS. < N0 computer control codes required) 

ACTIVATE PERF-SKIP AND LEFT MARGIN 
INDENT TO AUTOMATICALLY FORMAT YOUR 
PRINTOUT INTO NEAT PAGES THAT CAN BE 
PUNCHED AND BOUND. 



MXPLUS™ INSTALLS 



UTES, NO SOLDERING! 



MXPLUS IS A PLUG-IN MODULE FOR ALL EPSON MX-80/100 
PRINTERS AND IS COMPATIBLE WITH ALL INTERFACE BOARDS. 
.MXPLUS HAS A 1 YEAR WARRANTY. 



ORDER TODAY 

ORDERS CALL 24 HR. 800-835-2246x441 
INFORMATION CALL 213-969-2250 



DRESSELHAUS COMPUTER PRODUCTS 

BOX 929 

AZUSA. CALIFORNIA 91702 
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$49.95 

POSTPAIO CALIF. AOO 6°. 

SAME OAY SHIPPING 

WITH MC/VISA 




Color Co mp 






2 



Are you tired of searching the latest magazine for articles about 
your new Color Computer? When was the last time you saw a 
great sounding program listing only to discover that it's for the 
Model I and it's too complex to translate? Do you feel that you are 
all alone in a sea of Z-80's? On finding an ad for a Color Computer 
program did you mail your hard earned cash only to receive a 
turkey because the magazine the ad appeared in doesn't review 
Color Computer Software? If you have any of these symptoms 
you're suffering from Color Computer Blues! 

But take heart there is a cure! 
It's COLOR COMPUTER NEWS. 

The monthly magazine for Color Computer owners and only Color 
Computer owners. CCN contains the full range of essential 
elements for relief of CC Blues. Ingredients include: comments to 
the ROMS, games, program listings, product reviews, and general 
interest articles on such goodies as games, personal finances, a 
Kid's page and other subjects. 

The price for 12 monthly treatments is only $21.00 and is available 

from: 

#»* t REMarkable Software 

P.O. Box 1192 
Muskegon, Ml 49443 *- 145 

NAME . 




\M 



ADDRESS 
CITY 



State.. 



.Zip. 



Allow 8-10 weeks for 1st issue. 
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BUSINESS 



^ The Ultimate in Mailing Packages 

*° POSTMAN MASS MAILING SYSTEM 

®1982 Alger Software, Distributed exclusively by Soft Sector Marketing, Inc. 

For the serious businessman who has as little as 100 name mailing list or 200,000 names> 
THERE IS ONLY ONE SYSTEM FOR YOU! 

FEATURES OF THE NEW POSTMAN MASS MAILING SYSTEM 

The Postman system (version 2) is an almost COMPLETE rewrite, rethink, redesign of the original POSTMAN. The many features of the 
new POSTMAN system are quickly outlined below. 



MULTI-DRIVE - True multi-drive operation is possible. POSTMAN will search all drives for 
address files and connect them together into one large file for the duration of that session. 
Once POSTMAN has found the data files on the disks the operator "sees" just ONE 
CONTIGUOUS sorted list of addresses. The operator does not need to tell POSTMAN when to 
"switch" drives or manually "swap" sections of the data file in and out of the computer's 
memory. This is the foremost among the list of features because of its relative uniqueness 
among mail list handlers written for the TRS-80. 

LARGE UfT SUPPORT- The multi-drive operation allows the user to access data files on ALL 
configured drives CONCURRENTLY (at the SAME time) for truly large mailing lists. Files need 
not be sectioned into smaller "byte size" chunks to fit into memory. 
HARD DISK SUPPORT - (HARD DISK POSTMAN only) The FULL utilization of the space and 
speed of the new hard disk drives is possible with POSTMAN. For example, a 7.5 megabyte 
drive can be configured to hold almost 60.000 labels. Multiple hard drives can be accessed 
CONCURRENTLY allowing 200.000++ entry mailing lists. 

FORM LETTER CAPARIUTY-With the purchase of the separate POSTRITE program, the user is 
provided with an easy to use form letter generator which will merge a generalized letter 
produced from a word processing system(i.e. LAZY WRITER, etc.). with the nameand address 
information from the POSTMAN MASS MAILER data base. POSTWRITER allows the user to 
insert any field from a POSTMAN label entry anywhere in the letter. 

MENU OPERATION - As you would in a restaurant, choose your dinner from a list (or MENU). 
POSTMAN will allow you to direct its actions by selecting from various menus that it will 
display. A complete discussion of each menu is presented in the manual. 
INSERT - New names can be quickly added to your list at any time. The new addresses are 
placed into the file in their proper sorted order eliminating the need for a separate sort 
operation after entering a stack of new names. POSTMAN will allow the operator to enter a 
"batch" of labels without returning to the control menu between each label insertion, thus 
speeding entry and reducing the aggravation of extra menu control keystrokes. 
DELETE - Names can be removed at any time when they are no longer needed. 
EDIT- Information in any name entry can be quickly changed at will with "word processor" 
ease. A"transparent" cursor simply is moved to the label displayed on the computer screen 
and corrections are just typed over the existing label. If you happen to change a field which 
is also used as a sort key. POSTMAN will automatically move the changed label to its correct 
position in the list to maintain the sorted arrangement of the labels. 

OVERLAY- When identical changes are needed on many addresses, the OVERLAY feature 
can make them with one keystroke. The needed changes which are common to many 
labels are entered into the "overlay mask". When you wish to apply these common changes 
to any label, one command will do it. 

SORT - Arrange your list in any alphabetic or numeric order. The ordering may use one or 
more fields to control the sort. A machine language heap sort assures fast execution. The sort 
need only be performed once, the sorted list will stay sorted through all subsequent 
insertions, deletions and changes to existing labels. NO NEED to leave the POSTMAN 
program to use a separate program to sort your data. Your data is sorted quickly and after 
sort completion POSTMAN is ready for your next command! 



SPECIAL STREET ADDRESS SORT - For the user with many addresses on the same street. 
POSTMAN will sort your entries by the house NUM8ER after grouping those on the same street 
together. Local city lists can be quickly sorted to aid post office dispatching. 

PURGE - Unwanted duplicate addresses can be removed from your list automatically or 
under operator control. 

SEARCH - Any address in your list can be quickly found with fast search and positioning 
commands Three different types of searches are provided. A "fast" search which uses a 
hashing technique, a "selective sequential" search for labels with common fields, and 
"quick" positioning using the first or major sort field toget you into the general "ball park" of 
a label or sequence of labels. 

LABEL PRINTING- One. a few or all addresses in your list can be printed on standard or non- 
standard label stock. Up to 6 labels across can be printed with a format YOU can easily 
control. TWO user definable ATTN' lines are provided for any use. Labels can be printed from 
many of POSTMAN'S menus, search, edit, or during label insertion 

EFFICIENCY - POSTMAN is written in the machine's native language to gain the full 
advantage of the microcomputer's speed Extensive use of program segmentation 
reduces the amount of use RAM needed to hold the program allowing a greater number 
labels to be kept in core, resulting in faster operation Little used routines need only be 
brought into memory when they are needed and once through with their task, release their 
space back to POSTMAN. 

REPORT LISTINGS - A special program to produce columnar listings of address data from 
your label data base is provided. You can easily specify the information to be printed 
DATA DISK MERGING- Labels can be quickly transferred from one disk to another with the 
PSTMERGE program callable from the main POSTMAN SYSTEM menu Source and destination 
drives needed not be separate drives, prompts to exchange diskettes if the same drive is 
used, are provided. 

DATA DISK PREPARATION UTILITY- Provided with POSTMAN is the DPREP program which 
allows the user to preparea floppy/hard disk for use with POSTMAN This easy to use utility can 
be told to prepare any portion of the available space on a disk 

DATA INTEGRITY- All data transfers to the disk filesare made using special write commands 
which instructs the operating system to check the validity of EACH write to the disk. 

DATA GUARD' - is a special programming technique only offered by Soft Sector 
Marketing. Inc. If by chance your machine resets while writing information to the disk, you 
only lose the information that you were writing. Your files are always protected from the 
danger of losing all the work that you have put in that day. NO OTHER PROGRAM ON THE 
MARKET OFFERS THIS PROTECTION. If you reset with ANYBODY'S MAILING PACKAGE DURING 
WRITING you would destroy your ENTIRE data disk We can't stop your machine from failing 
but we can protect your data. 



Description of Label Record Fields: 



Length 


Name 


10 


Code 


15 


Last Name 


15 


First Name 


26 


Company 


26 


Address 



Description 

User defined printable field 
Last name of addressee 
First name of addressee 
Name of company 
Street address 



IDEAL SYSTEM 



Length 


Name 


Description 


15 


City 


City, township, village 


5 


State 


State, province, territory 


9 


Zip 


Zip code, zone, route 


2 


Data 1 


User definable field 


5 

1 


Data 2 


User definable field 



Mod III 48K 1-40 Track Drive • 2-80 Track Dual Headed Drives • Dosplus or LDOS Operating Systems 
Gives space for over 1 1,000 names - 5 second average name insertion - time sorts all 1 1,000 names in less than 4 minutes 

"Special version to work on Dosplus 4.0 Hard Disk operating system. 



A 



Standard Version 
Only $125.00 



- Overview Available - 
The POSTMAN system requires Mod I or Mod III, 48K, 2 disk drives minimum. 

Standard Version with for DOSPLUS Hard Disk4.0 Operating System 

POSTWRITER form letter writer & Radio Shacks Hard Drive System 

$175.00 $225.00 
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- DEALER INQUIRIES WELCOME - 



SOFT SECTOR MARKETING, 

INCORPORATED 

P.O. Box 340 e Garden City, Michigan 48135 
Order Line 800-521-6504 

Michigan Orders & Questions 313-425-4020 



PAYMENT- payment accepted Dv charge personal chec 

Icr' C O D only, under the following conditions Charges 
processed when shipped usual'y within <58nours Personal 
Checks delay shipping pending 3 weeks to clear C.O.D. 
■i i. -i> :i. • • -r: •>•.) c-nijcu or Cash only, add St bU -VII residents must ada 4% sales tax 
SHIPPING & HANDLING - Shipping Charges: Sena the larger amount. 2% or $250 uniess 
$1 L'u a'ed otherw so Any oraei received without shipping and handing will oe shipped freight 
collect Air Mail Shipping outside ot North America, please send the larger amount 10% or 
.' ' '■(' Overpayment wm I be refunded 



-See List ot Advertisers on Page 435 



80 Micro, January 1983 • 109 



REVIEW 



The Great Beyond 



by Terry Kepner 



• ••• 

Beyond-Basic 

Excalibur Software 

3336 Cascadia Ave., S. 

Seattle, WA 98144 

Package I disk $49.95, tape $39.95 

Package II disk $64.99, tape $49.99 

Package HI disk $79.99, tape $59.99 



TRS-80 programmers rejoice! Excal- 
ibur Software has just increased the 
power of Basic 1,000 percent. Beyond- 
Basic is a machine-language program 
that replaces standard Microsoft Basic 
and adds 60 new Basic commands, 
functions, and operators for cassette- 
based computers and 82 new Basic com- 
mands, functions, and operators for 
disk-based users. 

Beyond-Basic is available in three 
configurations: short, medium, and 
long, for cassettes or disks. Each of the 
larger versions contains all the com- 
mands, operators, and functions of the 
next smaller version. The smaller ver- 
sions are included in packages two and 
three so you can use them when you 
need the extra memory they free, and 
don't need all the power of the larger 
versions for the particular program 
you're writing. 

Beyond-Basic 's manual is thick, over 
200 pages. The same manual is used for 
all three versions and is divided into 
three sections. The introduction claims 
that this is done so you can upgrade 
from one version to another without 
needing another manual. I suspect that 
Excalibur is using only one manual as a 
subtle form of advertising: Once you 
see the features you didn't get, you'll 
want to buy the next version. 
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Increase the power of 
Microsoft Basic 100 
fold with Excalibur Soft- 
ware's new Beyond -Basic. 



There are certain features common to 
all three versions, cassette and disk. I'll 
cover these first. 

Beyond-Basic uses its own keyboard 
driver to supply lowercase support for 
Model Is with the uppercase/lowercase 
modification. It also gives you control 
over the character used as the cursor 
and if it blinks. Repeating keys, the time 
delay before repeat takes effect, and the 
speed of the repeat are also under your 
control. 

Pressing the shift and right-arrow 
keys tabs the cursor over eight columns, 
as in standard Basic, but pressing the 
left-arrow key jumps the cursor back 
over all the spaces in the tab. Pressing 
the shift and up-arrow keys has been 
modified to let you input any ASCII 
code from 1-255. After pressing this 
key, the keyboard waits for you to type 
up to three decimal numbers that repre- 
sent the ASCII character code you 
want. Numbers greater than 128 are 
stored and displayed in the line as 
graphics characters, numbers less than 
32 are stored as the graphics character 
formed by adding 128 to the number. 

If, while typing in a line, you discover 
a mistake made earlier, press the shift 
and right-arrow keys and the line is 
transferred to Beyond-Basic 's XED 
mode, where you can use the editing 
commands to correct the line before 
typing further. 



Another useful feature covers the im- 
mediate keys. These are keys that you 
can type as the first character of a com- 
mand line and have them treated as full 
commands; i.e., pressing the period key 
followed by the enter key lists the cur- 
rent program line. Other immediate 
keys are: the up-arrow key lists the 
previous line; the down-arrow key lists 
the next program line; shift and up- 
arrow lists the first line of the program; 
shift and down-arrow lists the last line 
of the program; comma puts you into 
standard edit mode for the current line; 
shift and comma puts you in Beyond- 
Basic's Extended Editor (XED); semi- 
colon runs the current program; slash 
continues program execution after a 
break; colon resumes auto line number- 
ing starting at the current line number 
plus the last increment; and the @ sign 
lists the statement about to be executed 
if the program has been stopped by an 
error or by the break key. 

All the Beyond-Basic versions also 
support shorthand notation for certain 
commands: 

A AUTO 

D DELETE 

E EDIT 

G GOTO 

L LIST 

L LOAD (if followed by quotes) 

R RUN 

S SAVE 

The medium version also includes F 
(Find) and X (XED for extended editor) 
as shorthand, while the disk versions ac- 
cept K (Kill) and N (Name). 

For those fortunate (or unfortunate) 
enough to remember Level I Basic, the 
abbreviations of Basic commands (P. A. 
for PRINT @) allowed were real time 



savers. Well, Beyond-Basic lets you ab- 
breviate commands by their first letter 
followed by a period. 

There's no memory advantage to 
using these abbreviations, but they do 
make it much easier when typing in pro- 
gram lines. 

For those of us interested in program 
readability and structured program- 
ming, Beyond-Basic automatically in- 
dents For . . . Next loops by indenting 
two spaces per nesting level after the line 
number for each line affected. This in- 
dentation technique is also used with the 
BeyOnd-Basic commands WHILE . . . 
WEND and LIF. . .ENDIF. Lines be- 
ginning with the Basic command REM 
are also indented. 

Other improvements include accept- 
ing hexadecimal and octal numbers in 
input, data, and VAL statements; ac- 
cepting numbers between - 32768 and 
+ 65535 as integers; letting you put 
quotes in strings without having to use 
CHR$(34); fixing the Tab function to 
operate properly with LPRINT 
(LPRINTTAB(130) puts the print head 
at column position 130 instead of col- 
umn 64 as with standard Basic); and in- 
stead of putting you in edit mode when 
a syntax error is discovered, you're left 
in command mode of Basic, preserving 
your program's variables and values. 

Features Taken 

From Standard Disk Basic 

Many features of standard Disk Basic 
have been duplicated by Beyond-Basic, 
most of which are available in all ver- 
sions. These are: CMD"R" and 
CMD"T" (turning internal clock on 
and off for Model I disk, turning clock 
display on and off for Model III disk); 
DEF USRn and USRn (10 USR func- 
tions); INSTR (search a string for a sub- 
string); LSET and RSET (left and right- 
justification of strings, disk only); 
DEFFN and FN (define user functions, 
not in the short version); MID$ = (take 
a substring and store it in another 
string); and Load and Save (which 
operate exactly as CLOAD and 
CSAVE, tape system only). 

The Short Version 

The functions supplied with the short 
version of Beyond-Basic include trans- 
lating integer expressions into hexa- 
decimal numbers and back; converting 
strings of hex digits to integers; convert- 
ing hexadecimal numbers to strings of 
ASCII codes; converting strings of up- 
percase letters to lowercase and vice ver- 
sa; calling machine-language routines; 
converting degrees to radians; convert- 
ing between signed and unsigned in- 



tegers (65535 to the appropriate normal 
integer); evaluating numbers buried in 
strings (VAL finds the number only if it 
starts the string); PEEKing a string 
from memory; formatting a number 
similar to the Print Using command, 
only this returns a string in a variable; 
PEEKing of 16-bit numbers; generating 
a string of spaces with a single com- 
mand; a routine that performs similarly 
to INKEY$, except it waits for a key to 
be pressed; another routine that oper- 
ates the same as INKEY$ except the 
buffer isn't emptied when it's read; let- 
ting you find the address of a line num- 
ber; and positioning the line-printer 
print head. 

There are several new operators that 
make it easier to use Beyond-Basic: DIV 
performs integer division faster than 
Basic's "/"; EQV performs a binary 
AND operation on two integers; IMP 
results in NOT (A AND NOT B); MAX 
returns the larger value of two numbers; 
MIN finds the smaller of two numbers; 
MOD finds the remainder of integer di- 
vision; and XOR, which returns a true 
condition if either one, but not both, of 
its arguments is true. 

The Medium Version 

The medium version includes all the 



commands, functions, and operators of 
the short version, with the addition of 
three commands, two statements, and 
two functions, including: 

• Find scans your program for any 
string of up to 20 characters, including 
Basic and Beyond-Basic tokens. 

• Size gives you program statistics on 
free memory size; current program size; 
number of program lines; number of 
file buffers; number of bytes used by 
any currently defined variables; number 
of bytes cleared for strings; and the to- 
tal size of the program, variables, and 
string RAM. 

• XED, the Extended Basic Editor, 
performs similarly to the normal Edit 
except it displays the entire line you're 
editing (using a nondestructive cursor, 
like a word processor); control charac- 
ters are displayed as graphics; the line 
number can also be edited (letting you 
duplicate a line by just giving it a new 
number); graphics can be entered using 
the G command and pressing Q, W, A, 
S, Z, and X; and you can store any 
ASCII character (1-255) in the line be- 
ing edited. 

• Plot statements give the Model I and 
III many graphics commands of the 
Color Computer (plot a filled box; a 



NEW TRS-80* PROGRAM 
LETS YOU CHART STOCKS 
LIKE A WALL STREET PRO. 

The Wall Street TAP is a powerful, professiona 
stock market trading tool. It employs the same 
charting methods used by successful market 
experts to buy, sell and hold stocks. 

Now, you can make these time-sensitive decisions 
yourself and make more money on the market. 

Point and figure, moving average and on balance 
volume charts are at your fingertips to spot trends and 
compare the performance of two stocks instantly. 

Easy to use, the Wall Street TAP is self-documented, user 
friendly, self-prompting with virtual error-free entry and batch 
updating. You need a TRS-80 Model I or III 48K and 1 disk drive 

*TRS-80 is a trademark o( Tandy Corp 

WALL 
STREET 

* Technical Analysis Package. 




TAP 



,^371 




SPECIAL EXTRA 
INTRODUCTORY BONUS. 

FREE Book included 

if you order today! 

Understanding Wall 

Street, "One of those 

rare publications that 

delivers exactly what it 

promises. . " Barron's. 



Chart Stocks, Commodities & Currencies 3 Ways. 

Name 
Address 



FOR MORE PROFIT & BIGGER GAINS 
ORDER YOUR WALL STREET TAP TODAY! 



□ Yes. I want to start charting stocks on my 
TRS-80 today. Please send my Wall Street 
TAP tape immediately. US $199.95 is en- 
closed. I understand postage, handling, 
documentation, sample printouts, help 
desk support and FREE Bonus is included. 

D Send documentation only. US $29.95 plus 
$2 postage and handling. ($29.95 refund- 
able if you purchase package later.) 



City State/Zip 

Payment $ □ Check n Money Order 

D Visa □ MasterCard M3 

Card No 

Expiry Signature 

Fill-In & Mail Coupon To: Think Software Inc., 
572 - 810 W. Broadway, Vancouver, B.C. Canada 
V5Z 4C9 Or Phone For Faster Delivery. Card users 
only, call 24 hours (604) 261-7261. Dealer 
Inquiries Welcome. 



^See List of Advertisers on Page 435 
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line; a box outline; shapes by using up, 
down, left, right, erase, and invert; plot 
width, rotation, scaling, clearing, and 
intersections; plot using variables or ar- 
rays; and plot by superimposing screens 
on top of each other and displaying 
them or displaying only where they in- 
tersect, or don't intersect). 

• ERN$ corrects a deficiency of the on- 
error trapping routines by providing 
string messages to the error-trap routine 
instead of just numbers. 

• SYS is tied to the plot statements, and 
fills in the SYS(15-18) locations with 
the proper information. 

Long Version 

The long version contains everything 
in the medium version, plus these com- 
mands and statements: 

• COMP automatically compresses 
your program by removing unneeded 
spaces and, optionally, remarks. 

• LREF is a line-number cross-ref- 
erence. 

• RENUM is a program renumbering 
routine. 

• VLIST lists all the currently defined 
variables in your program, as well as 
their values. 

• VREF is a variable name cross-refer- 
ence, which lists all the variable names 



in your program. 

• MAT, matrix manipulations, lets you 
fill, copy, reshape, add, subtract, multi- 
ply, print, read, and delete entire arrays 
with one statement. 

• Sort, sorts arrays into ascending or 
descending order; either the entire array 
or just a portion of it can be sorted at 
any time. Up to 64 arrays can be simul- 
taneously sorted. 

Disk Systems Only 

There are several commands, state- 
ments, and functions that are restricted 
to disk systems. Most are related to disk 
I/O, and include: 

• INCHRS reads a character from a 
disk file. 

• Name displays default file name. 

• OPEN"C" opens a file buffer to 
pass information from one program to 
another. 

• OPEN"S" opens a sequential file, 
for output or input, without erasing the 
current file on the disk. 

• SLOAD lets you break a large pro- 
gram into segments. 

• SYS loads a machine-language 
program into memory, but doesn't exe- 
cute it. 

The disk versions of Beyond-Basic 
also include a special utility called 



Our prices - 

are so low we < 

aren't allowed 

. to print r 




NEW! 

TRS-80 

Computer 

Call for details • 
and low price 



*«*>" 



Send for FREE 40-page catalog including equipment reviews, prices. 
. specs, and illustrations on over 600 computers and accessories. •" 133 

CALL TOLL FREE: 800-526-531 3 



15 Marshall Hill Road, West Milford Mall I DlSCOUIlt 
West Milford, New Jersey 07480-219 I nf America 
In New Jersey Call 201-728-8080 P- 



CONFIG/CMD, which lets you change 
the operation of Basic to your custom 
needs, such as disabling the lowercase 
driver (Model I only), causing all output 
that would normally be sent to the 
printer to generate a "Feature Not 
Available" error if you don't have a 
printer available, setting up a default 
memory size, or setting up to use the 
standard Basic Editor instead of XED. 

There's one command I haven't men- 
tioned yet, and that's "$". By typing 
"$" directly in front of a Basic com- 
mand, you specify that the command's 
output be sent to the printer; i.e., $DIR 
will force the directory to be printed out 
instead of printed on the video. Also, 
you'll notice that many Basic com- 
mands were modified for use by Be- 
yond-Basic. This hasn't affected their 
normal performance. Thus, while CVD 
is used by Beyond-Basic to convert 
degrees to radians, it still functions as 
convert to double precision when prop- 
erly used with a field statement and 
string variable. So you haven't lost any 
of the normal Basic commands or abili- 
ties; instead, they've been enhanced to 
include new abilities. 

As you can see, Beyond-Basic is a 
very powerful program, but it does have 
a few flaws: It's guaranteed to work on- 
ly with TRSDOS (or Percom's DBL- 
DOS). Not all your DOS's capabil- 
ities (if it's not TRSDOS) will work 
properly. 

There's no summary of commands, 
nor a command-syntax card. If you 
want to find a command, you must use 
the manual's index. This also makes it 
difficult to learn the commands, as you 
have no handy method to remind you 
of commands you may have forgotten 
after reading the manual the first time. 

If you write a program using Beyond- 
Basic, you must always have this system 
in memory to use the program. (That is, 
the only people who could use your pro- 
gram would have to have Beyond-Basic 
before they could use your program.) If 
you're writing only for your own needs 
or for someone who has Beyond-Basic, 
then this point isn't relevant. 

I think Beyond-Basic is a useful tool 
for the programmer writing a program 
for a specific use. It has many features 
that ease the difficulty of writing and 
debugging a program, and many more 
features that make the program a sleek- 
er, more efficient unit. If you currently 
use TRSDOS Basic for your program- 
ming, I suggest you get Beyond-Basic. 
If you aren't using TRSDOS, you 
should still give Beyond-Basic your con- 
sideration in view of its many power 
features. ■ 
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OUR PRICES. SELECTION 



iMKLaa. 



MAKE US COMPETITIVE. 
OUR PEOPLE MAKE US EXPERTS 



Red Baron, 
Home of the Nation's Largest Computer Printer Inventory, 




NEC 8023 

Outstanding Graphics, Print 
Quality & Performance 




144 x 160 dots/inch • Proportional Spacing 

• Lower case descenders • N x 9 dot matrix 

• 8 character sizes • 5 unique alphabets 

• Greek character set • Graphic symbols 

• 100 CPS priot speed • Bi-directional logic- 
seeking • Adjustable tractors • Single-sheet 
friction feed • Vertical & horizontal tabbing 

NEC 8023 OPlll 

Dot Matrix List $795 $ Uall 

Televldeo CRT's 

Price, Performance & Reliability 

910 List $699 $(Jall 

925 List $995 For , ow 

950 List $1195 Prices 

Other Quality Printers at Red Baron 

List Discount 

Anadex DP-9501A $1725 $C»II 

Anadex DP-9620A $1845 SCall 

Anadex WP-6000 $3250 $Cal I 

C. Itoh 8510 Prowriter . . . . $845 SCall 

IDS Microprism 480 $799 SCall 

Diablo 630/6 $2995 $2570 

NECSpinwriterRO 

Serial Parallel 7700 $3055 $2500 

Serial 3510 $2290 $1700 



Interface Equipment 

Complete Stock of Options, 
Cables and Accessories. 

GRAPPLER + APPLE INTERFACE $1 

BUFFERBOARD $1 

CCS APPLE SERIAL Interface & Cable . . .$1 
ORANGE INTERFACE for Apple II 

Parallel Interface Board and Cable $ 

NOVATION D-CAT modem $1 

Novation Cat Acoustic Coupler $1 

COMPLETE STOCK OF EPSON 

ACCESSORIES $€ 

CUSTOM PRINTER CABLES FOR Apple, 

Atari, IBM, TRS-80 (all models) SC 

HAYES MICROMODEM II $2 

PRINTER STANDS: Large $ 

Small $ 

PRINTER RIBBONS— Most Types SC 



IDS Prism 80/132 

Affordable Color, Speed 




Dot Resolution Graphics • 9-wire staggered 
printhead • Lowercase decenders 

• 200 CPS • Bi-directional, logic-seeking 

• 8 character sizes • 80-132 columns 

• Proportional spacing • Text justification 

• Optional Color 

Prism 80 Base List $1,299 CPill 

Prism 132 Base List $1,499 gUdll 



Smith-Corona TP-1 

Daisy Wheel Printer For Under $900 




Letter quality • Standard serial or parallel data 
interface • Drop-in ribbon • 144 WPM • Various 
fonts available • Loads paper like typewriter • 
Handles single sheets for forms 

Smith-Corona TP-1 List $895 



SCall 



The Epson Series 

High-Quality Printers 
at a Low Price. 



The Okldata Series 

Hi-Res & TRS 80 Block Graphics 





Epson MX80FT List $745 gffVall 

Epson MX-100 List $995 yL*lll 

Full Line of Epson Acessories. 



120 CPS • 9 x 9 Matrix • Bidirectional logic 
seeking printing • Lower case descenders 
• Four print styles • Optional Hi-Res Graphics 

Okldata 82A List $649 

Okidata 83A (w/Tractor) . List $995 CPoll 
Okidata 84 (Parallel) ..List $1395 vWul 




Our People, Our Product: 
Both Are Specialized. 

Red Baron is an organization of compu- 
ter printer specialists. They know the 
capabilities of each printer, and how to 
match one to your exact need. Call for 
expert consultation today! 



Here's How To Order 

Phone orders are welcome; same-day shipment on 
orders placed before 11:00 a.m. Free use of Master- 
Card and Visa. COD's accepted. Personal checks 
require 2 weeks clearance. Manufacturer's warranty 
included on all equipment. Prices subject to revision. 
APO/FPO Orders Welcome. 

Call For Free Catalog: 

(800) 854-8275 

CA, AK, HI (714) 630-3322 




1100 N.TUSTIN #207 
ANAHEIM, CA 92807 
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^oftujctre Support 



• 327 



ONE EDGELL ROAD 

FRAMINGHAM, MA 01701 

TELEPHONE: (617) 872-9090 



THANK YOU FOR A FANTASTIC YEAR ! 



All of us at Software Support want to extend seasons greetings to you and a 
New Year's wish. We hope that you have had the same successes that we have 
enjoyed this past year and that this coming year provides you with a continuity 
of the same. 

This is the time of year we reflect on the past twelve months and what they have 
brought. There have been some surprises, some joys, but mostly (and best of 
all), many personal accomplishments, none of which would be possible 
without you. 

We want to thank you for being the best. You are the best customers, the best 
critics (positive criticism has made positive change), but by far, the most 
enjoyable group of people for whom to work. As you well know, from our 
responsive service, we do work for you. 

We here and now make a New Year's resolution to continue to provide you with 
complete and professional service and products that you will be proud to own. 
We ask that you continue to help us by making your needs known, needs that 
we will do our best to fulfill. 

We hope that through our new store we can provide you with a broader product 
line and added services. Please visit us if you are in the area. 

Again, thank you for supporting Software Support and have a wonderful 
holiday season. 

Sincerely, 

The staff of Software Support 

Nancy, Eileen, Jean, Jed, Mai, Ann, Andy, Mark, David, Jamie, and Kim. 
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DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIV 

B 

. , PRICE BREAKTHROUGH | I 

K 

Q 



O 



| Super Sale on New Disk Drives I 

| Starting at $ 199.95* complete!! 1 

a§ with Power Supply and Case. § 

| single sided 40 track — dual sided 40 track 

g single sided 80 track — dual sided 80 track 

g£ for 

| RADIO SHACK — HEATH/ZENITH — APPLE ? 

1 IBM/PC- TEXAS INSTRUMENTS & MOST OTHER COMPUTERS 5 

g New!! Special - Special - Cal/ us // § 

5 < 

Drive a Hard Bargain!!* So 

5 M.B- 10 M.B. with Power Supply Case, Cables & Software | 
Complete Systems .... starting from $1,695.00 | 

5 TOLL FREE ORDERING GENERAL and TECHNICAL | 

1-800-343-8841 1-617-872-9090 ° 

Model III Internal Disk Drive Kits SCall 58 

Color Computer First Disk Drive Kit SCall 

Diskettes Of all SizeS (Box of 10) startingat$1 5.95 

Dot Matrix Printers SCall i 

Word Processing Printers starting at $999.95 

Printer Buffers 8K to 64K starting at $1 33.00 

Disk Drive Cases and Power Supplies, starting at $49. 95 

DOSPLUS-3.4- SSpecial Price 

Filler pieces for Basf slimline drives $4.98 

*Ask about our l|ftHWfe%ftHWfe Warranty. 
Dealer inquiries invited. 

SOFTWARE SUPPORT I 

X tirms: One Framingham Centre, Framingham, MA 01 701 1 -tandy corporation q 

S2 M.C./Vlaa/Amax and personal /Ri7\fi70onon a -zenith data systems 3 

Q ohaeki aooaptad at no axtra oharga. l° ' ' ' ° ' **» U» U 3 -apple computer corp. 53 

Co C.O.D. Plaaaa add S3.00. Hours: Mon. thru Sat. 1 am to 6 pm (E.S.T.) t ySSSSSSLm « 

UJ Shipping: Plaaaa oail for amount. * 8 texas instruments CO 

Aiua xsio s3Aiua Msta saAiua xsia saAiya xsia saAiya xsia saAiaa xsio saAiua xsio S3Aitia as 2 
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BASF QUALIMETRIC 

A TOTALLY NEW DIMENSION OF QUALITY. 




From BASF comes a totally new 
level of excellence in magnetic 
media -the Qualimetric stan- 
dard, a standard so advanced 
that BASF Flexy Disks* are confi- 
dently backed by the industry's 
only lifetime warranty. The 
Qualimetric standard is main- 
tained without compromise 
through every step of BASF 
design, production, inspection, 
and testing. ..reflecting an 
unwavering BASF commitment 
to media fidelity and durability. 

Our FlexyDisk jacket, for 
example, incorporates a unique 
two-piece liner that not only 
traps damaging debris away 
from the media surface, but also 
ensures precise media-to-head 
alignment. The result- certified 
100% error-free performance, 
backed by BASF's exclusive life- 
time warranty* 

For information security, 
tomorrow and beyond, look for 
the distinctive BASF package 
with the Qualimetric seal. Call 
800-343-4600 for the name of 
your nearest supplier. 




Enter tomorrow on 

'Contact BASF for warranty details. © 1982, BASF Systems Corporation, Bedford, MA 
.-334 



BASF TODAY 



iJBASF 



TUTORIAL 



The Art of Documentation 



by G. Michael Vose 



D 



ocumentation doesn't have to be hard to write. 
Here's a step-by-step explanation of how to 
write clear, concise manuals for your code. 



Documentation, the written instruc- 
tion that accompanies most software, is 
often called the armpit of our industry. 
Manuals are criticized for being too 
long, too short, too skinny, too fat, too 
simple, too complicated — everything 
except too good. 

The fact is, they are often poorly 
written, incomplete, not indexed, and 
full of jargon. Many shining examples 
prove that manuals can be well-written 
and useful— Radio Shack's Model III 
Operation and Basic Language 
Reference Manual or Disk System 
Owner's Manual, for example — but 
such a manual requires hard work, and 
some fundamental knowledge of how 
to write. 

If you have inclinations as a software 
entrepreneur, you'd better learn some 
basics of writing high-quality manuals. 
Good old common sense, and the 
writing and organizational techniques 
described in the following paragraphs, 
can help you develop manuals that can 
turn out "too good." 

Different Styles 

There are two main categories of 
documentation. They are different in 
style and orientation. The first category 
is program documentation, the step-by- 
step explanation of what each program 



line does, a table of all variables used in 
the program, and a flowchart of the 
program's logic. Program documenta- 
tion always includes a listing of the pro- 
gram's code. If the listing contains 
abundant remarks and explanations in 
the code, the listing is called self-doc- 
umenting code. 

The second category includes the user 
documentation, the instruction manu- 
als that explain to the end user how to 
load and run the program. 

Both categories (and there is some 
overlap of the information each re- 
quires) need to be organized to accom- 
modate the following goals: 

• Make it easy to find information. 

• Avoid errors and ambiguous ref- 
erences. 

• Don't forget anything. 

• Write in a positive, first-person style. 

With these general goals in mind, 
let's take a look at the kinds of informa- 
tion that good documentation should 
include. 

Program Documentation 

Program documentation is less im- 
portant to the people who use the pro- 
gram than it is to you, because most 
people won't be concerned with how the 
program works. Those who are will 



want to talk to you personally. 
Ultimately your program documenta- 
tion needs to be thorough only because 
you may need it to help you make 
upgrades and modifications or to repair 
a bug that surfaces six months after the 
program is on the market. 

Program documentation should in- 
clude the following materials: 

• A listing of the program; 

• A variable map listing all the 
variables used and what they mean; 

• A flowchart of the program's logic; 

• A description of the hardware the 
program will run on (listing any excep- 
tions); 

• Operating systems the program is 
written under; and 

• Notes on any special restrictions such 
as memory size, protection of memory 
for machine-language subroutines, and 
so on. 

It is good technique to make liberal 
use of remarks when coding your pro- 
grams. You can remove remarks from 
the final working version of the pro- 
gram, but they are invaluable during the 
coding process. A listing of the code 
with remarks intact is an indispensable 
part of your program documentation. 

Flowcharts often change substan- 
tially from a rough diagram of the em- 
bryonic program to the chart that de- 
scribes what the final product actually 
does. Therefore, you will probably have 
to draw a flowchart before you start 
and after you finish writing the pro- 
gram. Don't eliminate this step in the 
documentation process. This flowchart 
can save many hours six months later if 
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you decide to modify the program. A 
flowchart can help you avoid unwork- 
able additions to the program keeping 
the logic flow straight in your mind as 
you try to accommodate a new feature 
into the existing code. 

If you produce detailed program doc- 
umentation first, preparing user doc- 
umentation will be easier. Detailed pro- 
gram documentation will give you a 
clear, well-organized idea of how to 
present the essential material to the 
reader. 

User Documentation 

The first task in writing user docu- 
mentation is to determine for whom 
you will be writing. If your program is a 
utility, you can presume your audience 
knows quite a bit about computers. You 
can safely incorporate some jargon into 
your text and can possibly hedge on 
things like loading instructions, unless 
they are out of the ordinary. But if your 
audience is school children or secretar- 
ies, you had better plan to write down 
every detail on how to use the program, 
from loading to listing to running, with 
as little jargon as possible. 

Don't underestimate your audience, 
either. If you've written a business ap- 
plications program, don't teach the user 
the fundamentals of that particular busi- 
ness, except as they apply directly to the 
program. For example, you don't have 
to explain how to amortize a mortgage 
to a real estate professional. You do 
have to explain to him how to enter the 
principal amount, interest rate, and the 
term of the loan. 

Once you've determined your audi- 
ence, you'll want to write an introduc- 
tion spelling out exactly what the pro- 
gram is designed to do. If the program 
is designed to aid an electrician in trou- 
bleshooting television circuitry, state 
that fact in the first paragraph of your 
introduction. Explain the features that 
make your program better than others 
in subsequent paragraphs. But your 
first job is to state what the program 
will do. 

Next, describe the hardware your 
program needs. List the mandatory 
equipment first and list the optional 
equipment it supports under a separate 
heading. Make sure to include the mini- 
mum memory size needed to operate 
the program. If it works in 4K or 16K, 
say so. 

If you've written^ disk program, list 
all the operating systems the program 
will run under. If the program needs to 
be modified to run under a certain oper- 
ating system, make an appendix ex- 
plaining the modifications and direct 
the user to it. 
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Walk Before You Run 

The manuals that you write for appli- 
cations programs — distinct from the 
reference manual that accompanies a 
utility or language product — must pro- 
vide a walk-through or sample run of 
the program. Programmers like to call 
this kind of instruction "hand-holding" 
and it is an important part of any 
manual. 

Instruction manuals should follow 
the step-by-step procedure that the op- 
erator will use to run the program. So, 
after the introductory materials, your 
manuals should include installation in- 
structions, if necessary, loading instruc- 
tions, and running instructions. In addi- 
tion to these major components, you'll 
need a table of contents, an index, and 
possibly one or more appendices. 



"If your program is 

a utility, you can 

presume your 

audience knows 

quite a bit 

about computers. " 



Installation instructions should con- 
tain advice about the value of making 
back-up copies of the program and data 
disks or tapes. If you plan to incor- 
porate a device to prevent unauthorized 
duplication of your program, this is the 
place to give the user that information. 
If you plan to incorporate a method for 
making one or two back-ups, explain 
the procedure here. If you plan to set up 
a registration system for users, tell the 
reader how to go about registering. 

The installation instructions should 
also contain instructions on formatting 
data disks, hooking up peripherals such 
as printers and communications de- 
vices, and loading special drivers or rou- 
tines to be protected in high memory. 
Installation instructions should also 
mention any peripheral software need- 
ed, such as upper/lowercase modi- 
fications or special driver routines for 
specific printers. 

Instructions loading come next and 
should be very specific. The procedure 
should be explained step-by-step. Use 
plain language, not jargon: 

• RIGHT — Place the operating-system 
disk in drive and press your computer's 



reset button. 

• WRONG— Boot up your DOS 
and . . . 

Make sure you spell program file 
names accurately, and include all exten- 
sions, where necessary. I recently was 
instructed to load a program called 
MAINMENU by an instruction manu- 
al, but obtained "program not found" 
error messages when I tried. Inspecting 
the directory of files on the disk, I 
discovered that the file's real name was 
MAILMENU. This simple error can be 
serious to a novice user. 

(I place the file names of all programs 
on a disk along with a short description 
of each program in an appendix.) 

Your loading instructions should in- 
clude a description of what the operator 
will see on the screen at each step of the 
process and will be complete only when 
you have arrived at the first full screen 
display of the program itself. 

Outline the Procedure 

Next, you'll begin by outlining the 
general procedure the operator will use. 
Here's an example: A business program 
will usually be menu driven, offering 
the operator a choice of options from a 
list or menu. If the program requires 
data before a report can be printed, 
outline the procedure: 

1 . Select ADD DATA 

2. Add names and account information 

3. Return to menu 

4. Select SORT DATA 

5. Perform sort 

6. Return to menu 

7. Select PRINT DATA 

8. Print data 

9. Return to menu 

Once you've outlined the general pro- 
cedure, you can write entire chapters of 
instructions on the specific operations 
involved in performing the outlined 
task. 

If your program is a game, make sure 
you list all the functions you've built 
into it. Here is where your program 
documentation comes in handy. I once 
wrote instructions, using an author's 
materials, for a football game written 
for the Apple computer. While playing 
the game, I mentioned to a coworker 
that it would be nice if you could pass as 
well as run. He suggested I call the 
author and ask if he could incorporate 
that feature into the game. When I called 
and made the suggestion, the author 
reported that that function was built 
into the game, but that he forgot to 
mention it in his instructions. We came 
close to publishing the game with one of 
its most important features unrecorded. 

Game programs and utilities should 



TRS-80 
MODEL 





16K $825°° 

48K $849°° 

48K, 1 Drive $1499°° 
48K, 2 Drive $1749°° 

RuD-Cl02 (INSTALLED) ^DOCl 



HARD DISK SYSTEM 
FOR THE MODEL III 

6* MEG. $1795°° 

12" meg. 951995 00 

19* MEG. $21 95 00 

COMPLETE. READY TO RUN. NOW AVAILABLE!! 

LDOS REQUIRED — $129 



'unformatted capacity 




SMITH CORONA TP-I 

DAISY WHEEL PRINTER 

$599 00 



•EPSON* 

MX-80 $459 

MX-80 F/T $525 
MX-100 $685 

WE STOCK A COMPLETE LINE 

OF EPSON ACCESSORIES 

CALL FOR PRICES!! 



•C. ITOH» 

PROWRITER 



8510 PARALLEL-10" 
8510SERIAL-10" 
1550PARALLEL-15" 
1550SERIAL-15" 



$489 
$639 
$719 
$769 



STARWRITER 



F-1040CPS, PARALLEL $1450 

F-1040 CPS, SERIAL $1599 

F-10 55 CPS, PARALLEL $1699 

F-10 55 CPS, SERIAL $1850 



OKIDATA 



ML-80 

ML-82A 

ML-87A 

ML84P 

ML-84S 



$750 

$429 

$699 

$1049 
$1149 



OKIGRAPH $60 



THESE ARE OUR CASH DISCOUNTED PRICES. C.O.D. AND CHARGE ORDERS ARE 3% HIGHER. ALL COMPUTERS ARE 
SHIPPED FREIGHT COLLECT. PRICES, SPECIFICATIONS AND AVAILABILITY ARE SUBJECT TO CHANGE WITHOUT NOTICE. 
IBM & IBM PERSONAL COMPUTERS ARE TRADEMARKS OF INTERNATIONAL BUSINESS MACHINES, INC. TRS-80 AND RADIO 
SHACK ARE TRADEMARKS OF TANDY CORPORATION. 




s- 918/825-4844 SmaII 

AMERICAN Business 

u^ mmw^r COMPUTERS 



include a summary card of the major 
commands. This card should be de- 
signed to be read easily for quick 
reference. 

Putting Pen to Paper 

Now you know all the manual's in- 
gredients: table of contents, introduc- 
tion, installation instructions, loading 
and running information, and index. 
You sit down to start writing, but — 
whoops — the words come out all 
wrong. You try to write the introduc- 
tion and end up with a detailed descrip- 
tion of microprocessor bit manipulation 
instead. How do you really write this 
manual, anyway? 

Start at the Beginning 

Think back to those eighth-grade 
civics and history classes when you had 
to write a report on government of the 
Civil War. Once you researched your 
subject, the first step in preparing your 
report was to develop an outline. 

Outlines give you a method of work- 
ing your way into the subject gradually, 
starting with the essential background 
information and a general presentation 
of your findings and then moving into a 
detailed presentation. 

An outline of your instruction manu- 



al performs the same function. It pro- 
vides you with an organizational base 
from which to start. A thorough outline 
also facilitates writing the table of con- 
tents. Take your time. You may have to 
produce two or three drafts over several 
days to complete your outline, but it 
will be time well spent once you begin 
the writing process. 

The introduction to your manual is 
crucial. Like the lead in a newspaper or 
magazine article, your lead must cap- 
ture the reader's attention while offer- 
ing enough information about what is 
to follow to entice the reader to con- 
tinue. The introduction must also tell 
the potential buyer what benefits he will 
derive from owning the program. 
Where possible, this enumeration of the 
benefits should be specific without be- 
ing technical. 

All too often an introduction (and 
even many product announcements) 
contain an impressive list of the tech- 
nical features of a product, but never 
explain what the product is designed to 
do. For the majority of buyers, the pro- 
cess is much less important than the re- 
sults. In fact, many products include 
outstanding features that go unused 
simply because they are never made un- 
derstandable to the nontechnical user. 



For example, a popular word-pro- 
cessing package claims, " . . .a printing 
chaining feature, permits installing spe- 
cial control characters in your text, 
loads ASCII files, EDTASM files. 
and much more. These terms are mean- 
ingful to people experienced in using 
computers and word processors, but 
will mean little to the first-time buyer. It 
would be better to omit mention of 
these features in the introduction. They 
would be more suited to a section en- 
titled "Advanced Features" for experi- 
enced buyers. 

The key, then, to writing your intro- 
duction is to explain what your program 
will do as simply as you can. You'll 
have an opportunity to explain how it 
does these things later. 

Some Dos and Don'ts 

In any kind of technical writing for 
semi- or nontechnical readers, there are 
several rules to observe. 

Observing these rules may add a little 
time to your manual preparation, but 
will be worth it in the long run. First, 
the Dos: 

• Do use plain, simple English words to 
explain a function. Tell the reader to 
type words or commands, rather than 




LEVEL IV PRDDUCT5. INC. 
TR5-8Q® DISCOUNT DEALER 



NO AUTHORIZED DEALER BEflTE OUR PRICEE ON PURE R/B EQUIPMENT 




, 



THI8 18 A FAST H0VIN8 INDUSTRY, PRICES CHANBE FASTER THAN AD8, WE HAD A 
COMPLETE AD LAYOUT FOR THIS MONTH WITH PRICES, BUT BEFORE WE COULD EVEN BEND 
IT IN THCY CHANBED, BUT THE NEWS 18 8O0D, THEY WENT DOWN A8AINM! 

SINCE THIS AD WAS DESTROYED, AND THERE IS NO TIME TO PREPARE A NEW ONE, LET'S 
JUST TALK ABOUT A FEW THINB8 THAT WE AT LEVEL IV THINK SHOULD BE IMPORTANT. 

THERE ARE TWO KINDS OF TR8-SO(R> COMPUTERS, THE "PURE RADIO 8HACK(R>" VERSION 
AND THE "BUILT-UP" VERSION, THEY ARE BOTH AVAILABLE FROM A NUMBER OF 
8UPPLIER8 VIA MAIL ORDER, AT PRICES SELOW RETAIL. 

THE "PURE" VERSION WILL HAVE THE MANUFACTURER'S LIMITED 90 DAY WARRANTY IN 
EFFECT, (PROVIDED THE DEALER HANDLED THE SALE PROPERLY > , BUT DON'T EXPECT THE 
LOCAL STORE TO 8IVE YOU AN OPEN ARMS WELCOME, THOSE BUYS WORK ON COMMISSION 
YOU KNOW, BO YOUR CHOICE OF A DEALER HAS SOME IMPORTANCE, 80ME OF THEM ARE 
LITTLE MORE THAN WAREHOUSES, VERY FEW HAVE EITHER SERVICE OR SUPPORT 
CAPABILITIES AFTER THE SALE, FOR THE USER WITH A PROBLEM. LEVEL IV OFFERS 
BOTH, WE HAVE A FULL TIME TECHNICAL SERVICE STAFF OF 8, AND A PR08RAMHIN8 
STAFF AS WELL, BOTH ARE AVAILABLE TO OUR CUSTOMERS DURIN8 NORMAL BU81NE8B 
HOURS MONDAY THRU SATURDAY, PHONE (313) S28-6200. YOUR HARDWARE PURCHASED 
FROM LEVEL IV ALSO HAS AN EXTENDED WARRANTY, AFTER THE ABOVE 90 DAYS SEND OR 
BRIN8 IT BACK TO U8 FOR AN ADDITIONAL 3 MONTH8 OF C0VERA8E! (WARRANTY COPIES 
ARE AVAILABLE ON REQUEST > . 

YOU MUST RELY ON THE "BUILDER" OF A 'BUILT-UP* UNIT TO PUT IN SOOD 
COMPONENTS, AND PROVIDE BOTH YOUR WARRANTY AND AFTER WARRANTY SERVICE. 8ELECT 
HIN CAREFULLY IF YOU 80 THIS WAY. 

LEVEL IV OFFERS BOTH "PURE" AND "BUILT-UP" UNITS, SEE OUR OTHER ADS IN THIB 
MA8AZINE. 




I EPSON 

I BMITH-CORONA 

I HAVES 

I MPI 

I TANDON 

■SOFTWARE 

■ SUPPLIES 

RETAIL STORE NO. P-130 

LEVEL IV PRODUCTS, INC. 

134 SOUTH FRONT STREET 

DOWA81AB, HICHIBAN 49047 

PHONE (614) 782-AiOO 

PHONE/HAIL ORDER CENTER 

LEVEL IV PRODUCTS, INC. 
32429 6CH00LCRAFT ROAD 
LIVONIA, MICHIGAN 48150 
PHONEI (Ml) 313-339-6200 
TOLL FREES 800-321-3303 



CALL FOR OUR CURRENT LOW PRICES CHI) 313-5E5-EE00 OTHERS B00-521-3305 
WE ACCEPT CVISA-HCCHECKS-C0D1 INQUIRE ABOUT OUR CASH PRE-PAY DISCOUNTS 
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By Norman J. Wazaney Jr. 




At last... a computer word game that 
entertains, challenged; educates! 
Pandemonium is thoroughly fascinat- 
ing, Stimulating, and highly addictive. 

Features include a built-in 6000 word 
dictionary, scoring display and a 
player selectable clock. 
Play it alone! Play it with your kids! 
Play it at a party! 

The word is out . . . Pandemonium is in. 
Available now tor only $39.95 at 
computer stores. 



To order by phone, tall 800 52<> -9042 
and use your Visa or MasterCard. All 
shipments made the same day in 
which orders are received. To order 
by mail, add $1 (or shipping charges 
and send your < heck to: 



Softimages 

I.XVKJON Of Of < ijtOf i •.r.iiw. it « jmammmL- 

1(H) Route 17. H.iluv.ill. IN. J Ol'iM). 



TRS-80 MOD l/lll 48K TRS-D0S 

TRS-80'" Radio Shack/Tandy Corp. 



'ouit soriWAKr is iini'KO'11'.c'ir.n PCRMITTINO CONVKMIKIY I IVM Mir. 



■•■''■ ■ '' ■■■"■■■'' ' ■ -"" ' ■ „_; ; ■ 



— ' -' •' ■" ' ' ■•■ _ 




'. '• •••■■:•,.•,'■■• '■: .»'■ . -"■'- 



to "keyboard" or "enter" them. 

• Do maintain consistency throughout 
a document; once you adopt or estab- 
lish a term or phrase, use it throughout 
your manual. If you call it a disk on 
page one, avoid calling it a "floppy" or 
a "diskette" on page four. 

• Do use acronyms to modify nouns, 
not as stand-alone terms. Use "disk op- 
erating system," not DOS when refer- 
ring to the disk operating system; DOS 
can modify disk or command, as in 
"DOS disk" or "DOS command," 
after you have defined it. 

• Do define any terms you want to ab- 
breviate. Define kilobyte (K) and its ab- 
breviation before using the convention- 
al "32K" in a memory description. 

Here are some important Don'ts: 

• Don't use unnecessary abbreviations 
such as "tech" for technical or "specs" 
for specifications. Abbreviations should 
be used sparingly. 

• Don't assume your reader under- 
stands how to perform essential opera- 
tions that are out of the ordinary. For 
example, if your program uses the 
Purge function that many disk operat- 
ing systems make available, explain 
how to use the function or direct the 
reader to a reference that will outline the 
procedure. 

• Don't use program names or features 
to describe a process: "Back up your 
disks" should be written, "Make back- 
up copies of your disks." 

• Don't use nouns as verbs. 

• Don't make up new words. 

• Don't use jargon. 

These rules will help you avoid some 
of the most confusing errors committed 
in writing about software. 

A good test of your written materials 
is to give them to someone who knows 
nothing about computers. Ask him to 
read your manual. Have him point out 
fuzzy or vague passages and words or 
phrases he doesn't understand. You can 
then rewrite these passages to produce a 
manual that will be usable by almost 
anyone. 

Cross-Referencing Means 

Never Having 

To Say You're Sorry 

It is a frustrating fact of life that most 
people will not take time to read the in- 
struction manual. Undoubtedly, they 
are so anxious to see what programming 
miracles you have wrought that they 
merely skim through the manual gain- 
ing only the barest idea of how to pro- 
ceed. Subsequently, when they run into 
a problem, they pick up the manual and 
start flipping through its pages hoping 
the answer will jump out at them. 

At this point you'll make a lot of 
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friends if you've had the wisdom to in- 
clude a table of contents and an index. 
The longer the manual, the more im- 
portant these components become. 
These two elements of a manual should 
not be treated as an afterthought; spend 
some time preparing them. Make them 
as complete as possible. 

The basis for the table of contents 
will be the original outline of your man- 
ual adapted to conform to the final 
draft of the manuscript. Your chapters 
should be short and confined to the dis- 
cussion of one subject, where possible. 
In a very long manual, the table of con- 
tents can include the chapter subheads. 
Make it easy on the reader to find the 
information he needs. Put the table of 
contents at the beginning of your 
manual. 



"Step one is 
unmitigated torture. 

That's right, 
you 're going to 

have to read 
your own manual. " 



On a separate page just after your 
table of contents, you might consider 
listing all figures, tables, sample 
screens, and menus accompanied by ap- 
propriate page numbers. Often, such 
figures or sample problems are a short- 
cut solution to a user's indecision. 

Indexing 

Indexing is more difficult, but even 
more important. The index must con- 
tain a reference for each process dis- 
cussed in your manual. The index is a 
rare bird in manual production; make 
sure you list it in the table of contents. 

Different methods of preparing an 
index are worth an article in themselves. 
The most familiar is the card method. 
You must work quickly and scrupulous- 
ly. Make yourself a pot of coffee, buy a 
thick stack of three-by-five cards and 
grab the family's recipe file box. 

I say you must work quickly because 
an index is usually the last step in the 
preparation of a manual. Your publish- 
er is waiting to go to press. But before 
you begin, you must have final page 
proofs with correct pagination. Unlike 



many typeset books, technical manuals 
are often bound on 8 '/2 -by- 11 sheets 
delivered by a line printer. This allows 
you the advantage of knowing where 
your material will fall on each page 
much earlier in the production cycle. 

Step one is unmitigated torture. 
That's right, you're going to have to 
read your own manual. While reading, 
underline keywords about the subject 
under discussion, as well as indicator 
phrases about the aspects you are ex- 
plaining. Each keyword followed by its 
indicators should be listed on a separate 
index card, page by page. Later, the 
cards can be collected in alphabetical 
order. Your indicator entries should be 
edited for redundacy and their page 
numbers combined. 

If you composed your subheads 
carefully for the table of contents, these 
keywords will come easily; the indicator 
phrases are more difficult. Nothing is 
more useless to the reader than an index 
entry "disk" followed by 12, 18, 32-36, 
94. If this is the best you can do, don't 
waste your time. The above entry does 
not give the reader a clue as to whether 
you are discussing information storage 
on disk (storage) or what happens when 
you leave one on overnight (care and 
handling). 

"Disk" is distinct from "disk op- 
erating system," which itself must be 
itemized by user instructions, or special 
notes for use with certain peripherals. 

Cross-referencing is another arcane 
and tedious art, but necessary. If you 
think the reader might be struggling to 
find DOS instructions, let him know 
they can be found under "disk oper- 
ating system." If he's looking for 
ASCII character codes, make sure you 
direct him to "American Standard 
Code for Information Interchange." 

There are a number of other tips to 
follow, and I recommend two good ref- 
erence manuals: A Manual of Style is 
put out by the University of Chicago 
Press, and Words into Type is pub- 
lished by Prentice-Hall. They both have 
chapters delineating the protocol of in- 
dexing. They are standard editorial 
guides and you'll find them in the refer- 
ence room of your city library. 

The Home Stretch 

Now that you've finished writing 
your manual, you're within sight of the 
end of this whole ordeal. All that re- 
mains is to proofread and edit your 
material after you write it. Let's take 
a close look at what an edit/proofread 
cycle will accomplish. 

Proofreading 

Proofreading is the process of exam- 



At last... a better 
way to find that article 
on computing! 



An indexing service to 
locate source material in 
specific subject areas. 

LAMP is a bi-monthly index to 
approximately 100 computer publi- 
cations. An outstanding feature is the 
Subject index, cross-referenced to 
provide the most comprehensive listing 
and ease of retrieval. All articles are 
read for subject content and then 
listed with as many cross references 
as required to retrieve the article. 

An Author index lists individual names 
as well as each contributor in jointly 
written articles. Another section is 
the Review index which covers book 
reviews, hardware, software and 
educational courseware. It lists the 
source of the review and 
translates the written review V 
into a One-Star to Five-Star rating! 

LAMP eliminates the hit or miss 
method of finding articles of 
interest to you. Each bi-monthly 
issue contains approximately 
200 pages. 



A year-end issue is cumulative and in- 
cludes the information from the previous 
5 issues. Send for your subscription 
today. 

BONUS FOR CHARTER SUBSCRIBERS 

Subscribe now for the inaugural issue 
to be published in January 1983 and 
receive the LAMP pilot program which 
indexed periodicals from June through 
October, 1982. in effect, 5 months of 
lamp free for ordering now. 

To order by phone, call 800-526-9042 
and use your Visa or MasterCard. 
To order by mail, send your check for 
$69.95 to Soft images, 200 Route 17, 
Mahwah, N.J. 07430. 
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ining your text to locate and correct 
spelling and grammatical errors. The 
proofreading cycle should also verify 
the accuracy of all references to pic- 
tures, figures, and tables accompanying 
your text. Proofreading should also 
enable you to pick up errors like leaving 
out a chapter title or misnumbering 
pages. 

If you proofread your own work, it's 
wise to set it aside for a few days, so the 
material will appear fresh. Better yet, 
give your manuscript to a friend who 
has a sharp eye for spelling and punc- 
tuation, and let this trusted soul make 
proofreading corrections. 

Even though program listings are 
machine generated, and presumably er- 
ror-free, it is a good idea to proofread 
these listings, too. Be on the lookout for 
misspelled words in print statements or 
routines. When you are writing a pro- 
gram, a misspelled word seems trivial, 
but when a software submissions editor 
looks over your work, those errors will 
leap off the screen. They can't help your 
cause and are so easy to avoid. 

Of equal importance is editing. An 
editor examines a manuscript's content 
for style and readability. The content 
edit should be done with a critical eye. 
Ask yourself as you read each sentence, 



"Did I say what I meant to say? Does 
this sentence read clearly and convey a 
coherent thought? Does it follow 
logically from the sentence preced- 
ing it?" 

While editing, be conscious of your 
text's readability. If you feel that a sen- 
tence's meaning may be obscured be- 
cause of its length, break the question- 
able sentence into two or more 
sentences, or rewrite it entirely. 

Word Processing 

A cold-blooded edit usually yields a 
greatly transformed manuscript. You'll 
find that word processing makes your 
job much easier. The ability to make 
liberal changes in your text without ex- 
pending large amounts of time and 
energy can significantly improve the 
quality of your output. 

There is one final editing opportunity 
that you will be afforded. (If you're not 
offered, insist!) You'll be asked to 
proofread your author's proofs. These 
proofs are galleys of the final version of 
your manuscript after it has been 
typeset by your publisher. This is the 
last opportunity to make sure that all 
your materials are correct and com- 
plete. Don't regard this responsibility 
lightly. Plan to spend a good deal of 



time inspecting this nearly final prod- 
uct. Make sure it is as good as you and 
your editors can make it. 

The End 

If you take the time and invest the ef- 
fort to write a good manual for your 
software, you'll be in a much stronger 
marketing position whether you try to 
sell your goods to a publisher or peddle 
the stuff on your own. Good manuals 
make your software look more profes- 
sional. They will help prevent after-sale 
service problems. And they will make 
you feel better about your product. 

I'm sure documentation will continue 
to take a lot of heat from software users 
who want to sound technologically 
chic — after all, criticizing something 
yields a feeling of power — and from 
people who still remember mainframe 
computer documentation that was not 
written for end users and was conse- 
quently obtuse. 

At least you can now be sure that 
your manuals won't be counted among 
those that get slammed! ■ 



G. Michael Vose is a technical editor 
for 80 Micro. 
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EBERT PER50IML Co^PUTER5 INC. 

J1ie3rea£3oar(£svstm® 

* 99.95 






(until february28,1983) 

INTRODUCTORY PRICE 57^ z>j regularly $149.95 

THEY SAID IT COULDN'T BE DONE ON A TRS-80*. BUT WE DID IT! 

Finally -A fast, friendly, flexible, responsive approach to remote computer communications. Jam packed with 
features never before seen on other Bulletin Board Systems costing 2-3 times our special Introductory price of 
only $99.95. Some of the more exciting features Include: 



1. Word wrapping so thai various screen sizes gel a smooth and properly 
lormalled display no mailer what screen size was used during text entry 
Your callers will love you for il! 

2. Complex or Simple Structures Up to 20 levels ol Menu Nesting and UN 
LIMITED numbers ol menus may be utilized lor those ol you sinister 
enough to force your users lo traverse Ihe "Twisty Passageways 

3. Electronic Mail Service plus ud lo 25 separate message boards. These 
boards can be configured lor eilher Private or Combined access or both 
You can even authorize individual SYSOPS lor each ol Ihe message 
boards!! Each user may be given read only, read'wnle or no access to 
each board! 

4. Storage capacity and efficiency. T6BS utilizeo 1/3 the disk space 
ol competing systems! Maximum message capacity is 2500 messages' 
The userlog stores system configuration, access and privilege levels, 
password and other important system inlormation lor up lo 65.535 sepa 
rale users. 

5. All system maintenance is easily accomplished with the provided utility 
programs. Such tasks as removal of deleted messages, restoration ol de- 
leted messages, Userlog maintenance, menu creation/editing. Configura- 
tion ol system options, and system backup are easier than ever before! 

6. System secunly is enhanced by Ihe optional use of a logon password 
check. 255 privilege levels, and 16 feature/command authorization flags 
These features provide an unprecedented flexibility in presenting TBBS to 
various users 



FULL AFTER-SALE 
SUPPORT 



7. Fully protected remote use of DOS and Basic for games or remote 
SYSOP functions is available it desired. This may be restricted or public 
as desired 

8. Menus are composed using a Menu Editor allowing total flexibility in 
system appearance TBBS may be made to look like a system you've seen 
before or like something totally new and unique. 

9. Question and answer capability allows product ordering, vote taking, 
user surveys etc 

10. Fast, Responsive, and fully protected!! 1200 baud on TBBS averages 
40%-120% faster throughput than competitive boards. TBBS responds 
instantly when a caller commands! Most other systems respond at the 
end of a line or series ol lines or at certain times not at all. TBBS is ready 
lor a new caller in an average of 5 seconds!! Worst case with 2500 
messages on file is less than 45 seconds on a floppy based system. TBBS 
also cleans up correctly after accidental loss ol carrier. No hung systems' 
No lost messages! No lorgotten deletes! Even when using remote DOS! 

11. To see what we are talking about call TBBS headquarters at 
(303)690-4566. TBBS has to be used to believe!! 

12. System requires Model I or III (or equivalent). Auto-Answer Modem, 
RS-232, and NEWDOS/80 V 2.0. Program will work on either model auto- 
matically. (NOTE: 1200 baud requires a specially modified cable.) 



TRS-80' is a registered trademark of TANDY CORPORATION. 



4122 SOUTH PARKER ROAD 
AURORA, COLORADO 80014 (303)693-8400 -545 
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TECHNIQUE 



Mailing List Compiler 



by Gerald Sprouse 



u 



se your Color Computer, a Line Printer VII, 
and this program to keep your mailing list 
up to date. It lets you print labels, too! 



Program Listing 

10 CLEAR 9000:T=40:L=38:DIMM$(T,8) :N=0:M=7 
20 CLS:PRINT n COLOR COMPUTER MAILING LIST 
VAILABLE:" 

<A>DD NAMES TO THE MAILING 
<R>EAD MAILING LIST FROM TAPE 



30 PRINT' 
40 PRINT' 

LIST' 
50 PRINT' 
LS" 

60 PRINT" 
T" 

70 PRINT' 
80 PRINT' 
90 PRINT 



<L>IST NAMES ON THE SCREEN 



<W>RITE MAILING LIST ON TAPE 



FOLLOWING OPTIONS A 



LIST" 
<OHANGE THE MAILING 



<P>RINT MAILING LABE 



<D>PRINT ADDRESS LIS 



<E>ND" 

NUMBER OF NAMES IN LIST=";N 

'KEY IN YOUR OPTION" 

100 A$=INKEY$:IFA$=""THEN100 

110 ON INSTR("EARCLPWD",A$) GOTO130 ,140 ,460 ,470 ,360 ,700 , 440 , 860 

120 GOTO20 

130 END 

140 CLS:PRINT"ADD NAMES TO THE MAILING LIST" 

150 PRINT"DO YOU WANT INSTRUCTIONS ON HOW TO ENTER DATA(Y/N)?" 

160 A$=INKEY$:IFA$=""THEN160 

170 IFA$= n N"THEN230 

180 CLS: PRINT "NAME 1" : PRINT"NAME 2" :PRINT"NAME 3" : PRINT "NAME 4" 

190 PRINT-ORGANIZATION": PRINT "ADDRESS" :PRINT"CITY, STATE, ZIP" : PRI 

NT"TELEPHONE" 

200 PRINT" ABOVE ARE THE DATA ENTRY ITEMS. TYPE EACH ITEM AND PRE 

SS ENTER." 

210 PRINT n TO IGNOR AN ITEM JUST PRESS ENTER. " 

220 LINEINPUT"PRESS ENTER TO BEGIN", -A$ 

230 CLS:IFN<T THEN250 

240 GOTO280 

250 N=N+1 

260 GOSUB1000:IFM$(N, 0) <>"" THEN250 

270 N=N-1:GOTO20 

280 PRINT " OUT OF MEMORY ":PRINT"DO YOU WANT TO RECORD THE" 

290 PRINT"CURRENT LIST ON TAPE(Y/N)?" 

300 A$=INKEY$:IFA$= nn THEN300 

310 IFA$="Y"THENGOSUB1130 

320 PRINT"DO YOU WANT TO CLEAR THE MEMORY FOR ADDITIONAL NAMES (Y 

/N)?" 

330 A$=INKEY$:IFA$=""THEN330 

340 IFA$="Y"THEN N=0 

350 GOTO20 

360 CLS:IFN=0THENGOSUB1190:GOTO20 

370 PRINT"KEY IN SEARCH FIELD(1 TO 8)" 

380 A$=INKEY$:IFA$=""THEN380 

390 IFA$<"l n ORA$>"8"THEN370ELSEF=VAL(A$) -1:1=1 

400 J=1:CLS 

410 PRINTI;" n ;M$(I,F) :J=J+1 : 1=1+1 : IFI>N THEN430 :ELSEIFJ<11THEN4 

10 

420 PRINT"":GOSUB1110:LINE INPUT"" ;A$:GOTO400 

Listing continues 



One way computers are used in the 
business world is to produce and main- 
tain mailing lists. This article describes a 
mailing list program for the Color 
Computer with a Line Printer VII. 

Since some labels must contain a per- 
son's name in addition to an organiza- 
tion's name and address, the program 
allows for up to four lines on the label. 
When the label must have three or four 
names, the program automatically 
prints the address information on two 
labels, because address labels only allow 
five lines of information. 

For ease of operation, the program 
makes maximum use of INKEYS for 
program control. Additionally, each 
address line is checked for length and 
the operator cued for reentry. The pro- 
gram also allows the option of printing 
an address list with phone numbers for 
office use. This address list can be kept 
up to date and then used to correct the 
data stored in the data file on tape. 

The program allows eight data fields 
for each label. Fields 1 to 4 contain 
names of specific individuals at each or- 
ganization. Field 5 is the organization 
name while field 6 is the street address. 
The city, state, and zip code are in field 
7 with the telephone number in field 8. 

Program Operation 

After inputting the program, enter 



The Key Box 

Color Computer 
16KRAM 

Extended Color Basic 
Line Printer VII 
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PCLEAR1 to clear sufficient memory. 
The main menu allows the following 
options: 

• A — adds names to the mailing list or 
starts a new list. This option provides 
user instructions for data entry. If the 
list becomes too long, the program of- 
fers the option of storing the current list 
on tape. 

• R — reads in a mailing list from a tape 
data file. 

• L — lists names on the screen. This 
option also allows the user to select oth- 
er data fields for listing on the screen. 
For example, use of field 5 lists all or- 
ganization names. 

• C — changes the mailing list. The pro- 
gram presents a new menu with four 
options: D — delete a name from the list; 
C — change one of the eight fields for 
each address; A — another address (re- 
turn to find another address); and E — 
exit this option to the main menu. The 
computer assigns a number to each ad- 
dress, and this number must be entered 
to find a specific address for deletion or 
change. The number is displayed on the 
screen during option L. 

• P — prints address labels. Radio 
Shack recommends dry-gum labels 
(26-1456) for the Line Printer VII. 
However, these labels are two across. 



Listing continued 

430 PRINT" END OF LIST " :GOSUB1110:LINE INPUT"" ;A$:GOTO20 

440 CLS:IFN=0THEN GOSUB1190 :GOTO20 

450 PRINT"RECORD MAILING LIST ON TAPE" :PRINT"" :GOSUB1130 :GOTO20 

460 CLS: PRINT "READ MAILING LIST" :GOSUB1220 :GOTO20 

470 CLS:IFN=0THENGOSUB1190:GOTO20 

480 PRINT "CHANGE" 

TO DISPLAY ADDRESS, ENTER ADDRESS # (IF UNKNOWN 



490 PRINT 
USE <L>) 
500 PRINT 
510 PRINT 
520 CLS 
530 PRINT 
540 PRINT 
550 PRINT 



'TO EXIT THIS MODE PRESS ENTER " 

':LINE INPUT"NUMBER";A$:I=VAL(A$) : IFA$=""THEN20 



<OHANGE A FIELD" 



<D>ELETE NAME 

<A>NOTHER NAME " 

<E>XIT" 

560 FORJ=0TOM:PRINTJ+1;M$(I,J) :NEXT 
570 PRINT"KEY IN SELECTION" 
580 A$=INKEY$:IFA$=""THEN580 
590 IFA$O"C"THEN660 

600 PRINT"TYPE IN THE NUMBER OF FIELD AND THEN ENTER THE NEW VAL 
UE" 

610 PRINT"KEY IN FIELD(1 TO 8)" 
620 A$=INKEY$:IFA$=""THEN620 

630 IFA$<"1"ORA$>"8"THEN610ELSEJ=VAL(A$)-1 

640 LINE INPUT"NEW ITEM" ;M$(I , J) : IF LEN(M$(I , J) )<L+1 THEN520 
650 PRINT"T0O LONG, REENTER" :G0T06 40 
660 IFA$O"E"THEN680 
670 GOTO20 
680 IFA$="A"THEN470 

690 IFA$O"D"THEN520ELSEM$(I,0)="":GOSUB1300:GOTO470 
700 CLS:IFN=0THENGOSUB1190:GOTO20 
710 PRINT"PRINT MAILING LABELS" 
720 PRINT"DO YOU WANT A TRIAL RUN(Y/N)?" 
730 A$=INKEY$:IFA$=""THEN730 
740 IFA$="N"THEN760 

750 FORJ=1TO2:I=1:GOSUB1330:NEXT:GOTO720 

760 PRINT"PRESS <P> TO START PRINTING, <E> TO EXIT" 

770 A$=INKEY$:IFA$=""THEN770 
780 IFA$="E"THEN20 
790 1=1 
800 GOSUB1330: 1=1+1 

Listing continues 



COPY MODEL III, SCRIPSIT/VISICALC 



Only $20 



Works with all model III Visicalc/Scripsit and allows unlimited backups of master disks. Works 
even if you're already backed up twice. Simple, 17 line program. 

And look at these other outstanding values! 



APPARATS 

NEWDOS/80 ,2.0 
$129.95 

Convert Model I Scripsit and Visicalc to 
Model III, plus: Renumber program lines 
-move program lines - move blocks of pro- 
gram lines - duplicate program lines - selec- 
tive variable clearing - program single step- 
ping - memory sort multi-dimensioned ar- 
rays - swap variables - read and write to 
model I disks - reference keywords - spool 
printing - change disk speeds - disable 
BREAK and CLEAR - Much, much more! 

FREE "Layman's Guide to 

Newdos 80" included with this 
purchase. 

Use VISA - Mastercard - Money Orders - 
Allow 2 weeks for personal checks. 
Kansas residents add 3.5% sales tax. 



HAYES SMARTMODEM® . 
$249.95 

Talk with other computers over regular 
telephone lines. SMARTMODEM can auto 
dial - auto answer - repeat - allow for audio 
monitoring - programmable - is FCC ap- 
proved direct-connect - full or half duplex 
capability, 0-300 baud - RS-232C interface 
- seven status LED's. 

VERBATIM® 
DATALIFE DISKETTES 

5" diskettes come in a reusable plastic 
storage box. 

CALL TOLL FREE! 
1 - 800 - 835-0071 

IN KANSAS: 
316-665-3611 



ST80 111®..$ 129.95 

Smart terminal communications package. 
Allows file uploading/downloading. 
Emulates many different terminals. Total 
operator control. (Written by Lance 
Micklus.) 

FREE 
Catalog price list 

of all Sales Data Direct-Order merchan- 
dise available upon request. Super prices . 
. Rapid delivery . . . Quality products. 




This product is lor personal use only. Not meant (or distribution or sales. 



526 E. 4th Hutchinson, Kansas 67501 
316/665-3611 
Dealer Inquiries Invited. 

Phone or write Sales Data, Inc. 
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Therefore, this option prints two identi- 
cal labels for each address. This option 
allows a trial run of two labels to align 
the printer. 

#D— prints address list with phone 
numbers. 

• W — writes entire address list to a tape 
data file. 

• E — end. 

Program Structure 

In line 10, variable T controls the to- 
tal number of addresses in the list while 
L controls the length of each address 
field. Clear additional string space if T 
is increased. 

Lines 20-130 are the main menu. 
Lines 140-350 are the A option. Delete 
lines 150-220 if data entry instructions 
are not required. 

Lines 360-430 are the L option, lines 
440-450 the W option, line 460 the R 
option, lines 470-690 the C option, lines 
700-850 the P option, lines 860-930 the 
D option, and lines 1000-1630 the vari- 
ous subroutines called from the main 
program. ■ 

Gerald Sprouse can be reached at 9977 
Caminto Chirimolla, San Diego, CA 
92131. 



CANADIANS 

NOW IN STOCK 

ADVENTURE INTERNATIONAL 

ACORN SOFTWARE 

APPARATINC. 

BIG FIVE 

COMPUTERWARE 

EPSON PRINTERS 

INSTANT SOFTWARE 

MARK DATA 

MED SYSTEMS 

FANTASTIC SOFTWARE 

SPECTRAL 

WORD PROCESSORS 

BOOKS 

DISK DRIVES 

DISKETTES 

LOWER CASE MOD — MOD I 
$29.95 + S2.00S&H 

AND MORE 

MODI • MOD III -COLOR 

Visa& Mastercard 

Phone or Write for Catalogue 
(403)423-3919 

CMD MICRO 

10546- 106 Street 

Edmonton, Alberta 

T5H 2X6 
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Listing continued 

810 IFK=N THEN800 

820 PRINT"DO YOU WANT TO READ IN ANY MORE TAPES (Y/N) ?" 

830 A$=INKEY$:IFA$= nn THEN830 

840 IFA$="Y n THENGOSUBl220 

850 GOTO20 

860 CLS:IFN=0THENGOSUB1190:GOTO20 

870 1=1 

880 GOSUB1550: 1=1+1 

890 IFK=N THEN 880 

900 PRINT n DO YOU WANT TO READ IN ANY MORE TAPES (Y/N)?" 

910 A$=INKEY$:IFA$= nn THEN910 

920 IFA$="Y n THENGOSUB1220 

930 GOTO20 

1000 LINE INPUT"NAME 1" ;M$ (N, 0) : IF LEN(M$ (N f 0) ) >L THEN GOSUB1100 

:GOTO1000 

1010 IF M$(N,0)=""THEN1090 



;M$(N,1):IF LEN(M$(N, 1) ) >L THEN GOSUB1100 
;M$(N,2):IF LEN(M$(N f 2))>L THEN GOSUB1100 
;M$(N,3):IF LEN(M$(N, 3) ) >L THEN GOSUB1100 



1020 LINE INPUT"NAME 

:GOTO1020 

1030 LINE INPUT-NAME 

:GOTO1030 

1040 LINE INPUT-NAME 

:GOTO1040 

1050 LINE INPUT-ORGANIZATION" ;M$(N f 4) : IF LEN(M$(N f 4) ) >L THEN GOS 

UB1100:GOTO1050 

1060 LINE INPUT "ADDRESS" ;M$(N, 5) : IF LEN(M$ (N,5) ) >L THEN GOSUB110 

0:GOTO1060 

1070 LINE INPUT"CITY,STATE,ZIP";M$(N,6) :IF LEN(M$(N f 6) ) >L THEN G 

OSUB1100:GOTO1070 

1080 LINE INPUT"TELEPHONE";M$(N,7) 

1090 RETURN 

1100 PRINT-TOO LONG, REENTER" : RETURN 

1110 PRINT-PRESS ENTER TO CONTINUE" ;: RETURN 

1120 PRINT"NO DATA IN MEMORY" : RETURN 

1130 GOSUB1200 

1140 A$=INKEY$:IFA$=""THEN1140 

1150 IFA$="E"THENPRINT"":RETURN 

1160 PRINT "RECORDING DATA" :OPEN"0" ,-1 , "DATA" 

1170 FORI=1TON:PRINT#-1,M$(I,0) ,M$(I,1) ,M$(I,2) ,M$(I,3) ,M$(I,4) , 

M$(I,5) ,M$(I,6) ,M$(I,7) :NEXT 

1180 CLOSE #-1: RETURN 

1190 GOSUB1120:GOSUB1110:LINE INPUT" ";A$: RETURN 

1200 PRINT"SETUP THE RECORDER AND PRESS <R> WHEN READY": PRINT 

"<E> TO EXIT" 

1210 RETURN 

1220 GOSUB1200 

1230 A$=INKEY$:IFA$=""THEN1230 

1240 IFA$="E n THEN RETURN 

1250 PRINT-READING DATA" : OPEN" I " ,-1 , "DATA" :N=1 

1260 IF EOF(-l) THEN 1290 

1270 INPUT#-l r M$(N,0) ,M$(N,1) ,M$(N,2) ,M$(N,3) ,M$(N,4) r M$(N,5) ,M$ 

(N,6) ,M$(N,7) 

1280 N=N+1:GOTO1260 

1290 CLOSE#-l:N=N-l: RETURN 

CLS:PRINT"RECOVERING SPACE" 

N=N-l:FORJ=I TO N:FORK=0 TO 7 :M$( J,K) =M$ ( J+l , K) :NEXT:NEXT 

RETURN 

IFM$(I,2)="" THEN 1430 
1340 PRINT#-2,M$(I,0) ;TAB(42) ;M$(I,0) 
1350 PRINT#-2,M$(I,1) ;TAB(42) ;M$(I,1) 
1360 PRINT#-2,M$(I,2) ;TAB(42) ;M$(I,2) 
1370 PRINT#-2,M$(I,3) ;TAB(42) ;M$(I,3) 
1380 PRINT#-2,"":PRINT#-2, B " 

PRINT#-2,M$(I,4) ;TAB(42) ;M$(I,4) 

PRINT#-2,M$(I,5) ;TAB(42) ;M$(I,5) 

PRINT#-2,M$(I,6) ;TAB(42) ;M$(I,6) 

PRINT#-2 , " " : PRINT#-2 , " " : PRINT#-2 , " " : RETURN 

IFM$(I,1)="" THEN 1500 

PRINT#-2,M$(I f 0) ;TAB(42) ;M$(I,0) 
1450 PRINT#-2,M$(I,1) ;TAB(42) ;M$(I,1) 
1460 PRINT#-2,M$(I,4) ;TAB(42) ;M$(I,4) 
1470 PRINT#-2,M$(I,5) ;TAB(42) ;M$(I,5) 
1480 PRINT#-2,M$(I r 6) ;TAB(42) ;M$(I,6) 
1490 PRINT* -2,"": RETURN 
1500 PRINT#-2,M$(I f 0) ;TAB(42) ;M$(I,0) 
1510 PRINT#-2,M$(I,4) ;TAB(42) ;M$(I,4) 
1520 PRINT#-2,M$(I,5) ;TAB(42) ;M$(I,5) 
1530 PRINT#-2,M$(I,6) ;TAB(42) ;M$(I,6) 
1540 PRINT#-2 , " " : PRINT#-2 , " " : RETURN 
1550 PRINT#-2,M$(I,0) :IFM$(I ,1) =""THEN1590 
1560 PRINT#-2,M$(I,1) :IFM$(I, 2) =""THEN1590 
1570 PRINT#-2 f M$(I,2) : IFM$(I ,3) =""THEN1590 
1580 PRINT#-2,M$(I,3) 
1590 PRINT#-2,M$(I,4) 
1600 PRINT#-2,M$(I f 5) 
1610 PRINT#-2,M$(I,6) 
1620 PRINT#-2,M$(I,7) 
1630 PRINT#-2 , " " : PRINT#-2 , " " : RETURN 

Listing continues 



1300 
1310 
1320 
1330 



1390 
1400 
1410 
1420 
1430 
1440 
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What some have called "the best kept 

secret in the game software industry". 

Unleashed here are six new software 

games blending advanced graphics with precise elements of 

play ability, challenge and intense fun for every gamer's tastes. 

Beyond these six new games are 26 more for you to consider . . . 

all we believe are the best software values for your money! 



' '.".. :"■;■..■;' :. ■:: 



LEGIONNAIRE-Real-time simulation of G.F.S. SORCERESS-Sci-Fi adventure game, 

tactical combat in Caesar's time. YOU as Caesar YOU are Joe Justin trying to clear yourself of a 



command up to ten legions. Finest full-color 
graphics plus payability way beyond the state 
of the art! Cassette . . . $35.00 

V.C.— Faithfully recreates unconventional 
conflict in Viet Nam. YOU command chopper 
and artillery units, and face task of protecting 
civilian population where the enemy hides 
among the people. Cassette . . . $20.00 
Diskette . . . $25.00 



false charge of mutiny and get back to the 
Galactic Federation Starship "Sorceress". 
Beautiful full-color manuals provide useful clues. 
Cassette . . . $30.00 Diskette . . . $35.00 

ANDROMEDA CONQUEST-Vast scale 
space strategy game of galactic colonizing and 
conquest among unique star systems with 
strange life forms and alien technologies that 
provide exciting exploration and battle. 
Cassette. . . $18.00 Diskette . . . $23.00 



" Trademarks (or Apple Computer. Warner Communications. Tandy Corp . 
International Business Machines and Commodore International Ltd 

Available at finer 
computer stores everywhere! 



m 
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MOON PATROL-Arcade Pak™ game of 
lunar invasion. Beats any quarter-gobbling game 
around! Four levels of increasing difficulty 
present new attackers to battle. Fast, furious and 
fun! Cassette . . . $25.00 

TELENGARD— Dungeon adventure in a 
mysterious underworld with 50 levels of ever- 
more-complex mazes to explore. Real time 
fantasy and role-playing game. Using wits, 
magic and fast thinking, gamers fight monsters 
and reap valuable rewards. Cassette . . . $23.00 
Diskette . . . $28.00 

If your favorite dealer fails to have 
the games you want, call us toll free 

1-800-638-9292 



microcomputer games 

' REGISTERED TRADEMARK OK MICROCOMPUTER GAMES. INC "DIVISION OF 

The AVALON HILL Game Company 



Avalon Hill MICROCOMPUTER GAMES 

are compatible with the following computer systems: 

Apple II- 

Atari 4/800* 

TRS-80 Models l/III & Color® 

IBM P.C.® 

Commodore VIC-20. CBM PET & 2001* 



For specific information, such as 
machine compatibility, memory requirements. 

cassette or diskette availability and price. 

call us toll-free 1-800-638-9292 and ask for 

Operator 10 or write to: 

Avalon Hill Microcomputer Games. Dept. C-10 

4517 Harford Road, Baltimore. MD 21214 











PLEASE ANSWER THESE 5 QUESTIONS 

YES NO 

1. Do you have information that must be kept organized and — — 
accessible? I — I I — I 

2. Do you ever need to perform statistical analyses? L- 

3. Would you like to have a tool that will allow you greater flexibility ._. 
in managing your own or your company's money? 

4. Could you use a mail list program that will be easy to use, 
maintain an unlimited number of names, allow you great sorting 
flexibility, and even interact with a word processor? 

5. Do you own or have access to a TRS-80 microcomputer? 

If you answered yes" to any of these questions, we can be of assistance to 
you. Our Maxi Series of applications programs are designed to give you maximum 
versatility with a minimum of hassle. These programs were created for business use, 
but you'll find yourself using them for personal applications as well. 

Thorough support — Of course, each program comes with in-depth, user- 
oriented documentation, and is menu-driven to make it easy to use. When necessary, 
the Maxi programs are compatible with each other, and, whenever pertinent, are 
Interactive with the major word processing and spreadsheet programs published by 
other manufacturers. Also, we maintain a telephone support line to provide you with 
ik any assistance you might require. 

. . 

'9fiuif 9fcffi4i|pw * D *>* km*' \ 44cuti Crotf * Daie «»<»*' 

Maxi Manager is a remarkable data base manager. Its fast I 
machine language sort complements its large data storage capacity. I (Check Register Accounting System) 
me sophistication of its data entry, management, and printina caoa- / ».., ^ 

blllties makes Maxi Manager a versatile tool tor many applications / Max ' Cras ,s a s V s,em ,na ' w '" computerize check writing. 

The program now includes Maxi Utility, which allows you to I record,n 9 and analysis for business and personal finance. The system 

rescue files on diskettes that have been damaged by excessive wear or l ,eatures 223 income and expense accounts, each of which will handle 

misuse and /ets you expand, add. or delete fields from an existing data / an unlimited number of transactions. Extensive register and report 

base. Let the unmatched capabilities of Maxi Manager handle your / printing capabilities make Maxi CRAS an indispensible tool for 

sSJITSSZTS! mm. , I mana 9ing money effectively. 

■m l*JM* HLMn lmu m 1 d isk driv required 012-0196 $149.99 / Model I « Model III. Minimum 2 drives required ^012-0145 $99.95 

Max, Ma 7i isTpoW,' 'ma7,ist a lnatement system that / ^CMll fiffOf ^ David Waloniek 

1. Is easy to use. .. - ~. . • 

2. Has virtually unlimited storaqe capacity I u ..' f ? ' e moSt use,ul s,a, ' s,,cal analysis package en the 

3. Interfaces with the major word processors to Generate form / ™ arkef ,odav - " was developed to allow maximum flexibility in 
letters and other text. generate rorm I designing customized analysis. Maxi Stat handles the three main 

4. Pnnts mailing labels up to tour-across in any format desired / com Ponents of statistical analysis: 

£Sf.™o." a '' y « un '' m 'L ed codin 9 capabilities with thirteen fields of I I c °mplete menu-driven codebook creation and editina 
information tor each record. I 2. Menu-assisted data entry. U 

prcoram X ava1/able S m ° S ' sopn ' sf/ca ' ed user-oriented mail list I 3. User-created control files to describe the statistical analyses to 

TWSaO Modi III only. 2 disk dri v, rmqulrod .... 012-014* $99 95 / Mod./ fS M^mi^mT? P^TL ? Uf ° n ,he variab,es ° f V°ur choice. 

^ " =a - ""* £Ss* 5 I IWo ° e ' [ * Model III. Minimum 2 drives required . . . . 012-0153 $199.95 

A Division of 
Scott Adams, Inc. 



THE 

BUSINESS 

DIVISION 




Send $1.00 for our 16 page booklet 
"Getting The Most From Your 
Micro" All 16 pages are packed with 
Indepth explanations and printout 
samples from the Maxi Series of ap- 
plications programs. 
THI BUSINESS DIVISION 
BOX 3435 

LONGWOOD.FL 32750 
(305) 830-8194 ^20 




FOCUS ON: 
MAXI CRAS 




What is Maxi CRAS? 

Maxi CRAS (for Check Register Accounting 
System) takes the work out of printing checks, 
balancing your account, and reconciling it with bank 
statements. And that's only the beginning! 

Who can use it? 

Maxi CRAS is powerful enough for small 
businesses, and easy enough to handle for family or 
personal use. Best of all, it won't make you change the 
way you do business. Write checks by hand and enter 
them into the computer later, or let Maxi CRAS do all 
the work, and print checks automatically. 

But what makes it different from all the rest? 

We're glad you asked! Disk-based Maxi CRAS 
handles a virtually unlimited number of checks and 
deposits each month. And to keep track of all those 
financial transactions, Maxi CRAS supports up to 223 
separate income and expense accounts, and your 
transactions can be assigned to one or even all 223 
accounts. 

Why is this so important? For some transactions 
it's not. Suppose you write a check for $250.00 to Jolly 
John's Jalopy Jumpers for repairs to your automobile. 
You would simply assign the check to the AUTO 
REPAIRS account. But suppose you had Jolly John fill 
the tank, and you picked up a gallon of milk while you 
were there. With Maxi CRAS you can simply add the 
$50.00 worth of gas and the $2.00 worth of milk to the 
$250.00 you owed him for the new windshield wiper, and 
write a check for $302.00. Many systems would force 
you to assign this check to a single account. But Maxi 
CRAS lets you charge $250.00 to AUTO REPAIRS, 
$50.00 to your GAS & OIL account, and $2.00 to your 
FOOD account. Six months, or even six years from now, 
you'll still know exactly what that $302.00 went for. 
That's power! 

I'm interested. Tell me more! 

Organizing the data is just half the picture. Maxi 
CRAS provides six essential reports and statements in 
a fraction of the time required to do them by hand. At 
tax time, you'll have all the data you need at your 
fingertips. No more sifting through shoeboxes full of 
cancelled checks! 



MAXI CRAS 

By Dale Kubler 

For your TRS-80 Model I or III with 48K, 

two disk drives, and an 80-column printer. 

$99.95 

Soon to be released for IBM /PC 

THE BUSINESS DIVISION 

BOX 3435 • LONG WOOD, FLORIDA 32750 

(305)862-6917 




For detailed forecasting and budgeting, Maxi 
CRAS now interfaces EASILY with VISICALCf™), the 
electronic spreadsheet program sold by Radio Shack. A 
Maxi CRAS exclusive! 



The Last Check Register Accounting System 

You'll Ever Need! 
Strong statement? Check out these features! 



• Write checks by hand, or print automatically 
on single or continuous form checks (NEBS 9020). 

• Data Entry routine second to none — saves time 
AND eliminates errors. You don't need to be a 
computer expert to use Maxi CRAS. 

• The best selection of printed reports available — 
complete check register, income and expense 
subtotals, bank statement reconciliation, list of 
check register notes, and an account distribution 
statement. Compare! 

• For even more detailed analysis, Maxi CRAS data 
is readable by VISICALAC<™). 

• Checkbook balance is constantly updated and in- 
stantly accessible. No more embarrassing over- 
drafts! 

• A notes option can be used to flag tax-deductible 
transactions. 

• Handles up to 223 income AND expense ac- 
counts. Many other systems only allow ONE in- 
come account. 

• Assign transactions to a single account, or 
distribute over multiple accounts. Assign specific 
amounts, or pro-rate by fraction or percentage. 
Cash transactions can be recorded in any ac- 
count without affecting check-book balance. 

• Check Address data base stores up to 40 ad- 
dresses and automatically prints them on your 
checks. 

• Fast and easy bank statement reconciliation. 
Compare! 

• Maxi CRAS is supplied with a complete User's 
Manual, sample printouts, and TDOS, a special 
version of the DOSPLUS operating system. 

WE INVITE YOU TO COMPARE. 

Compare Maxi CRAS with any other system 
available. We did, and we're sure you'll find Maxi 
CRAS to be the most versatile, easy to use Check 
Register system available — at any price! 



fSee List of Advertisers on Page 435 
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HARDWARE 



Finally, make a powerful Peripheral Support Interface. 



Hardware Hacker— Part IV 



Philip M. Van Praag 

1630 West Jagged Rock Road 

Tucson, AZ 85704 



My final article integrates 
the 32K Memory Mod, 
Centronics-Compatible Printer 
Interface, and Double Density 



Disk Controller articles into a 
common Peripheral Support In- 
terface (PSI) system. 

As mentioned in each pre- 
vious article, the individual pro- 
jects are capable of stand-alone 
operation. Separate PC boards 
for each allow tailoring the 
system to your needs. Gradual 
investment will produce a com- 
plex, powerful adjunct to the 
TRS-80. In addition, initial trial 
(and troubleshooting) of in- 



dividual system components is 
enhanced via the stand-alone 
operation concept. 

Additional hardware pre- 
sented in this article includes a 
ribbon cable distribution PC 
board and system cabinet con- 
struction details. The cable PC 
board simplifies board-to-board 
connections. If you have been 
building the system one board 
at a time, you have no doubt al- 
ready assembled a 40-conductor 




Photo 1 



cable/card-edge connector for 
at least one of the boards. This 
same cable can be used to con- 
nect the TRS-80 and the new 
cable PC board. Then, even if 
you build all PC boards simulta- 
neously, you can check out each 
project individually (rather than 
applying power to the entire 
system the first time). Simply at- 
tach the project board cables 
one at a time, verifying proper 
operation at each step before 
proceeding. 

The system cabinet described 
here is also mentioned in the 
Disk Controller article. There is 
no electrical reason why a differ- 
ent metal cabinet configuration 
can't be used; but this particular 
cabinet is a compromise be- 
tween cost, rapid construction, 
ease of circuit troubleshooting, 
and a handy means of elevating 
the video monitor a few inches 
closer to eye level. For those 
without facilities to prepare the 
cabinet, a completely drilled, 
punched, painted, and labelled 
version is available (see note at 
end of article). 

System Integration 

First, let's consider some 
system integration concepts, 
particularly as related to ad- 
dress/data line utilization and 
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Finally, a Spelling Checker that can SPELL! 



Electric 
Webster 

The "Cadillac" of Spelling Checkers! 

80 Microcomputing, 9/82 



• FAST andACCURA TE — No other spelling checker 

comes close! 

• INTEGRA TED — Proofs and corrects from 

within all these popular word processing 
programs: Scripsit, Newscript, Lazy Writer, 
Electric Pencil, Superscript, and CopyArt. 

• SMART — Finds and displays correct spellings instantly — no more clumsy dictionaries! 

• HYPHENATES automatically — inserts discretionary hyphens with 100% accuracy, (optional) 

• COMPLETE — One step proofing system with integrated Grammatical and Hyphenation 

features, (optional) 

No other program can claim even one of these features. 




EASY TO USE: Type your text using any of a number of 
popular word processing programs. When you are done, hit 
the appropriate key, and ELECTRIC WEBSTER proof- 
reads your document, displaying misspellings and typos 
on the screen. 

Then, Correcting Electric Webster can display each error 
separately, requesting you to enter the correct spellings for 
each. You are given the options of displaying errors in 
context, adding words to ELECTRIC WEBSTER'S 50,000 
word dictionary, or even displaying the dictionary to find 
the correct spelling. If you think you know the correct 
spelling, Electric Webster will verify it for you. 

Finally, Electric Webster CORRECTS YOUR TEXT, 
automatically inserts discretionary HYPHENS (optional), 
and points out GRAMMATICAL errors (optional), all with 
remarkable speed! 



LOW PRICES: Standard Electric Webster is available for 
$89.50 (TRS-80™ Model I & III, or Apple™) or $149.50 
(CP/M™, TRS-80™ Model II and all others.) The optional 
Correcting Feature can be added at any time ($60) as can 
Hyphenation ($50) and Grammatical ($40). During the 
closing months of 1982 only, we are offering 6 W/P integra- 
tion programs FREE (reg. $35 each) with the purchase of 
Correcting Electric Webster. 



The Ultimate PROOFING SYSTEM 



REVIEWS OF MICROPROOF (E W's predecessor): 

"There is simply no finer program available . . ." 
Creative Computing, March 1982 

"This is a very useful product and should be obtained by anyone 

who uses a word processor." 

80 Microcomputing, August 1981 

"The summary review of this program? One word — Excellent." 
Computronics, September 1981 

"In a comparative review of proofreading programs (with smaller 

dictionaries) MICROPROOF was found to be considerably faster 

than all the others, when tested against a 400 word sample 

document." 

BYTE Magazine, November 1981 

"A 1500 word document took 26 seconds to load, process and proof 
... it is very friendly and any prson able to use a word processing 
program can master it in moments." 
Info World, January 1982 

"By far, the most capable and efficient of these spelling checker 

programs." 

Microcomputing, dune 1982 

AND NOW ELECTRIC WEBSTER: 

"Actually, Electric Webster is faster than its predecessor (Micro- 
proof) . . . and spelling corrections are immediately verified 
against the dictionary before being accepted . . ." 
Microcomputing, June 1982 

"Electric Webster is the Cadillac of vocabulary programs." 
80 Microcomputing, September 1982 




CORNUCOPIA SOFTWARE 



*?<& 



Post Oficc Box 6111 Albany, California 94706 



(415)524-8098 










-See List of Advertisers on Page 435 
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power supply distribution. 

Figure 1 contains a system 
view of how address lines are 
used in the PSI. The printer inter- 
face decodes A2-A15, looking 
for a 37E8 address. When 37E8 
is decoded in the presence of a 
Write (WR) command, the cur- 
rent data bus character or in- 
struction is clocked into a data 
buffer, then on to the printer. A 
busy signal tells the TRS-80 not 
to send more data until the cur- 
rent data is processed. 37E8 
together with read (RD) feeds 
the printer status (out of paper, 
fault, for example) back to the 
TRS-80. (Since AO and A1 are not 
decoded in the printer interface, 
addresses 37E9, 37EA, and 
37EB produce the same result 
as 37E8. This is not a problem, 
as these three addresses are 
never used.) 

The 32K memory mod de- 
codes A14 and A15 to activate 
one of the two 16K blocks of 
memory on the board. When A15 
is present along with row ad- 
dress strobe (RAS), the RAM 
memory block operating over 
addresses 32768-49151 is en- 
abled. When both A15 and A14 
are present along with RAS, the 
49152-65535 block is enabled. 
Two groups of addresses (A0- 
A6 and A7-A13) are multiplexed 
to the RAMs. A0-A6 contain the 
row address information for the 
RAMs, while A7-A13 contain 
column address information. 

The disk controller decodes 
A2, A3, and A5-A15, producing 
six key control signals used 
throughout the controller. These 
signals are used in the support 
circuitry for the floppy disk con- 
troller (FDC) ICs, and also within 



"Even if you build all PC boards 

simultaneously, you can check out 

each project individually (rather than 

applying power to the entire system)." 



the FDCs. There they combine 
with AO and A1 to select a 
desired FDC register. AO and 
A1 are also used with data ac- 
cess lines (DALO and DAL3- 
DAL7), write enable (WE), and 
system reset (SYSRES) to define 
the disk controller mode of 
operation. 

Figure 2 contains a system 
view of data lines used in the 
PSI. The printer interface 
receives all eight data lines, 
latching the incoming data from 
the TRS-80 and holding it for use 
by the printer. Status feedback 
information from the printer is 
gated onto data lines D4-D7. 
Thus, the printer interface alter- 
nately routes information to and 
from the printer. (It does not 
alter data in any way.) 

The 32K memory mod uses 
the data lines directly at the 
RAM data inputs. RAM data out- 
puts, however, are gated onto 
the data lines only when di- 
rected by the TRS-80 (via de- 
coding of A14, A15, and RD). As 
with the printer interface, strict 
control must be placed on when 
outputs can appear on the data 
lines. This avoids two or more 
sources trying to output data at 
the same time. 

The disk controller uses a 
gated version of the data lines 
(DAL0-DAL7) for FDC activities 



and as a decoding source for 
determining mode of operation. 
The FDC converts incoming 
TRS-80 parallel data to serial, al- 
lowing disk drive recording. Sim- 
ilarly, it converts serial read-data 
from the drives back into paral- 
lel for the TRS-80. The single 
density (SD)/double density (DD) 
decoder uses DALO and DAL3- 
DAL7, together with AO, A1 , WE, 
and SYSRES to enable either the 
single density FDC (1771) or the 
double density FDC (1791) as 
commanded by the software. 
D0-D3 are connected directly to 
a disk drive select latch, activat- 
ing the appropriate disk drive. 
Figure 3 contains a system 
view of power supply distribu- 
tion in the PSI. Sufficient 
reserve capability in the 
+ 12/ + 5/-5V power supply in 
the 32K memory mod article 
also allows it to provide + 5V for 
the printer interface and 
+ 12/-5V for the disk con- 
troller. It cannot, however, pro- 
vide the +5V needs of the disk 
controller. For this reason, a 
separate on-board +5V supply 
was included in the disk control- 
ler design. The printer interface 
PC board contains provisions 
for a simple zener diode regu- 
lator intended for the stand- 
alone application, where power 
is provided by a 6V dc wall plug- 



in supply. In the PSI, however, 
power is obtained from a pre- 
regulated +5V source; there- 
fore C3, D1, and R7 must be 
omitted from the board, and 
the +5V should be directly 
connected to C2. 

If you have already built the 
32K memory mod and are now 
building the PSI, it isagood idea 
to move the 32K memory mod to 
the PSI cabinet. This will en- 
hance system noise character- 
istics and allow multifunction 
use of the 32K memory mod's 
power supply. 

Ribbon Cable 
Distribution PC Board 

A full-size etch pattern for the 
ribbon cable distribution PC 
board is in Fig. 4. Figure 5 con- 
tains a complete description of 
all conductor destinations on 
the board, including suggested 
ribbon cable lengths when using 
the cabinet described in the 
parts list. Provisions are in- 
cluded for four ribbon cables: 
one each to the printer interface, 
32K memory mod, and disk con- 
troller boards, plus a cable to 
the TRS-80 keyboard expansion 
port card edge. Connections at 
the three PSI boards are identi- 
cal to those described in the 
individual articles. If you have 
already built the three individual 
projects, and the ribbon cable 
lengths are sufficient for the 
PSI, there is no need for wiring 
changes at these three boards. 

For simplicity and better 
adjacent-conductor isolation, 
ribbon cable connections at the 
cable PC board include all 40 
conductors of each cable. Do 
not worry about the destination 
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Fig. 1. TRS-80 address bus utilization in the PSI 
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Fig. 2. TRS-80 data bus utilization in the PSI 
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A ComdIete MDX-Eouiped 

TRS-80 ModEl III 

SySTEM 

From MicRO-DEsiqiN 

$ 1695 95 



FEATURNJNq: 

The MICRO-DESIGN MDX-6 oFloppy disk 
controIIer, LeveI II: 48k MEMORy ANd two 

40-TRACk TOp QUAlJTy disk dRJVES 



MICRO-DESIGN offERS thejr Modsl III wjth the 

MDX'5 EXpANSiON SySTEM. 



FOR FURTHER INFORMATION CA\L (TOLL FREE) 
OR WRITE FOR FREE LITERATURE 




MICRO-DESIGN 

6501 MancNaca RoacJ, SuiTE J. Austin Texas, 78745 

1 -800-531 -5002 

Texas Res. CaII 51 2 441 7890 ^ 77 

See our other ads on pages 99 & 244 
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SOFTWARE CONCEPTS 
DALLAS TEXAS 



SPECIAL DELIVERY 

Now is the time to turn your TRS-80 and 

your text editor into a REAL word processing 

machine. 

EXCELLENT... Creative Computing Review. 

State of the Art... 80 Microcomputing 

Review. 

• Maintain your mail list 

• Print personalized FORM letters. 

• Free format labels 

• 100% machine language 

• Enter names at typist speeds 

• Use with Scripsit, Lazywriter, Electric Pencil 

(we sell them all!) 

• Extract selected names 

• Boldface & underscore 

• Get your form letters past the secretary's desk! 

XTRA Special Delivery Includes 
all of the above PLUS: 

• Disk Sorts 

• Multi Label printer 

• Key definitions 

This is the LAST mailing list you 
will ever have to buy!! 

FOR YOUR MODEL I OR III: 

(requires minimum 32K & single drive) 

SPECIAL DELIVERY $125 

XTRA SPRCIAL DELIVERY $199 

FOR YOUR MODEL II 

(requires Scripsit 2.0) 
SPECIAL DELIVERY $199 

Over 2800 satisfied customers 
(plus 12 that won't speak to us any more) 

Electric Pencil 2.0 $80.00 

Lazywriter $165.00 

Scripsit $95.00 

(Most TRS software available at similar discounts. CALL!) 

SOFTWARE CONCEPTS 

105 Preston Valley Shopping Center 
Dallas, Texas 75230 

Our retail store is located at the SW corner of 
Preston & LBJ 

(214) 458-0330 

MasterCard, Visa, American Express, COD 

«-" 43 



,pC2* 



32 K 

MEMORY 

MOO 



Fig. 3. Power supply distribution in the PSI. Be sure to use the ver- 
sion in the 32K Memory Mod article. Although the bare PC boards 
are the same in both the Mem Mod and Disk Controller articles, the 
components used on the board for the stand-alone disk controller 
are not suited for use as shown here. 




Fig. 4. Etch pattern for ribbon cable distribution PC board 



of every wire, just be sure no 
cable is wired backward. Be cer- 
tain that the A2-end of the rib- 
bon cables at the cable PC 
board is the same end attached 
to the A2 pads of the three proj- 
ect boards. Because of the fan- 
out required to fit the 2-inch 
wide ribbon cable into pads 
spanning 4 inches, it is a good 



idea to prepare the ribbon cable 
ends as shown in Fig. 6. Using 
an ordinary pair of scissors, trim 
a V-shaped notch with its apex 
about 1 Va inches from the cable 
end. Then separate each con- 
ductor back about Vz inch. 
Finally, strip about 1/8 inch in- 
sulation from each conductor. 
Insert the conductors in order, 
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Can your VisiCalc do this? 




It can if you add VisiBridge/RPT™, from Solutions, Inc. 

$79 for TRS-80® 1, 11/16, III, Apple® II or IBM PC™, 802 229 0368. Box 989 

Montpelier, VT 05602. MASTERCARD OR VISA/Dealer inquiries welcomed! 

VisiBridge/RPT is a trademark of Solutions. Inc. VisiCalc® is a registered trademark of VisiCoro ^ 276 

TRS-8(T is a registered trademark ot Tandy Corp. IBM PC is a trademark ol IBM Corp. 



STOCK MARKET DATA 
over 20 YEARS on 
DISK or TAPE 

NOW AVAILABLE- 

OVER 2 YEARS OF WEEKLY OR DAILY 
CLOS I NG PR I CE DATA ON D I SK OR TAPE 
FOR THESE PROVEN MARKET INDICATORS 



I 962 



1982 



• DOW JONES INDUSTRIAL 

• DOW JONES TRANSPORTATION 

• DOW JONES UTILITY 

• STANDARD AND POOR • S 5 

ALSO INCLUDES- 

PROGRAMS TO MAINTAIN THESE FILES, 
CREATE FILES FOR YOUR OWN STOCKS, 
AND SAMPLE PROGRAMS ILLUSTRATING 
RUNNING AVERAGE AND CYCLIC MARKET 
ANALYSIS TECHNIQUES. 

WEEKLY DATA 

□ 101 MODEL 1/1 I I CASSETTE. S3 4. 9 9 

□ 102 MODEL III DISKETTE ... $34 . 99 

□ 103 HARDCOPY PRINTOUT. ... $2 2 . 9 9 

DAILY DATA 

□ 104 MODEL 1/1 I I CASSETTE. $44. 9 9 
Q 105 MODEL 111 DISKETTE. .. $4 4 . 9 9 

□ 106 HARDCOPY PR I NTOUT . . . . $3 2 . 99 

FREE SHIPPING WITHIN CONTINENTAL USA 

(ADD 10% FOR SHIPPING ELSEWHERE) 

24 -HOUR TOLL-FREE ORDER LINE 

WW 1-800-227-3800 EXT. 942 C23 



YOUNG IDEAS, INC. 



^ 172 

555 N. NEW BALLAS 
ST. LOUIS, MO 



» SUITE 310 
6314 1 
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IB Scmpilar 

The "LC" Ccn^iler provides a 
substantial subset of the C 
programming language with: 
o Integer subset of C; has 

access to floating point 

ROM routines via functions 
o All statements supported 

except: SWITCH-CASE, GOTO, 

TYPEDEF, STRUCT, UNION, 
o All operators except "->", 

".", SIZE0F, (TYPENAME). 
o Standard I/O redirection 

with device independence. 
o Input using FGETS or GETS 

functions support JCL. 
o Dynamic memory management, 
o Sequential files open for: 

READ, WRITE, and APPEND, 
o LC Generates Z-80 EDAS-IV 

source code as output, 
o Z-80 "source" libraries in 

ISAM-accessed PDS files. 
o Compact, one-line compiler 

invocation for easy use. 
o Compiled programs run on 

both Model I and Model III 
o IN/LIB accesses graphics 

and LDOS entry points, 
o LC/LIB includes: FPRINTF, 

PRINTF, ALLOC, FREE, SBRK, 

and String functions, 
o LC: The Mod I/I 1 1 version 

includes: LC/CMD, LC/LIB, 

FP/LIB, IN/LIB, EDAS-IV, 

XREF, and more than 200 

pages of documentation. 

Requires 2-drive 48K LDOS. 
Mod 1&3 for LDOS: $150+$4S&H 




MISOSYS MISOSYS MISOSYS MISOSYS MISOSYS 
CO 

o 

CO 



LDOS, Version 5.1 is the Ultimate in Operating 
Systems for the TRS-80 Models I and III. 
MISOSYS is your East Coast Headquarters 
for LDOS, the documented system! Version 
5.1 is priced at $129.00 + $5.00 S&H per 
system. Deduct $35 if ordering both. 

UXE 5.1 
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SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI 

Finally, user customized character sets for your 
MX-80 Graftrax and MX-100 printers. With GRAphic 
Support Package you create character sets usable 
from any and all applications. Create character 
sets of single-width, double-width, & 12-pitch, 
using the GRASP character editor, ALTCHAR. GRASP 
comes supplied with 7 character sets. Print Mod3 
special characters on your Epson! Set MX options 
from your keyboard. Invoke underlining! Written 
by K.A.Hessinger & S.A.Loomer. GRASP: $50+$2S&H 




MISOSYS - Dept. M5 
P.O. Box 4848 
Alexandria, VA 22303-f 
703-960-2998 
Dealer's Inquiry Invited 



MasterCard 

V X. y 



EDIFIS-lll 



EDAS, Version IV is the most CO 

fantastic absolute address 2 

assembler, bar none! It has: Jjj 

o Assemble to disk or memory o 
from multiple source files CO 
nestable to FIVE levels. £ 

o Assemble conditional code 7 
with IF, IFLT, IFEQ, IFGT, = 
IFDEF, IFNDEF, IFREF to 16 g 
levels with IF-ELSE-ENDIF. Jjj 

o Automatic search of SOURCE < 
subroutine libraries saved w 
in I SAM- accessed structure 2j 
to resolve references left CO 
undefined (requires PDS). O 

o One-level HACROs support *< 
parameter substitution by CO 
position and by keyword. 2 

o Local labels in both MACRO 55 
expansions & PDS searches, o 

Supports +, -, *, /, .MOD. CO 
.AND., .OR., .NOT., .XOR. Ijj 

Constants can be declared ^ 
as base 2, 8, 10, & 16 or 
string, with more than one 
value on a single line. 

15-char labels including 
special chars: @, ?, $, _ 

Extensive cross-reference 
utility & EQU generation. 

Enter source in upper case 
or lower case. Line editor 
has COPY, CHANGE, and MOVE 

Pseudo-OPs LORG, COM, PAGE 
TITLE, SUBTTL, SPACE. 

Model I/III for LDOS: $100 

Model II for TRSDOS: $200 

Add $4 S&H + 4X VA tax. 
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■See Lisl ol Advertisers on Page 435 
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RIBBON CABLE LENGTHS: 
TRS-80 6 INCHES 

DISK 5 INCHES 

PRINT 22 INCHES 

MEMORY 14 INCHES 




X = No usage of this conductor 
SR = System Reset 



Top View (with circuit trace pattern underneath) 



Fig. 5a. Ribbon cable PC board conductor identification and sug- 
gested cable lengths. The 40-pin connector plugs into the keyboard 
with the ribbon cable exiting the bottom of the connector. 



without skipping any conductors 
or pads. If you have already at- 
tached the other end of the ca- 
bles, be absolutely certain that 
none of the cable PC board ends 
are attached backward. (Virtu- 
ally all ribbon cables have some 
sort of color-coding to identify 
sides— the simplest method is a 
red stripe along the outermost 
conductor on one side.) 

Figure 5b shows where the 
termination resistors are 
mounted on the cable PC board. 
These resistors are designated 
R33-R42 in the Disk Controller 
article. If you have already 
chosen the option of adding the 



resistors directly to the disk 
controller main PC board, do not 
add a duplicate set to the cable 
PC board. 

Figure 7 shows the proper 
routing of the ribbon cables. In- 
sert the disk controller ribbon 
cable into the circuit trace side 
of the cable PC board, and the 
other three cables from the op- 
posite side. 

If you are connecting all four 
cables to the PC board at one 
time, attach the 32K memory 
mod cable first, then the printer 
interface, disk controller, and 
finally the TRS-80 cable. This is 
the simplest attachment order, 





Fig. 5b. Ribbon cable PC board termination component placement. 
These resistors are designated R33-R42 in the disk controller 
article. 



Cabinet Construction 
and Wiring 

Figures 8 through 10 provide 
the dimension details needed 
for cabinet preparation. Figure 8 
contains dimensions for the 
front panel, Fig. 9 for the back 
panel, and Fig. 10forthe cabinet 
top. Make the rectangular cut- 
outs for the TRS-80 ribbon cable 
and the disk controller/printer in- 
terface card edge connectors by 
drilling several small holes and 
filing to the dimensions or by 
drilling one larger hole and then 
using a "nibbler" to punch the 
metal to the desired dimensions. 
(The Adel Nibbling Tool, avail- 
able from Jameco Electronics in 
Belmont, CA, 94002, at $7.50, is 
excellent for this purpose.) 

All PC boards are attached to 
the cabinet top via threaded 
standoffs. Standoff heights 
should be Vz inch for the disk 
controller, printer interface, and 
32K memory mod boards, 3 A 
inch for the power supply board, 



Fig. 6. Recommended trimming 
guide for cable-PC board end of 
ribbon cables 



particularly if the other ends 
of these cables have already 
been wired. 

The preparation and wiring of 
the ribbon cables is a tedious 
task. I rejected the alternative, 
to attach connectors to all the 
cabling. First, it would be quite 
costly; more significantly, it 
would reduce the long term 
reliability of the system by intro- 
ducing 160 mechanical connec- 
tions at the cable PC board, and 
about 80 connections at the 
three project PC boards. 
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If You Do A Lot Of Editing Of 

Your BASIC Programs, Then 

This Is The Editor For You!!! 



The Full Screen Text Editor for BASIC, we were the first to give 
the TRS-80 this indispensable ability. What ability? The ability 
to edit your BASIC program with the ease of word processing. 
It is a type of word processor specifically designed to handle 
ims instead of letters and documents. 





■ The capability to change, insert and 
delete a character or characters: 

Simply position the cursor over the 
character that you wish to change and 
type in the new one. Another handy feature 
is Insert Mode, this is used to add text in the 
middle of a program line. 

■ Extend a line or insert new lines: 

Extending a line is as simple as two 
keystrokes, instantly the cursor jumps to the 
end of the program line and the editor is 
placed in the insert mode. 

■ Delete, copy or move statements: 

All you have to do is mark the line or block 
of lines and then tell the editor where to 
move or copy them. 

■ Global Search and/or change any 
specified string: 

Have you ever needed to change a lot of 
PRINT statements to LPRINTs? 

■ Macro key facility: 

Macro keys can cut your programming 
time in half. You can define each of the 26 
letter keys (A-Z) to represent BASIC 
keywords, or any letter or number 
combination up to 6 characters per key 

■ Renumber commands: 

Whats so special about this renumber 
facility? Not only can it renumber selected 
portions of your program, it also checks all 
GOTO, GOSUB, THEN and ELSE statements 
and updates them as needed! 

sSee List of Advertisers on Page 435 



You may have seen other Editor programs 
advertized that give you one, maybe two 
of these features. You may have also seen 
some of these features sold as separate 
utility programs. 

Only CAU offers a complete editing system, 
not just a word processor patched up to 
handle line numbers. 



You can order the BASIC Editor directly from 
Computer Applications Unlimited or ask your 
local computer store. 



#■1210-20 for 




only $ 




The Editor is supplied on tape with complete 
instructions to move it to disk. If you wish us to 
send the editor on disk please add $5.00 
and ask for a DISK DUMR 

Add $2.00 for shipping in the U.S. and 
Canada, $10.00 outside USA 
N.Y State Residents add applicable Sales Tax. 
Dealer inquiries Invited. 



Computer Applications Unlimited 
RO.Box214,DeptFSBE, Rye, N.Y 10580 
(914)937-6286 

^120 

ni I COMPUTER 
ML /APPLICATIONS 
iSLZJ UNLIMITED 

a dlv. of CAU, Inc. 



TRS-80 is a TM of Tandy Corp. 
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Fig. 8. Cabinet front panel dimensions 
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Fig. 9. Cabinet rear panel dimensions 



and 1 V-2 inches for the cable PC 
board. The two power trans- 
formers are also mounted to the 
top. Thus, you can remove the 
bottom cover to allow un- 
obstructed circuit access for 
servicing. 

Wiring connections, other 
than ribbon cables, between the 
PC boards and cabinet-mounted 
components are shown on Fig. 
1 1 . Be very careful to properly in- 
sulate the transformer primary 
and power switch connections 
to eliminate potential shock 
hazard. A good way to insulate 
the power switch is to slip a 1 Vz 
inch length of large-diameter 
shrink tubing over the switch, 
after soldering the wires and 
routing them out the front side 
instead of at the rear terminal 
locations. While the shrink tub- 
ing is still hot, pinch the rear por- 
tion of it (extending out beyond 
the solder terminals) with pliers 
and hold until the tubing has 
cooled. The tubing should re- 
main pinched together. Before 
mounting the disk controller 
regulator to the outside of the 




DISK DRIVE WOES? ^ ^k Pat #4,259,705 

PRINTER INTERACTION? 

MEMORY LOSS? 

ERRATIC OPERATION? ^ 1^ y^j» , S o-i 

Don't 

Blame The 
Software! lSM 

Power Line Spikes, Surges & 

Hash could be the culprit! Floppies, printers, 

memory & processor often interact! Our patented ISOLATORS 

eliminate equipment interaction AND curb damaging Power Line 

Spikes, Surges and Hash. MONEY BACK GUARANTEE! 

• ISOLATOR (ISO-1) 3 filter isolated 3-prong sockets; integral 
Surge/Spike Suppression; 1875 W Maximum load, 1 KW load 
any socket $69.95 

• ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; (6 
sockets total); integral Spike/Surge Suppression; 1875 W Max 
load, 1 KW either bank $69.95 

• SUPER ISOLATOR (ISO-3) similar to ISO-1 except double 
isolation & Suppression $104.95 

• SUPER ISOLATOR (ISO-1 1) similar to ISO-2 except double 
Isolation & Suppression $104.95 

• MAGNUM ISOLATOR (ISO-1 7) 4 Quad Isolated sockets; For 
ULTRA-SENSITIVE Systems $181.95 

• CIRCUIT BREAKER, any model (Add-CB) Add $9.00 

• REMOTE SWITCH, any model (Add-RS) Add $16.00 

AT YOUR MasterCard, Visa, American Express 

DEALERS ORDER TOLL FREE 1-800-225-4876 

(except AK, HI, PR & Canada) 



JS7 Electronic Specialists, Inc. ^ 

171 South Main Street, Box 389, Natick, Mass. 01760 
(617) 655-1532 



ATTACH THOSE CONDUCTORS 
SHOWN IN FIG. 12 OF 32K 
MEMORY MOD ARTICLE 




STEP I 
INSERT THE MEMORY MOD CABLE THROUGH THE 
UNDERSIDE OF THE CABLE PC BOARD AND THE 
TOPSIDE OF THE MEMORY MOD BOARD. 




ATTACH ONLY THOSE CON- 
DUCTORS SHOWN IN FIG. 5 
OF PRINTER INTERFACE 
ARTICLE 



PRINTER INTERFACE 
STEP 2 
INSERT THE PRINTER INTERFACE CABLE THROUGH 
THE UNDERSIDE OF THE CABLE PC BOARD AND THE 
TOPSIDE OF THE PRINTER INTERFACE BOARD. 





ATTACH ONLY THOSE CON- 
DUCTORS SHOWN IN FIG. 9 
OF DISK CONTROLLER 
ARTICLE 



ATTACH ALL 40 
CONDUCTORS 



STEP 3 
INSERT THE DISK CONTROLLER RIBBON CABLE 
THROUGH THE TOPSIDE (AS SHOWN HERE) OF BOTH 
THE DISK CONTROLLER AND CABLE PC BOARDS. 




STEP 4 
INSERT THE TRS-80 RIBBON CABLE THROUGH 
THE UNDERSIDE OF THE CABLE PC BOARD. 



Fig. 7. Ribbon cable routing guide 
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cabinet, be sure to scrape away 
the paint in that area. The best 
way to do that is to temporarily 
place the regulator in position 
and trace its outline onto the 
cabinet. Using a small screw- 
driver, carefully scrape away the 
paint within the outline, then 
apply thermal heatsink com- 
pound before fastening the 
regulator. Attach a solder lug to 
one of the two screws to provide 
a regulator ground connection 
point inside the cabinet. 

Operation 

I have tested the PSI with two 
popular double density disk 
operating systems: DBLDOS by 
Percom, and Double Zap- 
Enhanced NEWDOS80 by Ap- 
parat. Other double density 
operating systems compatible 
with the hardware supported by 
these two systems should also 
work on the PSI. Of course, 
you can use any single density 
DOS designed for use with the 
Radio Shack Expansion Inter- 
face as well. 

Just a quick note on opera- 



tion of the keyboard Reset but- 
ton in conjunction with the reset 
enable switch position on the 
PSI. When the keyboard is not 



connected to any peripheral de- 
vices, prudent use of the Reset 
button is recommended. De- 
pending on what software is 



loaded and what the micropro- 
cessor happens to be doing at 
the time, the reset function may 
or may not do what is desired. 



625 



Fig. 10. Cabinet top panel dimensions. All holes are . 14 inch in diameter. If the cabinet will house the 32K 
memory mod, use the #1 holes (shown at right) to accommodate its larger transformer. Otherwise use 
the #2 holes. 



Do your own taxes like an expert 
with TAX/SAVER. 



TAX/SAVER: m The tax help program 
for the layman and the professional. 



Privacy. 

Built-in tax aids. Answers questions like "Is my father my 

dependent?" and "Are my deductions reasonable?" 

Tax regulations programmed in by our team of accountants. 

Type in your figures and you've done your own tax return. 

Output to video or lineprinter. (Overlays available.) 

Tax deductible. 

Manual: Tax information, lists of deductions, tax glossary. 

TAX/SAVER™ I: completes long and short forms, itemized 

deductions, interest, dividends, income averaging. 

TAX/SAVER" II: all features of TAX/SAVER™ I plus 

business income and capital gains. 

40% Discount on yearly updates. 



Reviews and Users' Comments: 

About TAX/SAVER'": 

"This is a very valuable tool" — R. Perry, Personal Computing Magazine, 

"Tax Preparation Software", December 1981 
"This is the perfect program (or those doing taxes for others (. . .good for an 
individual, too!!) — B.M., Missoula, MT (Professional Preparer) 

About TAX/FORECASTER'": 

"VERY HANDY!" — T. Pettibone, "Software Critic", 1982 ^342 

©Copyright 1982 'Registered trademark ol Tandy Corp. 



TAX/FORECASTER™, a quick tax planner for 1982-1983, lets 
you see how financial decisions will affect your taxes. Merely change 
one or more entries to see your lax refigured. 

NFVVl PROFESSIONAL TAX/FORECASTER" 
l»"-* ' adds disk storage of client filesand income averaging. 
Orders will be filled in late January to allow inclusion of new tax laws. 
TO ORDER: 



Call collect 203-324-3009 or 203-544-8777 or mail this 
coupon to: Micromatic Programming Co. 

P.O. Box 158, Georgetown, CT 06829 

Please enroll me in member's service and send: 

□ TAX/SAVER'" I @ $89.95 Manual Included 
D TAX/SAVER'" II @ $139.95 Manual Included 

□ TAX/FORECASTER'" @ $59.95 

□ PROFESSIONAL TAX/FORECASTER™ 
@ $99.95 (requires 48K) 

($15. off any TAX/FORECASTER" with any TAX/SAVER'") 

□ Tax Form Overlays (set of 6) @ $39.95 

□ Please send me more information 
Please check one: 

TRS-80* Model I □ 32K, 2 drives D 48K, 2 drives 

TRS-80* Model III □ 32K, 2 drives D 48K, 2 drives 

Add $3.50 for postage and handling, CT residents add 7'?'<> sales tax. 

Name . 



Address 
City 



.State 



.Zip 



D Check D Master Charge D Visa 
Card No. 



.Exp. date 



• See List of Advertisers on Page 435 
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For example, it may or may not 
allow you to recover from a hung 
up state where you have lost 
keyboard control. It may make a 
difficult situation hopeless... 



or it may save the day! Remem- 
ber that since you have disk 
drives powered up, even though 
the read linkage from the FDC to 
the TRS-80 is broken via the re- 



set enable switch position, this 
will not prevent action on a 
faulty command from the TRS- 
80 to the FDC. Until you can 
safely predict the conse- 




RESUME 



POWER 



NOTES: 

I. LONGER LEAD ON LEOS IS THE ANODE. 

2. TOGGLE SWITCH TERMINALS SHOWN HORIZONTALLY HERE FOR CLARITY; 
IN CABINET, UNUSED TERMINAL SHOULD FACE TOWARD CABINET TOP. 

3. II7VAC IS PRESENT HERE! BE CERTAIN TO INSULATE ALL TERMINALS 
WITH SHRINK TUBING OR ELECTRICAL TAPE TO PREVENT SHOCK HAZARD. 

4. THE 6.3V XFMR SECONDARY WINDING LEADS WILL NEED TO BE EXTENDED TO REACH 
THE DISK CONTROLLER BOARD. USE SHRINK TU8ING OVER THE WIRE SPLICES. 



DISK/RESET ENABLE 



Fig. 11. Interboard connections. This diagram illustrates all wiring other than ribbon cables. Wires are 
shown above the PC boards for clarity, but will look neater if routed beneath the boards. 



quences of your planned ac- 
tivities while in reset enable 
mode, it is wise to first remove 
all disks from the drives (you 
don't need them while in reset 
enable mode anyway!). 

You can be truly proud of your 
PSI construction achievement; 
not only for the unique end prod- 
uct, but also for the knowledge 
and personal satisfaction de- 
rived from a project of this com- 
plexity. Let me hear from you. I 
would appreciate your com- 
ments and suggestions on the 
material, as well as enhance- 
ments and new features you 
would like to see.B 

You can obtain the ribbon 
cable distribution PC board for 
$7.95 and the prepared cabinet 
(predrilled, punched, painted, 
and labelled) with screws and 
threaded standoffs to mount all 
PC boards for $59.95. 

The above prices are postpaid 
in the continental U.S. Ari- 
zona residents add 4 percent 
sales tax. Order from PVP Indus- 
tries, P.O. Box 35667, Tucson, 
AZ 85740. 



COMPUTER KITS- FROM $69.95 




LNW SEMI-KITS can save you hundreds of dollars. By obtaining your own parts at the lowest 
possible cost and assembling the LNW SEMI-KITS, you can have the most highly acclaimed 
microcomputer in the industry - the LNW80. The LNW SEMI-KITS are affordable modules. You 
can start with a modest cassette system and expand to a full 4Mhz TRS-80 compatible system with 
5 or 8 inch double density disks and color at any time. 

A. LNW80 CPU - Made of high quality FR4 glass epoxy double sided circuit material, with plated- 
through holes and gold edge connector. It is fully solder-masked and silk screened. Here are just 
some of the outstanding features you will have when your . LNW80 CPU board is fully assembled: 
• 16K RAM • Color and black and white video • 480 x 192 high resolution graphics • 64 and 80 
column video • 4 Mhz Z80A CPU • Upper and lower case display • 500 and 1 000 baud cassette 
I/O -$89.95 

B. SYSTEM EXPANSION- Expandthe LNW80computerboard, TRS-80and PMC-80 computer 
with the following features: • 32K memory • Serial RS232C and 20Ma port • Real time clock • 
Parallel printer port • 5 inch single density disk controller • Expansion bus (screen printer port) • 
Onboard power supply • Solder-masked and silk screened legend -$69. 95 (tin plated contacts) - 
$84.95 (gold plated contacts) 

C. KEYBOARD- 74 key expanded professional keyboard- includes 1 2 key numeric keypad. Fully 
assembled and tested. - $99.95 

D. COMPUTER CASE -This stylish instrument-quality solid steel case and hardware kit gives your 
LNW80 that professional factory-built appearance. - $84.95 Add $12.00 for shipping. 

E. SYSTEM EXPANSION CASE- This stylish instrument-quality solid steel case and hardware kit 
gives your SYSTEM EXPANSION interface that professional factory-built appearance. - $59.95 
Add $10.00 for shipping. 

F. LNW80 CPU - HARD TO FIND PARTS KIT - $82.00 

G. LNW80 VIDEO- HARD TO FIND PARTS KIT- $31.00 

H. SYSTEM EXPANSION - HARD TO FIND PARTS KIT- $27.50 
I. LEVEL II ROM set. (6 chip set) - $1 20.00 

VISA and MasterCard accepted. Add $3.00 for shipping plus $1.00 for each additional item. All 
shipments via U PS surface. Add $2.00 for U.S. Mail. Shipments outside continental U.S.: funds must 
be U.S. dollars. Sufficient shipping costs must be included with payment. 

ORDERS & INFORMATION - (714) 544-5744 
SERVICE - (71 4) 641 -8850 



LNW Research Corp. 

2620 WALNUT Tustin. CA. 92680 
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Would you like your TRS-80® Lm - 

Model III to communicate with other 

TRS-80s? With remote databases? 

Mainframes? With STSC's APL*PLUS/80 

Application Development System, your TRS-80 can do it! 

Think of the benefits to you or to your clients when you make your 
TRS-80 part of a worldwide communications network. You'll be able 
to access and transmit data, control local devices (such as printers 
and plotters), and communicate with other TRS-80 users. And since 
the APL* PLUS/80 System is compatible with our APL*PLUS systems 
for the VAX* minicomputer series and IBM mainframes, it's easy to 
exchange, download, or upload applications between them. 

The APL* PLUS/80 System has a built-in terminal emulator, either 
for APL or for ASCII, ready for use at the touch of a key. Another touch 
of the key and you're back to using your TRS-80 as an independent 
computer in the same APL environment -without losing the connec- 
tion to the remote host! Through one keyboard, you control both 
machines in turn. Or use APL program-controlled communication to 
create your own "smart" terminal. 

Challenge to BASIC 

Develop a subroutine to group and total unordered costs by job 
number. The result is a table showing the total cost for each active 
job, in ascending job order, formatted as a report. Use the following 
CHARGES: 

8.20 5.55 1.59 995.00 2.44 14.32 .87 .79 1.01 149.03 3.42 .86 
for JOBS numbered 213 33 4 4 4 4 9 33 213 4 33 33: 
JOB TOTAL 



with system features that extend 

the power and productivity of the APL 

language, bringing our proprietary enhancements to 

your TRS-80 Model III. 

• complete APL language and system features, upwards compatible 
with our mainframe systems 

• powerful output formatter 

• array-oriented file system 

• access to regular TRSDOS or LDOS* files and subroutines 

• traditional APL symbols or mnemonic keywords 

• utility program libraries 

• the most complete set of documentation on the market. 

Open up a world of communications for yourself with the 
APL* PLUS/80 System. Mail in the coupon below with your payment 
and we'll send you the APL* PLUS/80 Application Development Sys- 
tem -everything you need to run APL on your TRS-80 Model III. If 
you'd like more details, check the box on the coupon and we'll send 
you our free information package which contains an explanation of 
the Challenge to BASIC. 

We're STSC, Inc., the leading supplier of APL software and services in the 
United States. Our APL*PLUS systems have been serving the business and pro- 
fessional wo. Id for more than 12 years. 

APL* PLUS/80 runs under TRSDOS 1.3 or LDOS 5.1 on a 48K RAM TRS-80 
Model III with two disk drives. The APL* PLUS/80 comes with a custom APL- 
character ROM and a self-adhesive keyboard label set to convert your TRS-80 
to include the APL character set. 



4 

9 

33 

213 



162.38 
$0.87 

510.62 
$9.21 



stsc 



One APL solution is: 

7 COST FOR JOB;ONCE:SP 
[1] 0NCE*-(J0B*1E38, .UJOB) /J08<-J0BlSP<-&J08l O 
[2J 'I1,CP/$/n2.2< QFMT 0NCB.il. 5] C0ST[SP>. 



JOB TOTAL ' 

'JOB- . =ONC£ 



Attn: APL* PLUS/80 Distribution 

STSC, Inc., 2115 East Jefferson Street 

Rockville, Maryland 20852 (301 ) 984-5000 (orders only) 

Yes, send me the APL*PLUS/80 System ($295* in U.S. and Canada). 

□ My check is enclosed. (Postpaid in continental U.S.) 

□ Charge my MasterCard Account * 

MasterCard Bank # 



Even if this kind of task is not among the problems you deal with, 
APL's ability to represent concise solutions can save you programming 
time and effort. 

There's more. Our APL allows you to read and write TRSDOS® files 
(such as VisiCalc* files) without leaving APL, even under program 
control. And you can direct arbitrary data from APL to the parallel 
port or RS232 port under APL program control. 

APL*PLUS/80 — A Complete Application Development System 

Would you like to have your TRS-80 reach out to the world beyond 
your desktop? Would you like to develop and deliver solutions faster 
and better for yourself or for your clients? Then you need APL* PLUS/8 



□ Charge my VISA Account # 



MasterCard/VISA expiration date 

Credit card customers add $4.00 postage and handling in conti- 
nental U.S. 

*Add applicable state and local sales taxes in CA, CO, CT, IL, MA, 
MD, MI, NC, NM, NY, PA, TX, WA. 
I'd like to know more about the APL*PLUS/80 System. 
□ Send me your free information package. 

Name 

Address 



City 

Phone ( 



State 



_) 



Zip 



APL* PLUS is a service mark and trademark of STSC. Inc., registered in the United States Patent and Trademark Office. VAX is a registered trademark of 
Digital Equipment Corporation. TRS-80 and TRSDOS are registered trademarks of Tandy Corporation. LDOS is a registered trademark of Logical Systems, Inc. 

VisiCalc is a registered trademark of VisiCorp. 
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Last Chance: Galaxy of 



DEMISE 




By Case from Acorn 
A fast-action space game that's very challenging! 
You must destroy the aliens with lasers and "smart 
bombs." Then, make your way carefully through a 
meteor storm and a rocky tunnel. Great sound ef- 
fects; keyboard control. 

16K Tape or Disk, $19.95 



KING 
OF THE 
JUNGLE 

By Vandewalle from Acorn 

An unusual combination of fast pinball action plus 
the challenges and dangers of an arcade game. 
Keep the ball in play, scoring points as it caroms 
from obstacle to obstacle, while wandering through 
the jungle searching for the hidden crown. And try to 
avoid the deadly Cobra. Lots of action, sound and 
fun! Choice of 3 screens. Can be used with Trisstick 
joystick. 

16K Tape or Disk, $19.95 




EVADE 




By Knight from Acorn 
You're in charge of the USS Krestan, an interstellar 
tri-ship. If you defeat the enemy aliens you en- 
counter, you get a chance to earn extra points by 
successfully docking with a larger ship. Then come 
the evil Malicians and dangerous meteor showers. 
Never a dull moment with this one! 

16K Tape or Disk, $19.95 



MYSTERIOUS 
ADVENTURE 

ARROW OF DEATH, 
PART1 

By Brian Howarth from Acorn 
Proper English only! This British import is Acorn Soft- 
ware's first adventure and it meets their reputation for 
high quality. The vocabulary you use in this adventure 
must conform to proper English standards— not the 
barbaric tongue spoken here in the colonies! You and 
Sorcerer Zardra must restore the kingdom from the 
engulfing sense of bitterness and ill feeling that 
forced the ruler to flee the palace. 

16K Tape or 32K Disk, $19.95 
Hint Sheet, $1.00 




PANIK 




By Demas from Fantastic 

An arcade style game of a fascinating future world 
with high-res graphics and voice. Filled with action 
and excitement; in machine language. 

16KTape, $19.95 32K Disk, $24.95 



ARMORED 
PATROL 




By Westmoreland & Gilman from Adventure 
As commander of a lumbering T-36 tank you have the 
firepower to destroy the enemy— if you can find them. 
They may be hiding behind the houses scattered about, 
the bleak terrain and your only view is thru the drivers 
port (your screen). Impressive animation in this ar- 
cade game. 

1 6K Tape, $1 9.95 32K Disk, $24.95 



COMPUTER 

FOOTBALL 

STRATEGY 

From Avalon Hill 

Exciting computer version of the famous board 
game. You'll have to think fast as you plan the offen- 
sive and defensive formations for your team. Play 
against the computer or a friend. 

32K Tape, $20.95 





ASYLUM 

From Med Systems ** 

You are sitting alone at 2 AM. Your eyes are bloodshot 

as you peer into your computer's screen and cry, "I 

must be CRAZY!" If this has never happened to you, 

you've never tried ASYLUM. It's Med Systems most 

ambitious 3-D graphics adventure yet! 

ASYLUM places you on a cot in a small (padded?) 

room. Periodically the janitor lobs a hand grenade 

through the window. What you do next could mean 

escape— or disaster. 



16K Tape, $19.95 
Also available: 

ASYLUM II 

16K Tape, $19.95 



32K Disk, $22.95 



32K Disk, $22.95 



STRIKE 
FORCE 




From Melbourne House 
You are the warrior-savior of cities under relentless 
alien attack. You're armed with rapid-fire missiles, 
radar and incendiary star-shells; but you'll need your 
fastest thinking and instantaneous response to pro- 
tect yourself and your people. Great real-time 
graphics! 

16K Tape, $15.95 32K Disk, $19.95 



PENETRATOR 




From Melbourne House 
Armed with missiles and bombs, you must fly your 
fighter to the enemy's cache of neutron bombs and 
destroy them. Your mission is in four stages, involving 
rugged terrain, caverns and manmade obstacles — not 
to mention enemy radar, missiles and paratroopers. This 
new departure in arcade gaming allows you to set up 
your own terrain and enemy emplacements, then save 
them for future use. Make your mission as hard or easy 
as you like. Joystick compatible. 

16K Tape or 32K Disk, $24.95 



SEA 
DRAGON 



~~~~~~J 


r ^lE£ 




L ..*^ """&**** 


- _*7 « — >"?■ 



By Westmoreland & Gilman from Adventure 
Underwater adventure is yours as you command a 
nuclear sub armed with deadly missiles and 
torpedoes. Guide it carefully through sea mines and 
underwater mountains; watch out for depth charges 
being fired by overhead ships. . .and don't run out of 
air! Scrolling sea bottom for added excitement. 

16K Tape, $19.95 
32K Disk, $24.95 



REAR 
GUARD 




By Neil Larimer from Adventure Int. 
A space battle between your cruiser and wave-after- 
wave of enemy ships. You can destroy them with 
your energy darts or you can ram them — as long as 
your shields are intact. The action takes place on a 
continuous horizontal landscape. You control the 
altitude and speed of your craft as you pursue the 
enemy. Skill level 1 is exciting, and there are four 
more levels available. 

16K Tape, $19.95 24K Disk, $24.95 



Over 1 500 Programs for TRS-80, 



ATARI 400/800, APPLE & IBM. 



For Information Call 
202-363-9797 

Visit our other stores: 

829 Bethel Rd., Columbus OH 

Seven Corners Center, Falls Church, VA 

W. Bell Plaza, 6600 Security Blvd., Baltimore MD 
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To Order Call Toll-Free 



800-424-2738 gg 



.TM 



MAIL ORDERS: Send check or M.O. for total purchase 
price, plus $2.00 postage & handling. D.C., MD. & VA.: add 
sales tax. Charge cards: include all embossed information 
on the card. 



4200 Wisconsin Avenue, NW, Dept. 14-01-3 Box 9582 Washington, D.C. 20016 



©1982 The Program Store, Inc. 
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CATERPILLAR 




From Soft Sector Marketing 
This is the fast-action arcade game you've been 
waiting to play at home! You must hit mushrooms and 
caterpillars — segment by segment — moths and tum- 
ble bugs. The challenges: they are all moving; when hit 
they split into additional segments or metamorphose 
into different shapes; when you destroy a caterpillar, 
the new one that replaces it is a segment longer than 
the original! 

16K Tape, $15.95 
32K Disk, $19.95 



HYPERLIGHT 
PATROL 





By Warren Green from Fantastic 
Realistic space conflict simulation with continuous 
projection map display that shows you complete 
globe of space around your airship: front, sides, 
back, above and below. Your ship — and the 
enemy's — can maneuver in 3-D space, and can 
move by hyperlight jumps. You can only learn by 
playing what are the best strategies and tactics for 
survival. "Talks" through cassette port. 

48K Disk, $19.95 

THE 

WYLDE 

Warriors 
of RAS, 
Vol.3 

By Masteller from Med Systems 
The newest in this fascinating series of adventure/ 
role playing games. You create the characters, then 
play the game, solving all its complex challenges. 
Save the games, and the characters. Characters are 
interchangeable among the 3 volumes. Machine 
language, great graphics. No "rules" to consult; no 
waiting for the computer. 

48K Tape or Disk, $29.95 
Also available: 
KAIV, Volume 2, 
48K Tape or Disk, 
$29.95 

BOUNCEOIDS 

From Cornsoft 
We're not sure what they are, but they're huge and 
dangerous! BOUNCEOIDS bounce off walls, and can 
kill with one touch. Your mission is to destroy them 
with your new class 4 annihilator. Then there are the 
terrible bugs coming out of null space to crunch you 
to smithereens. You'll need coordination, strategy 
and courage! Joystick-compatible. 

1 6K Tape, $1 5.95 1 6K Disk, $1 9.95 





SKYSCRAPER 

By Fine from Superior 
3-part maze game for the nimble-fingered. First, you 
must move through maze while avoiding barrels 
coming at you; second, you must look out for fires 
that break out randomly on screen; third, you ride 
elevators up and down from platform to platform. 
The sky's the limit. . .how far can you go? 1 or 2 
player game with sound; joystick compatible. 

32K Tape, $19.95 32KDisk,$21.95 



DEFIANCE 




From Fantastic 
The first talking space simulation! You're defending 
Starbase 12 during war between United Federation 
of Planets and the Klingon Empire. You have just 
been given command of the USS Defiance, and are 
authorized to take any action necessary to defend 
yourself and the Federation. "Talks" through cas- 
sette port; joystick compatible. 

48K Disk, $24.95 



DUNZHIN 

Warriors of RAS, 
Vol.1 




By Masteller from Med Systems 
The first adventure/role playing game to combine 
fast graphics, fast response time and complete com- 
puter implementation. DUNZHIN places you in a 
many-level dungeon, filled with demons and goblins. 
You must search for hidden treasures, but only one 
will win the game. In this series you create the char- 
acters, and can save them for future games, or use 
them in other volumes. 

48K Tape or Disk, $29.95 



LEAPER 




From Cedar Software 
Fast action, machine language game for one or 2 
players. Your frog must dodge traffic and cross river 
on fast-moving logs. Ready, set . . . LEAP! 

16K Tape, $15.95 16K Disk, $19.95 



INSTANT SORT/ 
SEARCH DATABASE 

By G. Hatton From Acorn 

A database program that allows the user to store a 
large number of files in the form of lists, and pro- 
vides the user a means to retrieve specific items of 
information from the file. Written in machine lan- 
guage, ISS can provide a multitude of sorts, sub- 
sorts, searches and categorizations in seconds. Be- 
cause the processing is done in memory, it is ex- 
tremely fast, and you can manipulate the data at will 
without risk to your database on tape or disk. (If fur- 
ther information is required, please call or write.) 

16K Tape or 32 K Disk, $49.95 




By Richard Wilkes from Acorn 

Using your Superscript modified Scripsit Word Pro- 
cessor and a compatible printer, you can now 
underline, boldface, insert text during printout, slash 
zeros, set type pitch, subscript and, of course, 
superscript! You can even read your directory and kill 
files without ever leaving Scripsit. 
Superscript comes with drivers for popular serial and 
parallel printers (now including Centronics 737 and 
RS Daisy II), and easy instructions for patching to 
your Scripsit program (does not include Scripsit). 

32K Disk, $49.95 Use Model I Scripsit 



MONEY 
MANAGER 




By Andrew P. Bartorillo from Acorn 
A complete management tool for the home budget, it 
keeps track of your checkbook and provides for easy 
budget allocation. You can store information on up 
to 100 checkbook entries per month (250 with 48K), 
specify automatic withdrawals, keep records of tax 
deductibles, record expenses by category, even 
break up charge account payments into the proper 
categories. 

32K Disk, $39.95 



POWER 
DRAW 

By Kim Watt from Powersoft 
A graphic screen editor that works with all major 
operating systems. Special features: graphics and 
text may be intermixed; screen may be saved to 
available memory buffers; buffers may be saved to 
tape or disk in 6 formats; single and double wide 
video are supported. With trace mode to constantly 
display cursor positioning; grid mode to aid in cen- 
tering figures on screen. Alpha joystick compatible. 

Disk, $39.95 




r ■■ 

[ THE PROGRAM STORE • Dept. 14-01-3 •Box 9582* 4200 Wisconsin Avenue, NW • Washington, D.C. 20016 1 



| Item 



Tape/Disk/Book 



Price Postage 
Total 



$2.00 
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□ CHECK D VISA 
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City 

Card#_ 
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Exp_ 
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REVIEW 



A Pascal for All Seasons 



by Bruce Powel Douglass 



• •*•• 

Alcor Pascal 

Alcor Systems 

800 W. Garland Ave. 

Suite 100 

Garland, TX 75040 

Models I and HI 

48K RAM, one disk drive 

Alcor Pascal System $199 

Advanced Development Package $125 

Manual $30 



> Alcor Systems has produced an en- 
hanced Pascal that thoroughly removes 
my reservations about Pascal being a 
serious applications programming 
language. 

Alcor Pascal is a compiled language 
that executes 10 to 20 times faster for 
most programs than interpreted Basic. 
It runs on all DOSes and comes on three 
disks for the Model I, and two disks for 
the Model III, including an 8K data- 
base program used for tutorial. It com- 
piles quickly and compiled programs 
can be sold without paying royal- 
ty fees. 

Alcor also provides a one-year service 
contract that includes upgrades and 
patches. A benefit of Pascal programs 
is that they are portable to other ma- 
chines, so that a program compiled 
under TRS-80 Model I will run with the 
CP/M run-time system for Alcor Pas- 
cal as-is. 

The Manual 

Alcor Pascal's 250-page manual is 
well organized and referenced, and the 
print is easy to read. It is divided into 
four main sections: Editor, System, Tu- 
torial, and Reference. 

The particularly outstanding sections 
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If procedure-oriented 
languages intrigue 
you, Alcor Pascal may be 
the answer to your needs. 

of the manual are the Tutorial and Ref- 
erence sections. The Tutorial can serve 
as a useful introduction or refresher to 
the world of Pascal. To learn the ins 
and outs will take a more in-depth treat- 
ment than is presented here, but never- 
theless, the tutorial, with all its examples 
and explanations, is certainly an aid. 

The Reference section is a complete 
reference on Alcor Pascal, including the 
standard Pascal procedures implement- 
ed, and the many enhancements. Each 
Pascal construct is explained, a short 
syntax diagram is given, and then ex- 
amples follow. 

The System section describes the sys- 
tem implementation on the TRS-80 
Models I and III. It discusses the proce- 
dures of compiling and linking com- 
piled code, as well as the compile-time 
error messages and the TRS-80 proce- 
dure and function library supported by 
Alcor Pascal. The Editor section shows 
the various Editor commands for the 
creation of Pascal source code to be fed 
to the compiler. 

The Programs 

The programs in the Alcor Pascal 
system work well. The Editor is a full- 
screen text editor. It is easy to use, al- 
though it is a little slow. I preferred to 
use my Newscript word processor to 
enter the Pascal programs, but for those 
without such a word processor, the 
Editor will come in handy. 

The Editor commands can be ac- 
cessed by either entering a command 



mode or by hitting certain predefined 
key sequences. The Editor supports 
quite a few options, such as full cursor 
movement (including tabbing right and 
left; scrolling up, down, left, or right; 
moving cursor to top of screen; and 
moving cursor to beginning or end of 
line), text deletion and insertion, and 
global modifications (including splitting 
and merging program lines, and 
searching and replacing strings). You 
can also insert special characters like 
hex 7B and 7D (curly brackets, which 
are used to enclose comments). 

Editor allows you to edit new or old 
programs, and the maximum size of 
your data file is limited to the free space 
on a single disk. Editor has an on-line 
help menu for any topic. Editor pro- 
vides a useful environment for the Pas- 
cal program development. 

The other programs of note are the 
compiler, the linking loader, and the 
run-time module. The compiler comes 
in two formats. The first format is a 
single program that compiles your 
source program into a compact format 
called p-code or pseudo-code. Pseudo- 
code is much more compact than the 
original program and executes much 
faster than Basic. The Advanced Devel- 
opment Package, described later, can 
take this code and optimize it (reducing 
it in size by 20 percent to 30 percent) or 
generate true Z80 machine code, which 
executes even faster than the p-code. 

The second format breaks up the 
compiler into several programs that use 
a common overlay area. This permits 
much more room for the symbol table 
generated by your source program dur- 
ing the compile process, thereby allow- 
ing much larger programs to be com- 
piled. The efficiency of the compiler 
and the compactness of the code is dem- 
onstrated by the fact that the compiler 
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The best and most complete book 
on TRS-80 Model I and Model III 
disk I/O available. 

"Machine-Language Disk I/O & 
other mysteries" by Michael Wagner. Volume 5 
of the popular ". . . and other mysteries" series 
published by IJG. 

More than 190 pages of information 
and discoveries on the subject of disk I/O for the 
beginner and expert alike, using Z-80 Assembly 
Language to directly control the TRS-80 Model 
I and Model III disk drives and interrupt 
systems. With this book anyone can become a 
disk I/O "expert", and make more efficient use 
of disk space, or to write his or her own "full 
blown" disk operating system! 

For the beginner and old pro'. 

Machine-Language Disk I/O & 
Other Mysteries is packed with source code and 
flow chart illustrations for every function and 
operation described. And the source code for 
two complete disk I/O driver routines, one for 
the Model I and one for the Model III, are also 
included for "instant" access to your floppy 
drive systems. 

Plus, the source code for a small disk 
operation system (S/OS) is included as a bonus. 
This S/OS contains all of the routines described 
in the book and shows how all of the disk I/O 
and interrupt functions should be incorporated 
into a working system. 

On machine language disk I/O. 

Machine-Language Disk I/O & 
Other Mysteries explains what the floppy drive 
system is all about, what Tracks and Sector are. 



the Western Digital Floppy Disk Controller 1771 
and 1793 chips, read/write access, reading a 
selected drives' status, how to test and make 
sure a disk is in a drive or if a drive is on the 
system (on-line), the Head Restore command, 
the Head Step and Seek commands, the 
"Force-Interrupt of function" command, the 
Read Address command, the Read Track 
command, the Write Track (FORMAT) 
command, the Read Sector command, the Write 
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Sector command, Post Non-Maskable- 
Interrupt Processing for the model III, and 
much more. 
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On TRSDOS file I/O 

and most TRSDOS-like operating systems, 
Machine-Language Disk I/O & Other 
Mysteries explains; what a disk file really is, 
what records are and how they're stored on the 
disk, creating a file, performing Direct Record 
I/O, performing Single Byte I/O, closing & 
killing files; error processing and TRSDOS 
error codes with their meanings, and much 
more. 

Plus many other handy programs, 
routines, and revelations are included. Such as a 
TRSDOS error message displayer, a disk 
formatter program, a program to calculate a 
password for a given encode, a object file 
load-format displayer, a file oriented full screen 
file editor, and a FULL BLOWN smart terminal 
program. 

Machine-Language Disk I/O & 
Other Mysteries is a must for all programmers 
at just $29.95. Available at computer stores, 
selected B. Dalton Booksellers and independent 
book dealers. If your dealer is out of stock, 
order direct. Include $4.00 for shipping and 
handling. Foreign residents add $11.00 plus 
purchase price, in U.S. funds. 



1953 West 
11th Street 
Upland, CA 
91786 (714) 
946-5805 




TM TRS-80 and TRSDOS arc registered trade marks of TANDY Corp. 
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itself is written in Pascal. It consists of 
over 8,500 lines of source code — and it 
still can execute in a 48K machine. 

It is simple to compile a Pascal pro- 
gram. After you have written your pro- 
gram, you can execute the compiler in 
either of two ways. The first way is by 
executing the DOS command Pascal 
Filespec, where Filespec is the source- 
code program to compile. Here, the 
compiler searches for FILESPEC/ 
PCL, sends the listing to the screen, and 
sends the object code the file 
FILESPEC/PCL. Using the second 
format of Pascal, you will be asked for 
the names of the source and object-code 
files, and will be asked where to direct 
the listing. 

Alcor Pascal has three default-device 
definitions that can be used. ':L' sends 
the listing to the line printer, ':C or 
Enter sends the listing to the screen, and 
':D' is a dummy device, used to discard 
output. Alternatively, you can output 
the listing to a disk file by specifying the 
name of the file. These default devices 
are available for all outputs from the 
Alcor Pascal system, including the com- 
piler, linker, and compiled programs. 

The ability to route the output of the 
program is handy not only for program 
execution, but also for looking at the 



compile process for errors. If many er- 
rors occur, printing the listing that is 
created during the compile process gives 
you a complete error listing with notes 
and arrows indicating the exact place 
each one occurred. Then you can take 
the printout and edit your source code 
to remove the errors. 

The compiler uses a single-pass, re- 
cursive-descent parser that operates 
quickly. Variable names can be eight 
characters in length and use the same 
amount of space regardless of length. 
This is handy, so you can use long vari- 
able names, to aid the readability of 
your programs. How many times have 
you wondered what QZ was? Now, you 
can use a descriptive label, such as 
Total, Result, or Seedcost for variables 
without increasing the size of the pro- 
gram and without increasing its run- 
time. Variables can include the charac- 
ters "$" and "-" in their names. 

The compiler supports several op- 
tions. There are compiler directives that 
tell the compiler to use double precision 
for all real numbers, or change the be- 
havior of looping variables, conditional 
compilation, to disable code generation 
(used to build libraries), and more. 

It is nice to have double precision, but 
the manual does not state that the tran- 



scendental functions are single precision 
regardless of the declared precision. 
This is because Alcor Pascal uses ROM 
routines wherever possible, and they are 
single precision for these functions. Of 
course, with Alcor Pascal you can 
create libraries with your double- 
precision transcendental subroutines 
and link them with your compiled pro- 
grams as desired. 

Conditional compilation is very help- 
ful for program development. It allows 
you to specify a Boolean variable and 
use the value of this variable to control 
the compilation of parts of the source 
code. For example, you can have de- 
bugging routines throughout your 
source code that you do not want to be 
in the compiled program after the pro- 
gram is debugged. One way to get rid of 
them is to remove each occurrence of 
the debugging code. With Alcor Pascal 
you can preface each debugging routine 
with a conditional compilation state- 
ment and by changing the value of a 
single variable at the start of your pro- 
gram, you can eliminate all the debug- 
ging code from the final compiled pro- 
gram. Once you get used to using this 
kind of debugging procedure, it is sorely 
missed in other languages. 

The Nullbody compiler option can 
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ULTRA TERM 

COMMUNICATIONS SYSTEM 

Ultra Term includes both a full fea- 
tured intelligent terminal program, 
and a self relocating host program, 
at prices one half to one third of 
the competitors'. 

* Exclusive direct to disk file 
transfer capability permits full 
control from the transmitting 
computer, so no one is required 
at the receiving computer. 

* Unique split screen feature allow: 
simultaneous two way communicatio 
eliminating the confusion caused 
by incoming text mixing with what 
you are typing. 

* Supports auto dial modems with an 
easy to use telephone directory. 

Requires Model 1 or 3 with 16K, one 
disk drive, RS-232 port, and modem. 

Regular price: $79.95 
USA Special price: $59.95 
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734 FLAMINGO WAY 

NO. PALM BEACH, FL 33408 

(305) 845-4606 (305) 965-3496 



CO-DIR 

CURSOR ORIENTED DIRECTORY 

YOUR DOS CONTROLS YOUR FILES, 
LET CO-DIR CONTROL YOUR DOS! 

CO-DIR 2.0 is a utility that 
allows file manipulation and DOS 
command execution from a directory 
display with only one or two key 
strokes. You can scroll through 
the directory with the arrow keys 
like a word processor. CO-DIR 2.0 
is not a program you will use only 
once, since any DOS command can be 
entered faster and easier using 
CO-DIR. Dos commands available 
from CO-DIR include Execute 
program, Copy, Chain/Do, 
Directory, Free, Kill, List, Load, 
Print and Rename. 

CO-DIR requires Newdos-80 or 
DOSPLUS with Cat command. 
(Specify DOS and Model) 

Regular price: $49.95 
USA special price: $39.95 
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BULLETIN BOARD SYSTEM 

This package contains all the 
software necessary to setup and 
operate a Bulletin Board System 
(BBS). The system will auto- 
matically answer phone calls, 
print a welcome message, ask for 
the callers name and location, and 
prints bulletins or advertise- 
ments. The system then allows the 
caller to leave messages for other 
callers, and read or delete 
messages addressed to them. The 
system supports downloading of 
program and text files, and has a 
chat mode to allow the caller to 
type directly to the System 
Operator (SYSOP). 

Requires TRS-80 Model 3 (or Model 
1 with a double density adapter), 
two disk drives, 32K RAM, an 
RS-232 interface, and any auto 
answer modem. 

Regular price: $149.95 
USA special price: $99.95 



DEALER INQUIRIES INVITED - ACCEPTING SOFTWARE FOR REVIEW 
24 HOUR BBS ON LINE AT 305-965-1044 ^-332 
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VIZ. A. CON 

A CONSOLIDATION SYSTEM 

for VISICALC users 

New product adds 3-dimensionai 
capability to any VISICALC model 

Now with the help of VIZ.A.CON you can combine 
multiple "'pages" of data from a model for heirarchical 
consolidations (eg. Dept., Div., Co.) or for summations 
over periods of time (eg. Week, Month, Quarter, Year- 
to-date). 

Typical uses are to combine weekly sales reports or 
departmental budget data. You can create a complete 
network of consolidaton processes and modify it any 
time (eg. for Merger & Acquisition analysis). 

Special formulas (eg. ratios, percentages) can be 
recalculated after any consolidation. VISICALC 
precision is maintained for all data. You can customize 
titles, row and column headings, footnotes, etc, for 
each report. 

VIZ. A. CON creates data files usable with VISICALC. 
After VISICALC "what if" games, use VIZ. A. CON to 
find out what happened. 



Apple ll/ll +, TRS-80 l/lll Apple III.TRS-80 II.IBM PC 
$89.95 +$3.95 shipping $1 1 9.95+$3.95 shipping 
Toll Free 24-hr. service 800-547-5995 (Ext. 1 70) 
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■Visa/Master Card- 



Or mail Check to: 
ABACUS ASSOCIATES 

Suite #240, Dept. 101 

6565 W. Loop South, Bellaire, TX 77401 

"Creating Simple Solutions to Complex Problems" 




colob computer NEW SOFTWARE 

■ for TRS 80 Model III 
and the Color. Computer 



PROGRAMMABLE 

SOUN D 



MODULE 



AT LAST — the COLOR COMPUTER'S 
audio capabilities even SURPASS its 
great graphics! If you can program in 
BASIC — plug in the PSM cartridge 
and start to create life-like explosions, 
engines, animals, wind, water and other 
sounds limited only by your imagination. 
Complex sound effects are continuously 
maintained independently of your 
program. The PSM Is a power-packed 
hardware/software combination and 100% 
compatible with ALL models of the 
Color Computer. 

PSM -f complete instructions -$ 98-95 
Available from: 

MAPLE LEAF SYSTEMS 

P.O.BOX 2190, STATION C , Downsview 
Ontario, CANADA M2N 2S9 ; ,y2 



■ Church Contribution System 

designed to simplify and facilitate the tedi- 
ous chore of recording envelopes. Provides a 
variety of reports. Maintains its own data- 
files. n| y$150 

■ Data Base Manager 

designed to help organize all your data and pro- 
vide you with meaningful reports. Add or delete 
any information New files can be created and 
old information transferred. Only $150 

■ Single Entry Ledger 

designed as an uncomplicated control of 
finances for home or small business. Add, de- 
lete, edit at any time. Compatible with 
DBM. Only $95 

Write or phone for complete software price list. 




2457 Wehrle Drive 
Amherst, NY 14221 
716/631-3011 



DO YOU HAVE 2 PRINTERS? 




Now you can have 2 PRINTERS ON-LINE at all times. 
Our MODEL 80 LINE PRINTER SWITCH is designed 
for the TRS-80 computer to allow the user to easily 
select between two printers by means of a conven- 
iently located switch without changing cables. Our 
compact module connects to the parallel printer port 
of your Model I, Model II, or Model III through a printer 
port extension cable and provides a card-edge con- 
nector for each of your two printers. Gold plated 
contacts ensure excellent connection reliability. Our 
Model 80 switch comes assembled, tested, and ready 
to use for the low cost of $40 including shipping to 
any U.S. destination. A printer port extension cable is 
available from us at a cost of $12.50 for the Model 
l/lll or $20 for the Model II. Call now for more informa- 
tion. Request application note AN-821 for Model 
l/lll use or AN-822 for Model II use. 



jr \J\/\/lrhf signalling inc." 
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P.O. Box 17510, Kansas City, MO 64130 
1-816-931-4448 



TOLL FREE 1-800-831-4448 



cH^^B 



TRS-80 MODEL I™ 
GOLDPLUG-80 

Eliminate disk re-boots and data 
loss due to poor contact problems 
at card edge connectors. The 
GOLD PLUG - 80 solders to the 
board card edge. Use your ex- 
isting cables. 
CPU/keyboard to 

expansion interface $18.95 

Expansion interface to disk, prin- 
ter, RS232, screen printer 

(specify) $9.95 ea 

Full set, six connectors. . . $54.95 



EAP COMPANY 

P.O. Box 14, Keller, TX 76248 

(817)498-4242 

*TRS-80isa trademark of 

Tandy Corp. 
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PUT YOUR COMPUTER 

TO WORK SAVING $$ 

EVERY TIME YOU BUY 

GROCERIES!! 

QSQRT 

is a fast, menu driven assembly 
language program Chat keeps track 
of up to 1 clOO store coupons Enter 
your shopping list and QSORT locates 
every usable coupon within seconds 
A special filing system speeds 
physical retrieval of any coupon to a 
few seconds.. 
Comprehensive manual 
Satisfaction Guaranteed or your 
Money Back 

Specify Model I or III 

cassette on disc S39.9Q ppd 

(Calif residence edd 6%) 

BV ENGINEERING "' 74 

P.O. BOX 3351, RIVERSIDE. CA 32519 
(714) 731-0252 



-THOR symbol of new power for your Model l/lll Computer 



THOR INTERNAL MODEL III 

DISK DRIVES 

All the hardware and easy directions to install one or 

two drives— With TRSDOS*— (NEWDOS" for dual 

drives) 

Kit containing one/two drives. 

Single 40 $449/$ 649 

Dual 40 $599/$ 875 

Dual 80 $725/$1125 

THOR WINCHESTER SPECIAL 

DISK SYSTEM PRICE 

One or two drives — Price includes one drive with NEW- 
DOS-80*, case and power supply — Slot for second 
drive 

4.5 Megabyte $1799 

9 Megabyte $1999 

13.5 Megabyte $2299 

18 Megabyte $2499 



THOR NETWORK CONTROLLER 

Connect up to 254 computers of most any make over 
as much as 5000 feet of cable— Share 4.5 to 60 mega- 
bytes or more of disk storage — Call for additional infor- 
mation and prices. 



CALL 1-800-641 -3885 
for orders onl 




For technical information 

or in Colorado call 

303-337-5909 

UlMS Western Micro Systems 
• 2760 South Havana, Suite S • 
Aurora, Colorado 80014 

•TRSDOS is a trademark of Tandy Corp. and NEWDOS-80 is a trademark of Apparat, Inc. 
Prices are cash — Visa/MasterCard/American Express/COD available on request 
— bmmmi — — m Dealers enquiries welcome -^^^^^^^^^^^^^ 



THOR DIGITAL PORT 

14 IN and 15 OUT— Each port a full 8 bits— Connector 
to attach to Model l/lll bus — Complete with cable and 
case — Requires 5 volts at 150 ma. 
Assembled and tested 

For Model I Only $ 29.95 

For Model III Only $ 34.95 

THOR VERBOARD 

Add a separate control computer to your Model III (For 
Model I requires above Model I Digital Port) — Verboard 
attaches to the Model l/lll bus— Operates indepen- 
dently while your Model l/lll performs other tasks — Has 
provision for 8K RAM or 16K EPROM— 8 input and 8 
output parallel ports as well as two serial ports are 
included. 
With a detailed manual 

Kit with 1 K RAM $ 99.95 

Assembled and tested $129.95 

EPROM Basic for 
simplified programming $ 49.95 
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disable code generation for a pro- 
cedure, function, or program. This op- 
tion lets you compile just the procedures 
used in a program without compiling 
the program itself, and in this way, you 
can build and compile subroutine 
libraries. 

The Alcor linking loader enables you 
to build self-contained /CMD files, and 
create procedure and function libraries 
of commonly used routines and link 
them with compiled programs. 

The run-time module contains all the 
machine-language subroutines needed 
to interpret and execute the p-code in- 
structions. If desired, the linking loader 
can create a command file so that a sep- 
arate run-time module is not needed. 
Generally, you will have a compiled 
program on disk with the file extension 
/OBJ if created by the compiler, /OPT 
if processed by the Optimizer, and 
/COD if turned into native machine 
code by CODEGEN (more on the latter 
two programs later in the section on the 
Advanced Development Package). To 
run these files, execute the command 
line RUN filespec <stack> . The file- 
spec names the compiled object code 
file to be executed. The stack parameter 
is optional, and specifies the amount of 
stack space allocated to the program. 



When the program terminates, the 
memory location at termination and the 
amount of stack and heap space are 
displayed. 

The Language 

Alcor Pascal is a complete implemen- 
tation of Jensen and Wirth Pascal plus 
many enhancements. In order to ap- 
preciate the enhancements, you must 
understand a little bit about standard 
Pascal. 

Pascal was developed to be a begin- 
ner's language and approaches pro- 
gramming differently than Basic. It 
lends itself to writing readable programs 
and many programming problems that 
seem difficult in Basic are easier in 
Pascal. 

When you write a Pascal program, it 
is not a collection of GOSUBs and 
GOTOs. It uses named functions and 
procedures to perform tasks. Thus, 
Pascal aids the conceptual development 
of a programming task. To program in 
Pascal, you can use either top-down or 
bottom-up style. In top-down program- 
ming, you develop the main program 
first and use black boxes called proce- 
dures and functions and build the pro- 
gram from the overall program into 
smaller and smaller problems, solving 



each one at a time. In bottom-up pro- 
gramming, you decide what pieces you 
need and build them, and work your 
way up to the overall program. 

In either case, it is better than the 
usual blustering bombshell approach 
taken by many Basic programmers. 
Pascal allows you to develop the prob- 
lem conceptually and then allows you to 
easily translate the conceptual solutions 
into procedures and functions. That is 
why Pascal is called a procedure-orient- 
ed language. So the difference between 
Pascal and Basic is primarily one of 
philosophy. 

Pascal has other niceties, too. You 
can define your own variable types, 
such as Color = (Red, Black, Blue). A 
powerful data type is the Record. In Ba- 
sic, if you have a data base with custom- 
er's name, age, address, and so on, the 
typical procedure would be to store 
them in separate arrays; use a string ar- 
ray for the names, an integer array for 
the age, another string array for the ad- 
dress, and so on. In Pascal, you can de- 
fine Record to contain all the data. You 
might think of it as a more general-pur- 
pose type of array. 

Pascal has several looping constructs, 
whereas Basic has only one: the For . . . 
Next loop. In Pascal, you can have 



NEW! From QSC . . . 



RIVET RACE 



The latest arcade craze now runs, 
on your TRS-80*. Ladders and 
elevators take you from level to 
level in this fast action machine 
language game. RIVET RACE is 
Alpha Joystick** compatible. 

For TRS-80*, Models I & III 




.BIBDCH 



MINDWARP 



An educational game that improves 
your memory skills. 

32k Tape $14.95 

32k Disk $18.95 

Mo. Res. Add 4.625% Sales Tax 

— Dealer Inquiries Invited — 

QUALITY SOFTWARE AND 
CONSULTING, INC. „34 

P. 0. Box 11355 

Kansas City, Missouri 64112 

(816) 765-4297 

*TRS-80 Trademark Tandy Corp. 
♦•Trademark Alpha Products 



ESTATE PLANNING MODEL ^^— 
SAVE TIME AND MONEY 

by using your TRS-80* Model II, 64 K computer 
for professional estate analysis. 

ft Marital Deduction Formula Analysis Reports 

analyze six formula bequests for both husband 
and wife for both orders of death. 

ft Estate Tax Return Report computerizes estate 
tax planning for decedents' estates. 

ft Client-Ready Reports printed. 

ft State (Ohio) and Federal Taxes computed. 

ft Free Updates to reflect legislative changes 
for one year. 

ft Sold and maintained by author: an attorney 
and estate planning professional. 

ft ALREADY REVISED to comply with 1981 
TAX REDUCTION ACT. 

YES, please send me more information on the 
Estate Planning Model. 

Name 

Name of Firm : 

Street 

City 



State 



Zip 



Mail to: Beard Software Development Co. 
59 Skyline Avenue 
Canfield, Ohio 44406 



"TRS-80 is a trademark of Tandy Radio Shack. 
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For . . . Next, Repeat . . . Until, and 
While. Almost all jumping constructs, 
like GOTO, can be replaced with these. 
One thing I don't like about Pascal's 
For . . . Next loop is that the only 
variable type allowed for the loop is in- 
teger, and you can only increment (or 
decrement) by one. This is more than 
made up for by the other looping con- 
structs, however. 

Pascal also has more conditional 
statements. Not only is there the ever- 
popular If . . .Then, but there is also 
Case, which allows you to easily direct 
program flow when a number of condi- 
tions exist. A major fault of standard 
Pascal is that if none of the cases is met, 
the program will bomb. Alcor does it 
right, and includes an Otherwise clause 
to take care of all other cases to keep the 
program from bombing. 

Another thing I don't like about stan- 
dard Pascal is the pedantry of the lan- 
guage. For example, if you have an inte- 
ger variable A and a real variable B, you 
cannot just set B : = A, because they are 
different types. You must use a transfer 
function to move the values. Alcor Pas- 
cal allows you to cross-type your vari- 
ables and use an assignment statement 
to move the value from one type of vari- 
able to another. You can readily cross- 



type from Integer to Real, but you can- 
not easily cross-type Real with Pointer. 

Although a few Disk Basics (such as 
MULTIDOS's Superbasic) support dy- 
namic variables, microcomputers gen- 
erally lack it. Typically, once a variable 
or an array is created, it sits around in 
the variable table and in memory taking 
up room, even though you may need 
the space for something else. You can 
Clear the variables, but you cannot de- 
lete a single array, or just a few strings. 
Pascal lets you do just that. 

You can request a new storage loca- 
tion for a variable by invoking the Pas- 
cal procedure New. The procedure Dis- 
pose frees that memory. It does this 
through the use of a special variable 
type called Pointer. This is useful when 
you don't know ahead of time the 
amount of memory that a program will 
require. Also, you can use these pointer 
variables to link a list of items (which 
may be any variable type), creating a 
linked list. 

The memory space used by New and 
Dispose is called the Heap. The rest of 
nonprotected memory is used by the 
stack. You can specify the relative 
amounts of Heap and Stack used by the 
program at run time by entering RUN 
filespec <stack>. The stack informa- 



tion is optional. The default is to use 
half the free memory for the stack and 
the other half for the heap. If you don't 
use much heap, then you might want to 
let the stack have more of the free mem- 
ory space. 

Alcor Pascal supports TRS-80 graph- 
ics functions PEEK and POKE, IN- 
KEY$, and INP, OUT, easy access to 
machine-language subroutines, plus a 
full complement of string functions. 
The graphics routine has what I consid- 
er to be a small bug, although the sys- 
tems programmer I talked to at Alcor 
disagrees with that assessment. If you 
set a point on the screen and the screen 
has not been cleared with ClearGraph- 
ics, then spurious points are also set 
besides the one you asked for. The fix 
for that is easy. You simply check the 
byte to see that it is in graphics mode 
before ORing in the new pixel to be set; 
if it is not, then stuff an 80H there and 
then proceed. However, the Clear- 
Graphics command will work also. 

The User function is similar to USR 
in Basic and passes the value to the HL 
register pair. Even better is the CALLS 
function that allows you to set all the 
registers from Pascal. 

IOSERROR, HPSERROR, and 
FILESSTATUS allow you to recover 
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from I/O and heap errors without the 
program crashing. This is one of the 
changes necessary to make Pascal a real 
programming language. 

Alcor Pascal has all the string func- 
tions of familiar Disk Basic plus a few 
more, such as compare two strings, de- 
lete characters in the middle of a string, 
insert a substring into the middle of a 
string, and replace a substring in the 
middle of a string. For standard Basic 
programmers, these functions are great! 

Advanced Development Package 

The Advanced Development Pack- 
age (ADP) is another incredibly useful 
tool for program development. It con- 
sists of two programs (Optimize and 
CODEGEN) and a data file. 

Optimize takes your compiled p-code 
program and optimizes it for space. 
You will usually see an increase in 
speed of the program, but it is not 
generally that significant. For long 
programs (greater than 1,000 lines) 
or for programs that use a lot of space, 
this program can make the difference 
between having a working program and 
a failure. 

CODEGEN performs essentially the 
same compaction as Optimize, but then 
goes on to produce native Z80 machine 



code. Normally, this increases the size 
of the program by a factor of two or 
three, and speeds up the program by a 
factor of three to five. CODEGEN pro- 
duces machine-language code, but it 
also produces Assembly-language 
source code if you wish. Unfortunately, 
the source code is in extended 8080 
mnemonics. 

One little trick that CODEGEN 
allows is that you can compile a dummy 
procedure and then CODEGEN it. 
Then take the object code output from 
your editor/assembler and insert it into 
the dummy procedure. The compiler 
and CODEGEN generate the appropri- 
ate addresses and provide the structure 
for easy insertion of machine-language 
routines that actually perform the func- 
tion of the procedure. 

Both these programs are great, but 
what about big, bulky programs? Of- 
ten, in these types of programs, a small 
section of code is slowing down the rest 
of the program. Through the use of the 
linking loader, you can link CODE- 
GENed files with Optimized files and 
have a small and much faster program. 
Remember that the linking loader al- 
lows you to create subroutine libraries 
and link the various parts of a program 
together. It turns out that through judi- 



cious design, you can CODEGEN cer- 
tain of your compiled modules, Opti- 
mize others, and use the linking loader 
to bring both together into a single ap- 
plication program. The net result of all 
this is that the Advanced Development 
Package lets you create smaller and 
faster versions of an already fast com- 
piled program. If you program for a liv- 
ing, the Advanced Development Pack- 
age is for you. 

Alcor Pascal is an excellent imple- 
mentation of an enhanced Pascal. It has 
an excellent manual, complete with a 
usable tutorial, reference guide, and 
system-implementation source. Alcor 
Pascal comes with its own full-screen 
text editor and linking loader. It has 
many important enhancements includ- 
ing graphics, port I/O, double-preci- 
sion arithmetic, many string and other 
TRS-80 functions, plus patches to allow 
random-access records, and error trap- 
ping. This is the first serious Pascal I 
have seen. In terms of the power of the 
language, it is in the same league as Mi- 
crosoft Basic, and is more efficient in a 
number of aspects. ■ 

Bruce Powel Douglass, 80 Micro 's 
"Copernica Mathematica" column- 
ist, can be reached at 1005 W. Main 
St., Vermillion, SD 57069. 
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TUTORIAL 



How to Copyright 



by Anthony T. Scarpelli 



It's sad but true — some people have 
no qualms about using the results of 
your programming efforts for their own 
benefit, without compensating or even 
acknowledging you. You are the loser, 
of course, unless you protected those ef- 
forts. That's where copyrights come in. 

I'll tell you a little about copyright, 
how to get the necessary forms, what to 
do with them, and show you what an 
easy process it is to get Uncle Sam to 
help protect the programs you write. 

Your Rights with a Copyright 

On January 1, 1978 the Copyright 
Act of 1976 (title 17 of the United States 
Code) came into effect. The first gen- 
eral revision of the law since 1909, this 
act defines copyright and the copyright 
system. 

A bill (HR 6933) that became Public 
Law 96-517 in December 1980 amended 
title 17. Both the revision and the 
amendment had an enormous effect on 
computer programmers — now pro- 
grams could be copyrighted. In addi- 
tion, owners of programs are autho- 
rized to make copies if it is essential to 
the program or for archival purposes. 

But what is a copyright? A copyright 
gives you, the original author, the right 
to reproduce, prepare derivative works, 
and distribute by sale, rental, lease or 
lending the copyrighted material. If 
anyone else does any of the above with- 
out your permission, you have the right 
to take that person to court. 

The interesting thing about copyright 
is that your work is protected as soon as 
it is placed in a fixed form. When you 
produce a listing of your program on 
paper, disk or tape, you are protected. 

However, if someone hires you to 
write a program, or if your everyday job 
is to write programs, then the pro- 
grams, the copyright, and its protection 
belong to the person who hired you or 
to your company (unless you made pre- 
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You've worked hard on 
your program and you 
want to protect your code 
from theft, but how? 



vious agreements). And if you write a 
program with someone else, you are co- 
owners of that program unless you 
agree to the contrary. If you make pre- 
vious agreements, they should be in 
writing, dated, signed by both parties, 
and (if possible) notarized. 

Before the Copyright Act of 1 976 you 
could secure a statutory copyright just 
by publishing your work and including 
a notice of copyright on it. Now, pub- 
lishing is not necessary. There are, how- 
ever, certain advantages to having your 
work published. 

Any time you publish a work, it must 
have on it a notice of copyright: the 
copyright symbol (the letter C in a cir- 
cle), the word "Copyright," or the ab- 
breviation "Copr."; the year of first 
publication; and the name of the copy- 
right owner. For example, Copr. John 
Doe 1982. 

Works published with the notice of 
copyright are subject to mandatory de- 
posit with the Library of Congress. You 
must send the Copyright Office two 
copies of the work within three months 
of publication. (Failure to do so can get 
you a fine or other penalties.) Just 
think — your own version of Star Trek 
can reside among the other famous 
works in this great library! 

If your work is unpublished, the 
copyright notice is not required. If the 
work leaves your control, it is a good 
idea to include the notice. For instance, 
if you send your newly created program 
to an acquaintance for review before 
publication, that little notice might per- 



suade that person to only review it and 
not copy it. 

If notice of copyright was inadver- 
tently left out of a published work, you 
have five years from first publication to 
try, with reasonable effort, to put that 
notice on all the copies distributed to the 
public in the U.S., though the copyright 
still exists for those works. 

Some Other Requirements 

Your copyright is a personal-property 
right. This means state laws and regula- 
tions can affect it. If you want to will 
your copyright to someone, or transfer 
the rights to someone else, you should 
consult an attorney. Also, any transfer 
of exclusive rights has to be in writing 
and signed by the owner of the rights (or 
the owner's agent). These transfers are 
usually done by contract, and when 
done, although not required, should be 
recorded in the Copyright Office. You 
should write to the Copyright Office for 
information on recording the transfers, 
and on transfers in general. 

What about protection in other coun- 
tries? Although there is no international 
copyright, the U.S. is a member of the 
Universal Copyright Convention 
(UCC). A member can thus claim pro- 
tection under the UCC as long as the 
work bears the notice of copyright in 
the form and position specified. 

However, before publishing in an- 
other country, find out exactly what 
protection exists in that country. Some 
countries offer little or even no protec- 
tion for foreign works. Circular R38a 
lists countries that maintain copyright 
relations with the U.S. 

Unpublished works are always pro- 
tected regardless of the citizenship or 
domicile of the author. 

Ready, Set, Register! 

The persons legally entitled to submit 
a registration application form are the 



author, the employer or other person 
for whom the work was prepared, the 
copyright claimant (the person or or- 
ganization who has legal title to the 
work), the owner of exclusive rights, or 
any authorized agent of any of the 
above. And you don't need a lawyer to 
register. 

What you do need is Application 
Form TX from the Copyright Office, 
Library of Congress, Washington, DC 
20559. When ordering the form, be sure 
to ask for instructions. Also request 
Circular Rl, "Copyright Basics." This 
particular circular contains all the im- 
portant information you need to know 
about copyrighting, and was the source 
of the information in this article. The 
forms and circular are free. 

Added Protection 

Even though your works are protect- 
ed by law when they are put into a fixed 
form, and even though they might be 
published, the process of registering 
them with the Copyright Office gives 
you certain advantages. For instance, a 
registered work establishes a public rec- 
ord of the copyright. It is also usually 
necessary to have your work registered 
before you can file any suits. If you reg- 
ister your work within five years of pub- 
lication, it will indicate to the court that 
your copyright and the facts stated in 
the registration certificate are valid. 

If you can register your works three 
months after publication, or prior to an 
infringement of your work, you will be 
able to collect both attorney's fees as 
well as damages in court actions. You 
can register a work any time within the 
life of the copyright and collect damages. 

How long does a copyright last? The 
life of the copyright is the total length of 
time you are protected. Any work put 
into fixed form after January 1, 1978 
will be protected for the life of the 
author plus 50 years. If two or more 
authors are involved, then protection is 
good for 50 years after the death of the 
last surviving author. If the work was 
made for hire, or if it was anonymous 
or if you didn't put your name on it or 
used a pseudonym (unless your true 
name is in the records), then the dura- 
tion of the copyright is 75 years from 
publication or 100 years from creation, 
whichever is shorter. 

A work created before 1978, but not 
published or registered, is automatically 
brought under the new law's protection. 
If the work was previously published or 
registered, you have to renew it to re- 
ceive the added protection. Since the 
change can cause confusion in what is 
and what is not protected, Circulars 
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R15a, R15t, and R22, available from 
the Copyright Office, provide more de- 
tailed information on this subject. 

Form TX is not difficult to fill out; 
just print or type the information. 
There are three pages to the form, with 
the instructions attached to both sides 
of the page you fill in. There is also a 
continuation form if you need more 
space, but the instructions discourage 
using it. 

When you send the completed form 
TX, you must also include two copies of 
the work if it has already been published 
(if it hasn't been published, only one 
copy is required). If your work is a com- 
puter program, the copy should be a 
printed listing of the program. It's a 
good idea to include your name on each 
page, and also number them. 

There is a cost for the registration 
process, so you must also include a 
check, money order, or bank draft for 
$10 made out to the Register of Copy- 
rights, and securely attach it to the ap- 
plication. 



It will take about three weeks to get 
the forms, and about a month after 
mailing the forms, you will receive the 
certificate of registration. This is merely 
a photocopy of the form TX you filled 
out, but now with an official seal, an of- 
ficial signature, and a number on it. 
You must refer to this number if you 
ever have to do any other business with 
the Copyright Office concerning this 
work. This is a legal document, so keep 
it in a safe place, and also keep a copy 
of the work you created with it. 

This simple process gives you the pro- 
tection you need. However, if someone 
copies your work without permission, 
and you want to initialize a court action, 
get a good copyright lawyer. If you do 
go to court, the key to winning or losing 
could be the copyright symbol. ■ 



Anthony Scarpelli can be reached at 
98 Foxcroft Drive, Scarborough, ME 
04074. 
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Planetary Orbits 



by Don Carrera 



I 



f you're interested in knowing a planet's 
location at some time in the past or future, 
use this program to calculate its position. 



Here's a program that tells you the 
location of the planets so you don't 
have to look up their positions in the 
Astronomical Almanac. Would you 
like to find out where the planets will be 
several years from now? If so, you 
should enjoy this program. It finds 
planet positions from 1500 A.D. to 
2460 A.D. 

The results have to be compared 
against a source. When the positions of 
more than two bodies are needed, you 
can obtain accurate answers by solving 
a system of differential equations. For 




— ECLIPTIC 



P — Planet at perihelion 

1 — Inclination 

VE — Vernal equinox 

AN — Longitude of ascending node, measured in 

plane of ecliptic 

oj — argument of perihelion, measured in the orbit 

plane 

PER — Longitude of perihelion 

Q — Ascending node; intersection of orbit with the 

ecliptic going from south to north of the ecliptic 



our solar system, you'll need at least 
nine equations, one for each planet. 
Usually, you'll need to solve more equa- 
tions, because some of the larger aster- 
oids are included. In addition, the Earth 
should be represented as the Earth- 
moon system, with its center of gravity 
located about 3,000 miles away from 
the true center of Earth. The sun and 
planets should not be modeled as 
spheres but as ellipsoids. 

Solving this system requires more 
than the 16K of memory for a Basic 
program. A home computer would be 
slow at getting results, too. It's slow be- 
cause to find a planet's position at any 
time, you must find its position at all in- 
tervening times. So, to find Jupiter's 
position in 1750 A.D., you have to find 
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Fig. I. Orbit Elements 
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Planet 


Degree of Error 


Mercury 


.023 


Venus 


.028 


Mars 


.019 


Jupiter 


.010 


Saturn 


.008 


Uranus 


.007 


Neptune 


.007 


Pluto 


.008 


Table 1. The combined maximum degree of 


error for the four 


types of errors. 



where it was in 1981, 1980, 1979, and so 
on, preferably at 1-10 day intervals. 
That makes for a lot of computing. 

Solutions to these equations have 
been done on large computers, going 
backward and forward hundreds of 
thousands of years. These solutions give 
near-term accuracies (tens to hundreds 
of years) of .0000001 degrees in longi- 
tude for the inner planets. Mutual Oc- 
cupations of Planets: 1557 to 2230 pro- 
vides the positions for several different 
planets at widely spaced times. It gives 
an exact time for the location of two 
planets when seen from the Earth. I 
have checked planet locations from this 
program against data in the Astronomi- 
cal Almanac (formerly Ephemeris) for 
various dates in 1935, 1953, 1963, 1971, 
1980, and 1981. 

The Comet Halley Handbook, an 
Observer's Guide gives positions for 
Halley's comet from 1981 to 1987. I 
used it to check my calculations. For 
dates within a few years of 1982, pro- 
gram errors are less than .2 degrees in 
heliocentric longitude for the planets. 

Orbit Theory 

The plane of Earth's orbit around the 
sun is called the ecliptic. It provides the 
reference plane for determining a 
planet's heliocentric latitude. The point 
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at which the sun appears to cross Earth's 
orbit is the vernal equinox. This is the 
zero reference point for measuring helio- 
centric longitude. The distance of a 
planet from the sun is given in terms of 
astronomical units. An astronomical 
unit is the mean distance of Earth 
from the sun and equals about 92.9 mil- 
lion miles. 

If the sun and only one other planet 
existed, that planet's orbit would be an 
ellipse. Since more than one planet ex- 
ists, the true orbit is a "bumpy" ellipse. 
Not only does the sun attract planet A, 
but planet B also attracts planet A, with 
the sun's attraction being stronger. The 
resulting is considered an ellipse with 
many small bumps or perturbations. 

To completely describe a body's posi- 
tion in space, you need six constants. 
Three constants determine the body's 
position in its own orbit. Three other 
constants show the orientation of the 
orbit with respect to the chosen coordi- 
nate system. 

The orbit in space is defined by its in- 
clination to the ecliptic, the longitude of 
the ascending node, and the longitude 
of perihelion (see Fig. 1). The inclina- 
tion is measured in degrees and is posi- 
tive if the planet orbits in the same di- 
rection as Earth. The ascending node 
refers to the intersection of a planet's 
orbit with the ecliptic. Since the orbit is 
a circle and the ecliptic is a plane, the 
two intersect in only two points. One 
point, the ascending node, occurs when 
the planet travels from below the eclip- 
tic to above it. At the other point, the 
descending node, the planet is traveling 
from above the ecliptic to below. 

Eccentricity, the semi-major axis, 
and the mean anomaly are needed to lo- 
cate the planet in its orbit. (See the side- 
bar and Figs. 2a and 2b.) The mean ano- 
maly varies from 0-360 degrees and is 
not "constant." You can find it by us- 
ing two other constants: the mean daily 
motion (N) and the time when the plan- 
et passed its perihelion point (TPP). 

To find the mean anomaly (MA), 
multiply the planet's mean daily motion 
by the number of days since it was at its 
previous perihelion: 

MA = N * (JD-TPP) 

JD (Julian day) is the day for which you 
want the planet's position. The time of 
perihelion passage is the Julian day of 
the most previous perihelion passage. In 
the program, I've used June 10, 1980, as 
my reference day, which has a Julian 
day number of 2 ^^*1^1 00.5. The perihel- 
ion passage for Mercury for example, is 
May 17, 1980, at 6:29 a.m., correspond- 



ing to Julian day 2443976.770. 

If Mercury is at its perihelion point, 
then the mean anomaly of Mercury is 
zero degrees by definition. In that case, 
JD will be the same as TPP. (Don't con- 
fuse this zero-degree reference with the 
zero reference point for measuring a 
planet's longitude. For Mercury to be at 
the zero-degree longitude position, it 
would have to be located at the vernal 
equinox.) No planet has its perihelion at 
the vernal equinox at this time. The 
above method for finding the mean ano- 
maly works well if you know a planet's 
previous perihelion time. The method 
isn't good if you want one formula to 
cover a long time period. Remember, 
the other planets are attracting Mer- 
cury, changing its perihelion. 

About every 88 days, Mercury passes 
through perihelion at a slightly different 
point, so you must make a correction to 
the calculation of the mean anomaly. 

MA = N * (JD-DPP)-(DP- 1.3965) * DJ 

Specifically for Mercury: 

M = 4.0923388 * (JD-24443976.770)- 
(1.5555-1.3965) * TJ. 

TJ is the number of centuries between 
June 10, 1980, and the Julian day of in- 
terest. The difference of .159 degrees 
(1.5555-1.3965) is the real advance of 
Mercury's perihelion in degrees per cen- 
tury. With this correction, keep TPP as 
a fixed number (see Fig. 3). 

Since I'm trying to solve for planet 
positions using a closed formula, the 
constants to which I refer must be mod- 
ified with time to maintain their accur- 
acy. The constants are the primary ap- 
proximations to the true value of a 
quantity. The first-order modifications 
that I showed for the mean anomaly ap- 
ply in a similar manner to four of the 
constants. The perihelion passage 
(TPP) is a known number and will not 




MA = Mean anomaly = angle XOZ ~ 68° 

TA = True anomaly = angle PSB ~ 155° 

s = Sun, at one focus of ellipse 

B = Planet 

AreaXOZX = Area PSBP by definition of mean 

anomaly 

Eccentric of eclispe ~ .81 

Fig. 2a Mean anomaly circle 



change. Mercury, for example, really 
was at its closest point to the sun on 
May 17, 1980, at 6:29 a.m. 

The mean daily motion (N) and semi- 
major axis (A) are constant over tens of 
thousands of years. No correction is 
made to them for the 900-year period of 
this program. The other four constants 
do change and can result in errors of 




EA = Eccentric anomaly = angle POE = 111 
TA = True anomaly = angle PSB =115° 
Area PQEP _ Area PSPB hy 

na 2 nab 

definition of eccentric anomaly 
B = Planet 

Eccentricity of ellispe shown = .81 
a = Semi-major axis of orbit ellipse 
b = Semi-minor axis 

Fig. 2b. Eccentric anomaly circle 



Sophisticated Moving Averages System 

S M A S 

Stock Market Adviser System 



SMAS is a slock market program with a difference. 
SMAS uses both fundamental principles and technical 
analysis Ms relmed algorithms using three moving 
averages are validated by applications both to individ- 
ual stocks and to portfolios 

• Sophisticated algorithms yield 
weekly appraisals of market trend 
and recommendations to buy. sell, 
and hold individual stocks. 

• Data base consists of 196 stocks and 
4 indexes. 

• Data base stocks selected for growth 
history and potential; volatility: and 
trading activity. 

• Data bases are current; you get 
meaningful results the very first week 
you use SMAS. 

• Data required by SMAS are readily 
available. 

• Program is menu driven, user 
friendly, with needed utilities and 
built-in checks for accuracy. 

• SMAS is especially suited for those 
seeking long term capital gains. 

• SMAS reduces emotional involve- 
ment in the market. 

• SMAS works with TRSDOS, 
NEWDOS 80. LDOS & DOSPLUS 
with TRS-80 (TM Tandy Corp.) . 
Models I and III. State Model and 
number of tracks in disk drives. 

SMAS $169.95 — Include $3 00 for packing and ship 
ping or S6 50 for Priority Mail. Texans add 5% sales 
lax Cashiers check or money order brings prompt 
shipment, personal check requires three weeks to 
clear 

Or send SASE for further information 

SPIRAL ENTERPRISES 

PO Box 5219. Fort Worth. TX 76108 
308 Crown Road. Willow Park. TX 76086 ^ 208 

0EALER INOUIRIFS INVITED 



^See List ol Advertisers on Page 435 
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heliocentric longitude if corrections 
aren't made. 

The longitude of the ascending node 
and the longitude of perihelion change 
by over one degree per century. The 
changes in eccentricity and inclina- 
tion are smaller, but you must con- 
der them. 

The large changes in the ascending 
node and perihelion result from a 
change in the position of the vernal 
equinox. The vernal equinox changes 
because of the precession of Earth on its 
axis. The moon's orbit is inclined about 
five degrees toward Earth's equator. 
Since Earth is not a perfect sphere, the 
moon's orbital inclination causes an un- 
even torque on the spinning earth. 
Earth precesses, or slowly changes, the 
direction in which its axis points. The 
vernal equinox is tied to a coordinate 
system centered on the earth's axis and 
equator, so our reference zero shifts 
slightly from year to year. It changes by 
1.3965 degrees per century. 

Imagine that the gravitational pull of 
the other planets doesn't change the 
perihelion of planet A. The perihelion 
would still change each year because of 
the shift of the vernal equinox. The ver- 
nal equinox was established as a refer- 
ence point thousands of years ago, and 
it's doubtful a stationary reference will 
be agreed upon soon. You just have to 
account for precession, and this is easy 
to do. 

The Program 

See Table 3 for an index to the pro- 
gram sections. Here I'll explain the 
computing algorithms. 

Run the program, and a brief de- 
scription appears on the screen. Press 
any key to continue. You must select the 
coordinate system you want. Type 1 if 
you want heliocentric; type 2 if you want 
geocentric. Then, enter the year. It must 
be between 1 500 and 2460 and must be a 




VE 1982& VE 198 , = Vernal equinox for 1982, 1981 

P 1982 &P 1981 = Perihelion for 1982, 1981 

a = precession change of VE = 1.3956° per 

century 

(i = real perihelion change due to gravitational at- 

tration of other planets. Exact value depends on 

the planet. 

DP = a +p. DP is data in the program. 

Fig. 3. Precession and Perihelion changes 
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whole number. Next enter the month (an 
integer from 1-12). Finally, enter the 
day; this can have up to two decimal 
places, for example, 3.25 means 6:00 
a.m. on the third day of the month, 
Greenwich Mean Time. If you want lo- 
cal time, you have to make the conver- 
sion yourself. For example, 3.25 would 
be 1:00 a.m., Eastern Standard Time. 

Heliocentric Calculation 

All planet data is read in line 920. 
Lines 930-960 convert the constants for 
June 10, 1980, to the correct values for 



the Julian day of interest. To find the 
heliocentric coordinates, calculate the 
mean anomaly, using JD,TPP and N. 



MA = (N*(JD-TPP)-(DP-1 .3965)*TJ)/K2 

Then, find the eccentric anomaly. Kep- 
ler's Equation, relating eccentric to 
mean anomaly, is: 

MA = EA-ECC*SIN(EA) 

You must rearrange this equation and 



Definitions 



Terms 

Celestial Equator: Coplanar 
with Earth's equator. It is the zero 
reference plane for geocentric decli- 
nation. 

Declination (CL): The angular 
distance from the plane of Earth's 
equator to a planet. The highest 
value is for Pluto, whose declina- 
tion will vary from -40.5 to +40.5 
degrees over its 248-year orbit. 

Eccentric Anomaly (EA): An in- 
termediate angle for finding 
orbits. It is angle POE in Figure 
2b. 

Eccentricity (ECC and EICC): 
Measure of the deviation of the 
true orbit from a circle. If eccen- 
tricity is one, the orbit is a para- 
bola, and is not a closed orbit. The 
eccentricity of Halley's comet is 
very near one, so that its orbit is a 
highly elongated ellipse. Earth's ec- 
centricity is near zero, so its orbit is 
almost circular. 

Ecliptic: The plane of Earth's or- 
bit. Zero reference for heliocentric 
latitudes. 

Inclination (I and II): The angle 
that a body's orbit makes with the 
ecliptic. Inclinations are positive if 
the body orbits in the same direc- 
tion as Earth, and are negative if 
the body orbits in the opposite 
direction. Halley's comet has a 
-17.5 degree inclination. 

Julian day (JD): Noon on 
January 1, 4713 B.C., has been de- 
fined as the start of day number 
one for astronomical purposes. 
The Julian day number for a partic- 
ular date is the number of days that 
have passed since January 1, 4713 
B.C. The Julian day for the start of 
the day June 10, 1980, is 



2444400.5; noon on June 10, 1980, 
is 2444401.0. 

Longitude of the Ascending 
Node (AN and A IN): The angle, 
measured from the vernal equinox, 
at which the planet's orbit in- 
tersects the ecliptic. The planet 
must be going from below the eclip- 
tic to above the ecliptic. 

Longitude of Perihelion (PER 
and PIER): The angle, measured 
from the vernal equinox, at which 
the planet is closest to the sun. It is 
measured from the vernal equinox 
to the longitude of the ascending 
node along the ecliptic, then in the 
orbit plane from the longitude of 
the ascending node to perihelion. It 
is the sum of two angles measured 
in different planes. 

Mean Anomaly (MA): The 
angle, measured from the planet's 
perihelion, to the sun, and back to 
the planet's position, that would be 
described if the planet moved in a 
circular orbit of radius less than the 
semi-major axis. (See Fig. 2a.) I use 
two other constants (mean daily 
motion and time of perihelion pas- 
sage) to calculate mean anomaly, 
since the mean anomaly changes 
rapidly. For Earth, the mean an- 
omaly varies from 0-360 degrees 
every 365.25 days. For Mercury, 
the mean anomaly varies from 
0-360 degrees every 88 days. 

Mean Daily Motion (N): The 
average number of degrees that a 
planet moves around the sun dur- 
ing each 24-hour day. The value 
ranges from over four degrees per 
day for Mercury to less than .004 
degrees per day for Pluto. 

Continues on p. 162 




The LAZY WRITER 

word processing system 
by David Welsh 







LAZY WRITER has earned the 

Professional Software Programmers 

Association Seal of Approval 



SIMPLE FACTS ABOUT LAZY WRITER! 

It's FAST! — written in machine code, not BASIC! 

It works with ANY printer, not just Radio Shack printers! You can put control codes for your printer 
anywhere in text (including in the middle of a word) to make use of any type fonts or movements 
your printer can make. 

To make it even easier for you, you get information sheets on using LAZY WRITER with your printer. 
This extra help is available for these printers: Epson MX-80 with or without Graftrax, the 
C. Itoh F10 Starwriter, the C. Itoh 8510 Prowriter dot matrix, the Centronics 739, the 
Microline 83, the RS Daisy Wheel II, the RS Line Printer VIII. 

The manual is written in plain English, and is easy to follow. Because some of you want even more 
help, we're working on LAZYBOOK, a complete guide to word processing with your TRS-80 and 
LAZY WRITER. 

Want your text proportionally spaced? We have proportional programs for these printers: RS Daisy 
II, Centronics 739, Qume Sprint 5, C. Itoh F10 Starwriter, C. Itoh 8510 Prowriter, RS Line 
Printer VIII. 

Want extras for your word processor? You can buy LAZYDRAW, LAZYDO, LAZYCALC, LAZYTAB, or 
LAZYDOC. With all these extras, you can draw pictures, do math, align decimals, and get 
automatic insertion of words or paragraphs into standard documents. We'll soon be offering 
LAZYMERGE to merge text files with a mailing list and LAZYFONT to create type fonts for 
your dot matrix printer. LAZY WRITER is a growing SYSTEM of programs that do what you want! 

Every LAZY WRITER owner receives free copies of a newsletter that is full of information on 
effective word processing, written with the layman in mind. 

FAST! EASY! POWERFUL! 

"This program enjoys some of the best manufacturer support 
I've encountered . . . LAZY WRITER is one of the most 
sophisticated TRS-80 word processing packages around. It has 
excellent features, documentation and support, and can be 
expected to provide ongoing utility for even the most demanding 
user." - T. A. Daneliuk, Info World 



"LAZY WRITER is GREAT! Our Customers and ourselves all agree 
that this is the best word processing system to be found for TRS- 
80 Models I & III. Not only is it powerful, but its straight-forward 
organization makes it simple to learn and use." - Winter Garden, 
Florida 

"Since getting LAZY WRITER, I have thrown away Electric Pencil, 
Scripsit, Data Merge, and all my other word processors. I find 
that LAZY WRITER alone will do all that I need." - Sacramento, 
California 



"I am as impressed by your continuing support of LAZY WRITER 
as I am by the program itself. From all I have seen and read, I 
am glad I passed up Electric Pencil and Scripsit for LAZY 
WRITER Houston, Texas 

"Thank you for a great product and for your continued support of 
it. In both capability and support, it surely leaves Scripsit for 
dead." - Auckland, New Zealand 

"I have fallen completely, madly in love with it. It is so good that I 
may not sell my TRS-80 ..." -Washington, D.C 



dealer inquires invited 



i_ vr?ff f^R^ffi 



For TRS-80 Mod. I & III - $175.00 



ABC SALES, 13349 MICHIGAN AVE., DEARBORN, Ml 48126 (313) 581-2896 



sSee List of Advertisers on Page 435 
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then solve it using iterations. EA is esti- 
mated in line 980. 

EA = MA + ECC*SIN(MA) 

Then an intermediate angle MO is found 
in line 990. 

MO = EA-ECC*SIN(EA) 

A correction to the estimate for EA is 
made using MA and MO. 

DL = (MA-M0)/(1-ECC*COS(EA)) 



This difference is added to EA to yield a 
new value for EA. 

EA=EA+DL 



If DL is less than .0001 radians, the 
iteration continues, going back to line 
990. Two iterations are all that are need- 
ed for the planets; Halley's comet may 
require up to five iterations since its ec- 
centricity is so near to 1. Once EA is 
found, the distance from the sun is 
found in line 1030. 



Julien Day is 2445318. 5 








12/15/1982 GMT 






Dist to Sun 




Helio Lon. 


Helio Lat. 






A.U. 




(DEG) 


(DEG) 


MER 




0.42 




310.3 


-6.9 


VEN 




0.73 




286.4 


-1.7 


EAR 




0.98 




82.7 


0.0 


MAR 




1.38 




331.6 


-1.8 


JUP 




5.39 




233.3 


1.0 


SAT 




9.73 




207.0 


2.5 


URA 




18.90 




245.2 


0.1 


NEP 




30.25 




266.8 


1.2 


PLU 




29.92 




207.2 


17.0 


HAL 




10.71 




102.9 


-12.1 


Want geocentric coordinates for same 


date? Y/N 










Fig. 


4. Heliocentric printout 





R(B) = A*(l-ECC*COS(EA)) 

The formula above is derived from the 
properties of an ellipse. You can now 
find the true anomaly (true angle) of a 
planet. 



TA = 57.295*2*ATN 



/i 

/r i+ECC l , TAN (EA/2)) 



As this formula shows, if the eccentric- 
ity is zero, the true anomaly equals the 
eccentric anomaly. Another in- 
termediate number, the argument of 
latitude (U), is then calculated. Finding 
U lets you make a small correction in 
the heliocentric longitude as a result of a 
planet's orbit inclination. 

U = TA + PER-AN 

The value of U must be brought with- 
in the range of 0-360 degrees. Then you 
can find the longitude L(B). 

L(B) = AN + 57.295* ATN(COS(I))*TAN(U)) 

This is the heliocentric longitude that is 
printed out after it is brought within 
0-360 degrees. Notice in the equation 
for L(B) that if the inclination is small, 
COS(I) is approximately 1, and L(B) 
could be approximated as: 



CONVERT YOUR TRS-80 MODEL-I OR III INTO A 

DEVELOPMENT 



SYSTEM 



Complete instructions and sample 
schematics are included to help you 
design your own simple stand-alone 
microcomputer systems. THESE 
SYSTEMS CAN BE AS SIMPLE AS 
FOUR ICs: one TTL circuit for clock 
and reset, a Z-80. an EPROM, and one 
peripheral interface chip. 

When the In-Circuit-Emulation 
cable is plugged into the Z-80 socket 
of your stand-alone system, the sys- 
tem becomes a part of your TRS-80: 
You can use the full power of your 
editor/assembler's debug and trace 
program to check out both the hard- 
ware and the software. Simple test 
loops can be used to check out the 
hardware, then the system program 
can be run to debug the logic of your 
stand-alone device 

Since the program is kept in TRS-80 
RAM. changes can be made quickly 
and easily. When your stand-alone 
device works as desired, you use the 
Developmate's PROM PROGRAMMER 
to copy the program into a PROM. 
With this PROM, and a Z-80 in place of 
the emulation cable, your stand-alone 
device will work by itself. 




Now you can develop Z-80 based, 
stand-alone devices such as games, 
robots, instruments and peripheral 
controllers, by using your TRS-80 as a 
development system. The DEVELOP- 
MATE plugs into the expansion con- 
nector of your TRS-80 and adds 
PROM PROGRAMMING and IN- 
CIRCUIT-EMULATION capabilities to 
your system (with or without expan- 
sion interface). 



The DEVELOPMATE is extremely 
compact: Both the PROM programmer 
and the In-Circuit-Emulator are in one 
small plastic box only 3.2" x 5.4". A 
line-plug mounted power supply is 
included. The PROM programmer has 
a "personality module" which defines 
the voltages and connections of the 
PROM so that future devices can be 
accommodated. However, the system 
comes with a "universal" personality 
module which handles 2758, 2508 (8K), 
2716, 2516 (16K), 2532 (32K), as well 
as the new electrically alterable 2816 
and 48016 (16K EEPROMs). 

The COMPLETE DEVELOPMATE 
81. for Model I, with software, power 
supply, emulation cable, TRS-80 
cable, and "universal" personality 
module $329 

DEVELOPMATE 83, Model III version, 
same as above $329 

PM2 PERSONALITY MODULE for 
2732A EPROM $15 

PM3 PERSONALITY MODULE for 
2764 EPROM $15 

ORION 

INSTRUMENTS 

172 Otis Avenue, Dept. M, Woodside, 
CA 94062 
(415) 851-1172 s 151 

Master Charge and Visa phone orders accepted 
California residents please add 6' % sales tax 
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Which comes first. . . the software 
or the hardware 
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KPLUS 

■ Computer Technology, Inc. 



PCT accounting software will make the 

hardware produce professional results! 



Hardware is basically a machine that must be told 
what to do. And, it's the software that gives those 
instructions. It's the brain with the program that 
directs and determines the end result. So, if it's 
professional accounting results you expect, start 
with the software and make it the best... PLUS! 
Our expertly designed packages provide profes- 
sional results, yet are easy to use and understand. 
PLUS is your easy answer for professional 
financial management results. 



PLUS makes software available 

for the finest hardware! 

TANDY MODELS II & III 

THE IBM PERSONAL COMPUTER 

PACKAGES AVAILABLE: 

• GENERAL LEDGER • FIXED ASSETS 

• ACCOUNTS RECEIVABLE • PAYROLL 

• ACCOUNTS PAYABLE • EASYTRAK™monitoring 

system 
Completely integrated programs with flexible user 
defined file sizes. 



MM-1 MASTER APPLICATION MENU 02/19/82 

1. General Ledger Session 

2. Accounts Receivable Session 

3. Accounts Payable Session 

4. Payroll Session 

5. Order Entry/Inventory Session 
6 Fixed Assets Session 

7. MENU Install/Deinstall 

8. MENU-Reorganlie Flle(s) 

9. Change System Date 
■ End ot Processing 



ENTER SELECTION NUMBER 

v. y 

MENU-DRIVEN PROGRAMS 

Easy to use! Related processing options 
and instructions are displayed on screen 
for easy operation. Built-in prompts and 
disciplines enhance accuracy. 





EXTENSIVE DOCUMENTATION 

Professionally prepared manuals make 
packages understandable. Presents in- 
stallation, operation and educational facts 
in easy to follow format. 



COMPREHENSIVE SUPPORT 

We provide the important follow-up tech- 
nical support you need. Our toll-free 
"HOT-LINE" helps give answers, the 
bulletins and newsletter keeps you in- 
formed and up-to-date. 



SEE FOR YOURSELF HOW PCT ACCOUNTING SOFTWARE ANSWERS YOUR BUSINESS NEEDS! 



ORDER YOUR SAMPLE REPORT 
55] BOOK, TODAY! 

See actual results you can 
expect with PLUS. The 88-page 
PLUS Report Book contains 
sample reports for all packages. 
It's an invaluable tool to help 
plan the needs for your busi- 
ness. And, it's only $20.00! 
Order yours today by simply 
filling out this coupon 
and mail it with a check 
or money order to: 




s:plus 



l^SSS^y 



Computer Technology, Inc. 



7360 N. Lincoln Avenue 
1-312-647- 



Lincolnwood, Illinois 60646 
• 1-800-323-4240 



I want to make the right start. 

Please send me the information I have checked below: 

C PLUS SAMPLE REPORT BOOK @ $20.00 each. 

Enclosed is my check or money order. 

Charge my L_ VISA or □ MASTER CARD 

Please send more information on PLUS'S Professional Accounting Packages. 



YES! 



Card Expiration Date 



Name 


Company 






Title 


Address 


City 


State 


Z'P 


Phone 



Signature 

Please fill-in, clip coupon, insert in a separate stamped envelope addressed to PLUS 
Be sure you have included your check or money order if ordering the Report Book. 



■See List of Advertisers on Page 435 
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PLEASE 






jL Give Us ji. 

^ A Chance to Save ^. 

jf You the Largest jf 

)f Amount Possible on jf 

J TRS-80™ J 

3^ Products jl. 

)f Get Your Best ^ 

* Price - Then Call Us j^ 

if 1-800-762-6661 3+ 

» » 

* 
* 

* 
* 



OUR PRICES 
Start 
at a 15% Discount 




SAVE 




& 



We also handle 

VIC - 20 
Okidata - Atari 

RAND'S 

COMPUTER CORNER 

101 W. FRY BLVD. 
Sierra Vista, Az. 85635 
In State 602-458-2477 

^130 
TRS-80 is a trademark of Tandy Corporation 
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L(B) = AN + 57.295*U 

where U is in radians. The heliocentric 
latitude is: 

SIN(LAT) = SIN(I)*SIN(U) 

Since Basic doesn't have the inverse sine 
function, you need lines 1150-1160 to 
get the inverse tangent. 

LAT(B) = ATN(X1/SQR(1-X1 *X1)) 

LAT is multiplied by 57.295 when 



printed. Figure 4 shows the heliocentric 
printout. 

Geocentric Coordinates 

The calculation of geocentric coordi- 
nates uses the results of the heliocentric 
coordinate calculation. The obliquity 
(Earth's tilt) is found for the day of in- 
terest in line 1420. Then the rectangular 
coordinates of Earth with respect to the 
sun are found in lines 1430-1450. This is 
merely a trigonometric transformation. 
Lines 1480-1500 find the rectangular 
coordinates of each planet with respect 
to the sun. With these equations, you 



Continued from p. 158 

Orbital Elements: The six "con- 
stants" required to describe a 
body's orbit in space. 

Perihelion: Point of planet's 
closest approach to the sun. 

Right Ascension (RA, RAH and 
RAM): The position of a planet 
relative to the vernal equinox. 
Usually it is given in hours and 
minutes, but it can be listed in 
degrees. One hour of right ascen- 
sion equals 15 degrees. 

Semi-major axis (A): The 
average distance of a planet from 
the sun. 

Time of Perihelion Passage 
(TPP): The Julian day of the 
planet's last closest approach to the 
sun before June 10, 1980. TPP in- 
troduces the time variable into the 
equations. 

True Anomaly (TA): The actual 
angle measured from perihelion, to 
the sun, and back to the planet in its 
true orbit. 

Vernal equinox: The zero refer- 
ence point for longitudes in the 
heliocentric and geocentric coordi- 
nate systems. Its location is deter- 
mined when the apparent orbit of 
the sun around Earth crosses the 
equator from south to north. It 
moves each year, because of pre- 
cession, at the rate of .013965 de- 
grees. Usually called the equinox. 

Coordinate Systems 

Heliocentric: This coordinate 
system has the center of the sun as 
the origin. Distance of the planets 
from the sun is given in astronom- 
ical units (AU). Longitude is mea- 
sured in degrees from the vernal 
equinox. Latitude is measured in 
degrees north or south of the eclip- 



tic, which is the plane described by 
Earth's orbit around the sun. 

Geocentric: This coordinate 
system has the center of Earth as 
the origin. Distance of the planets 
from Earth is given in AU. Right 
ascension is given in hours and 
minutes measured from the vernal 
equinox. Declination is measured 
in degrees north or south from the 
plane described by Earth's equator. 

Alt-Azimuth (altitude-azimuth): 
System based on seeing from your 
location. The horizon is taken as a 
reference. The altitude of a body is 
measured above or below the hori- 
zon. Plus or minus 90 degrees are 
the maximum values allowed. A 
negative altitude means that the 
body is below the horizon and so is 
not visible. To illustrate, the sun 
has a negative altitude at night. At 
sunrise or sunset, the sun's altitude 
is zero. Azimuth is measured from 
true north (0-360 degrees maxi- 
mum). This system is a trigonomet- 
ric transformation of the geocentric 
system. 

Planetocentric: This system has 
the center of any planet as the 
origin. It is the general case of the 
geocentric coordinate system. For 
example, if you use the correct ele- 
ments, you can determine how the 
solar system looks from Mars. 

Topocentric: This system is a re- 
fined geocentric system. It takes in- 
to account the fact that you are lo- 
cated 4,000 miles from the center of 
Earth when viewing the planets. 
This makes a small change in the 
viewing angle. Strictly speaking, 
alt-azimuth coordinates should be 
found from the topocentric and not 
from the geocentric coordinates. 
The errors are small, and I have 
neglected them. ■ 
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Not Anymore. 




It's no sin to want to learn as much as 
"•^ possible about your Apple*. And now 
^-there's a magazine which places all the 
5 Apple Computer's hidden potential at 
.''your fingertips — inCider. 

inCider promises to expand the limits of 

your Apple like its sister publication 80 

Micro has blown the lid off the TRS-80**. 

Not just another Apple magazine — but 

a comprehensive monthly filled with . . . 

• programs 

• software applications 

• hardware modifications 

• reviews 

• new product announcements 

• advertising 

• tutorials 

• games 

Want to know the easiest way to get the 
kinks out of your programs? inCider will 
show you. Want to know which peripher- 
als have the best history and the brightest 
future? inCider will tell you. 



Want to expand your knowledge of 
hardware? Or become an expert program- 
mer? Want to discover which word proces- 
sors give you the most for your money? Or 
how your Apple can better manage your fi- 
nancial affairs? inCider will answer these 
and many other questions each month. 

No matter what you use your Apple for 
— no matter where your machine is — 
you'll want the latest copy of inCider 
propped up beside it each month. 

You get a full year's subscription to 
inCider — 12 monthly issues for only 
$ 1 9.97. And if you send your money now 
you will receive a 13th issue free! 

Simply send in the subscription coupon 
to: 

Wayne Green Inc. 
P.O. Box 911 
Farmingdalc, NY 11737 

or call toll free: 

1-800-258-5473 
Be an inCider. Subscribe today. 



YES, I want a charter subscription to inCider/or one year at $19.97 



I I understand that with payment enclosed or credit card order I will receive a 13th issue FREE. 
j □ Check Enclosed □ MC □ VISA DAE □ Bill ME $19.97 for 12 issues 

■ Signature 

I Card I 

I Exp. Date 

■ Name 

I Address 



Interbank ■, 



City. 
Zip_ 



State_ 



Apple is a trademark of Apple 



Canada & Mexico $22.97, 1 year only, U.S. Funds 

Foreign $39.97, 1 year only. 

U.S. Funds drawn on U.S. Bank 

Your first issue will arrive by mid-December 

Box911«Farmingdale, NY 11737 



"TRS-80 is a trademark Of the Radio Shack Division of Tandy Corp. 
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know the distance and angle of Earth 
and each planet with respect to the sun. 
The program then solves for planet lo- 
cation with respect to Earth, again 
using trigonometry, a relatively simple 
procedure. 

DS in line 1540 is the distance in 
three-dimensional space between Earth 
and another planet. Z0 in line 1550 is 
the inverse sine of the declination. The 
declination CL(B) is found by using the 
ATN function again. RA(B) in line 1 570 
is the ATN of the planet's Y-coordinate 
divided by its X-coordinate. Since right 
ascension is usually given in hours and 
minutes, conversion from degrees to 
hours/minutes is done in lines 
1660-1720. 

CL(B) and RA(B) in lines 1640-1650 
are used only if you want to refer the 
RA and declination to a different year. 
For instance, most comet orbits are re- 
ferred to the year 1 950 or 2000 as a stan- 
dard astronomical practice. Figure 5 
shows the geocentric printout. 

Alt-Azimuth Coordinates 

Alt-azimuth coordinates are found in 
lines 1880-2060. Type in your latitude 
and longitude. I arbitrarily limited lati- 
tudes to less than 65 degrees north or 



south. The value can be changed to 90 
degrees. Longitudes are limited to plus 
or minus 180 degrees. 

LST is the local sidereal time in line 
1960. This is an important number for 
finding the hour angle HRA in line 
1990. Sidereal time and hour angle re- 
late the rotation of Earth to the back- 
ground of stars. Any star rises and sets 
at the same sidereal time every day. The 
hour angle is necessary for finding the 
azimuth angle. 

Lines 2000-2030 are the spherical 
trigonometric transformations from 
geocentric to alt-azimuth coordinates. 
Proper quadrant corrections need to be 
made in lines 2040-2060, so that azi- 
muth is printed from 0-360 degrees. 

Accuracy and Errors 

This program has six sources of er- 
ror: nutation; planetary aberration; 
parallax; Earth-moon system; dropping 
of squared and higher-order terms; and 
gravitational perturbations. 

The first four affect viewing from 
Earth. They do not affect any planet's 
true heliocentric position. 

Geocentric Errors 

Nutation is a slight wobble in Earth's 



SPIN AXIS OF EARTH 



P (PLANET) 



Planet 


Maximum 


Average 




Error 


Error 




in degrees 


in degrees 


Mercury 


.05 


.02 


Venus 


.07 


.03 


Earth 


.07 


.04 


Mars 


.15 


.06 


Mars 


.15 


.06 


Jupiter 


.46 


.20 


Saturn 


1.10 


.51 




Table 2. Maximum and A verage Errors in 


Longitude due to Perturbations 



Want geocentric coordinates for same 


date? 


Y/N 






equinox of date? 


Y/N 












Want referred to 


equinox of date? Y/N 












Dist to Earth 








RT Ascen. 


Declin 




A.U. 








(HR/MIN) 


(DEG) 


MER 


1.31 








19/28.5 


-25.5 


VEN 


1.68 








18/11.9 


-24.1 


MAR 


1.96 








20/25.4 


-20.6 


JUP 


6.27 








16/42.7 


-18.9 


SAT 


10.32 








14/0.9 


-9.8 


URA 


19.85 








16/16.7 


-21.2 


NEP 


31.23 








17/45.7 


-22.2 


PLU 


30.47 








14/10.5 


4.6 


HAL 


9.82 








6/58.8 


9.5 


Want alt-azimuth coordinates? Y/N 














Fig. 


5. 


Geocentric Printout 






a = obliquity of ecliptic 
6 = declination 

A = center of gravity of earth-moon system. 
Origin for differential equation solution. 
B = point on Earth's surface from which you 
look. Origin for topocentric coordinate system. 
C = center of Earth. Origin for the program's 
geocentric coordinate system. 
As explained in the text, alt-azimuth coordinates 
are transformes from the geocentric. They should 
be transformed from the topocentric coor- 
dinates. Alt-azimuth coordinates are therefore in 
error by angle BPC, which is less than .009°. 

Fig. 6. Parallax and coordinates system errors 



axis caused by the moon. It is much 
smaller than precession. Nutation oc- 
curs because the orbit plane of the 
moon is tilted about five degrees toward 
the plane of Earth's equator, and the 
orbit is elliptical. Error due to nutation 
is about .006 degrees in right ascension 
and declination. The error is nearly the 
same for all the planets. 

The moon also causes another type of 
error. Earth and the moon must be con- 
sidered a double planet. The true center 
of gravity of the Earth-moon system is 
located about 3,000 miles from Earth's 
center. Earth swings around this point, 
and the planets are shifted a slight 
amount. Maximum error is about .007 
degrees for Venus in right ascension. 
This error occurs at Venus 's closest ap- 
proach to Earth, about 26 million miles. 
The smallest errors, about .0001 degrees, 
are for Uranus, Neptune, and Pluto. 
(See Fig. 6.) 




S = SUN 

E = Earth at time t 

J, = Jupiter at timet 

J 2 = Jupiter at time (t-40 minutes) as seen from 

Earth. 

a = angular error, < .003 ° for Jupiter 

Fig. 7. Planetary A bberation 
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Now NRI takes you inside the 

new TRS-80 Model III microcomputer 

to train you at home as the 

new breed of computer specialist! 



NRI teams up with Radio Shack 

advanced technology to teach you 

how to use, program and service 

state-of-the-art microcomputers... 

It's no longer enough to be just a 
programmer or a technician. With micro- 
computers moving into the fabric of our 
lives (over 250,000 of the TRS-80™ alone 
have been sold), interdisciplinary skills 
are demanded. And NRI can prepare 
you with the first course of its kind, ■ 
covering the complete world of the 
microcomputer. 

Learn At Home in 
Your Spare Time 

With NRI training, the pro- 
grammer gains practical know- 
ledge of hardware, enabling him 
to design simpler, more effective programs. 
And, with advanced programming skills, 
the technician can test and debug systems 
quickly and easily 

Only NRI gives you both kinds of train- 
ing with the convenience of home study. No 
classroom pressures, no night school, no 
gasoline wasted. You learn at your conve- 
nience, at your own pace. Yet you're always 





££?-**? 






■ 





. . ..., . 



backed by the NRI staff and your in- 
structor, answering questions and giving 
you guidance. 

You Get Your Own Computer 
to Learn On and Keep 

NRI training is hands-on training with 
practical experiments and demonstrations. 
You don't just program your computer, you go 
inside it. . .watch how circuits interact. . . inter- 
face with other systems. . .gain a real insight 
into its nature. 

You also work with an advanced liquid 
crystal display hand-held multimeter and the 
NRI Discovery Labf performing over 60 sepa- 
rate experiments. Both microcomputer and 
equipment come as part of your training for 
you to use and keep. _. m ^ _ mm mmm _ 
Computer Assisted J 
Instruction B 

Your TRS-80 even I W^'M 
helps train you. You re- | &i'fi 
1 a ni 1 



Send for 

Free Catalog... 

No Salesman Will Call 

Get all the details on this exciting course 
in NRI's free, 100-page catalog. It shows all 
equipment, lesson outlines, and facts on other 
electronics courses such as Electronic Design, 
Industrial Electronics, TV/Audio/Video Servic- 
ing... 11 different career opportunities in all. 
Send today, no salesman will ever bother 
you. Keep up with the latest technology as you 
learn on the latest model of the world's most 
popular computer. If coupon has been used, 
write to NRI Schools, 3939 Wisconsin Ave., 
Washington, D.C. 20016. 



HI 



NRI Schools 

McGraw-Hill Continuing 

Education Center 
3939 Wisconsin Avenue 
Washington, D.C. 20016 



We'll give you tomorrow. 



ceive 8 special lesson | 

tapes in BASIC computer g N o salesman will call. 




Training includes the TRS-80 Model III micro- 
computer, professional LCD multimeter, the NRI 
Discovery Lab, Computer Assisted Instruction 
programs and hundreds of demonstrations 
and experiments. 

(TRS-80 is a trademark of the Radio Shack division of Tandy Corp.) 



-See List of Advertisers on Page 435 



language. Using them 
in your microcomputer, 
you "talk" to it as you 
progress. Errors are 
explained, graphics 
and animation drive 
home key points. 
Within a matter of 
minutes, you'll be 
able to write simple 
programs yourself. 



■ Please check for one free catalog only. 

■ □ Computer Electronics including 
| Microcomputers 

I, □ Color TV, Audio, and Video System Servicing 
□ Electronics Design Technology 
I □ Digital Electronics 

ID Communications Electronics • FCC Licenses 
• Mobile CB • Aircraft • Marine 



□ Industrial Electronics 

□ Basic Electronics 

□ Small Engine Servicing 

□ Appliance .Servicing 

□ Automotive Servicing 
D Auto Air Conditioning 

□ Air Conditioning. Heating. 
Refrigeration. & Solar Technology 

D Building Construction 



Name 



(Please Prim) 



City/State/Zip 

Accredited by the Accrediting Commission of the National Home Study Council 
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MICROSETTE 



DISKETTES CASSETTES 




We now offer 5 '/i -inch single sided, 
soft sector, single or double density 
diskettes, in addition to our quality 
short length cassettes. 

Our Prices Include 
Boxes and Shipping 



CASSETTES ] 


Item 


10 Pack 


50 Pack ! 


C-10 


$ 7.50 


$ 32.50 


C-20 


9.00 


39.00 


C-60 


11.00 


50.00 


C-90 


15.00 


70.00 


DISKETTES 5V4-inch 


MD-5 | $25.00 


$110.00 



UPS shipment in continental 

U.S.A. only. 

We cannot ship to P. O. Boxes. 



Item 


Qty. 


Price 


Total 


















SUBTOTAL 




Calif. Cust. add Sales Tax 




TOTAL 





Shipping address enclosed □ 

Check or money order enclosed □ 
Charge to: Visa D MasterCard _! 

Account No. 

Expiration Date 



Signature 



MICROSETTE CO. 

475 Ellis St., Mt. View, 
CA 94043 (415)968-1604 



Planetary aberration is the apparent 
change in a planet's position because of 
the time it takes light to reach us. When 
we look from Earth, we see Saturn 
where it was about one and one half 
hours ago. The error from planetary ab- 
erration varies with each planet, since 
the planets travel at different speeds and 
are at various distances from earth. Er- 
rors range from a high of .009 degrees 
in right ascension and declination for 



Mercury down to a low of .001 degrees 
for the outer planets. (See Fig. 7). 

Parallax arises because you look at 
the other planets from Earth's surface, 
while the heliocentric positions are cal- 
culated as if seen from Earth's center. 
On Earth's surface you can be displaced 
up to 4,000 miles one way or the other 
from its center. The errors range from 
.009 degrees in right ascension for 
Venus down to .0001 degrees for 



Program Listing 

100 DEFDBL A,C-Z 

110 CLS 

120 PRINT "****************************************************" 

130 PRINT" PLANETARY ORBITS" 

140 PRINT "AUTHOR — DON CARRERA COPYRIGHT 1981" 

150 PRINT "****************************************************" 

16 'THE PROGRAM AUTOMATICALLY CALCULATES THE JULIAN DATE 

170 "TPP IS THE TIME OF PERIHELION PASSAGE. 

180 'ALL DATA IS GIVEN AS OF JUNE 10,1980. 

190 *AN IS THE LONGITUDE OF THE ASCENDING NODE. PER IS THE LONG 

ITUDE OF PERIHELION. ECC IS THE ECCENTRICITY OF THE ORBIT. I IS 

THE ORBIT INCLINATION. A IS THE SEMI-MAJOR AXIS OF ORBIT. N IS 

THE DAILY MOTION OF PLANET IN DEGREES. 
200 'DA,DP,DI ARE THE CHANGES IN AN, PER AND I IN DEGREES PER CEN 
TURY. DE IS CHANGE IN ECC PER CENTURY (DIMENSIONLESS) . 
210 'MA,EA,TA ARE MEAN ANOMALY, ECCENTRIC ANOMALY AND TRUE ANOM- 
ALY (RADIANS OR DEGREES) . 
220 'U IS THE ARGUMENT OF LATITUDE. 

230 'RA IS RIGHT ASCENSION IN DEGREES; RH & RM ARE HOURS & MINUT 
ES OF RA. 

240 'HRA IS HOUR ANGLE FOR CALCULATING ALT-AZIMUTH COORDINATES. 
250 PRINT "THE PROGRAM CALCULATES PLANET POSITION IN SEVERAL COO 
RDINATE SY-STEMS FOR A GIVEN MONTH/ DAY/ YEAR. YOU MUST INPUT YOU 
R LATITUDE AND LONGITUDE FOR ALT-AZIMUTH COORDINATES." 
260 PRINT 
270 PRINT "YOU CHOOSE SUN-CENTERED (HELIOCENTRIC) COORDINATES OR 

EARTH-CEN-TERED (GEOCENTRIC) COORDINATES. GEOCENTRIC COORDINAT 
ES MUST BE FOUND BEFORE ALT- AZIMUTH COORDINATES ARE COMPUTED." 
280 PRINT 

290 PRINT "YOU MAY CHOOSE ANY DATE FROM 1500 A.D. TO 2460 A.D.": 
PRINT 

300 PRINT "PRESS ANY KEY TO CONTINUE" 
310 IF INKEY$="" THEN 310 
320 K2=57. 295779 
330 DIM H(13) 
340 CLS 

350 PRINT "WHICH COORDINATE SYSTEM DO YOU WANT?" 
360 PRINT "(ALT-AZIMUTH MUST BE CALCULATED AFTER GEOCENTRIC)" 
370 PRINT 



3 80 INPUT "HELIOCENTRIC (1) GEOCENTRIC 

3 90 IF CRD=1 OR CRD=2 THEN 400 ELSE 3 80 

400 PRINT 

410 PRINT "INPUT DATE: " 

420 INPUT "YEAR IS :";YEAR 

430 IF YEAR=0 THEN 440 ELSE 450 

440 PRINT "THERE IS NO YEAR ZERO": GOTO 420 

450 IF ABS(YEAR-1980) >480 THEN 470 

460 IF YEAROINT (YEAR) THEN 420 ELSE 480 

470 PRINT "TOO FAR AWAY": GOTO 420 

480 PRINT 

490 IF REP=1 THEN 500 ELSE 510 

50 RESTORE 

510 FOR B= 1 TO 13 

520 READ H(B) :NEXT B 

530 IF (YEAR/4) -INT (YEAR/ 4) =0 THEN 54 

YEAR/400) -INT(YEAR/400) =0 THEN 560 
YEAR/100) -INT(YEAR/100) =0 THEN 570 

560 FOR B= 3 TO 13 :H(B) =H(B) +1 :NEXT B 

570 INPUT"MONTH (JAN=1): ";MNTH 

580 IF MNTH<1 OR MNTH>12 OR MNTHOINT(MNTH) 

590 INPUT "DAY OF MONTH :";DY 

600 IF DY>=1 AND DY<=(H (MNTH+1) -H (MNTH) +. 99 

T(DY*100+.99) ) <.001 THEN 610 ELSE 590 

610 CLS 

620 IF YEAR<0 THEN YEAR=YEAR+1 



2) ";CRD 



ELSE 570 



540 IF 
550 IF 



THEN 570 
AND ABS( (DY*100)-IN 



Listing continues 
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Word Processing 

Software 

for TRS-80* 

Model I 




World's most popular word 
processing package. Fully 
proven Electric Pencil* now 
enhanced and offered in 16K 
cassette version only. 

• Easiest to learn 

• Simple to operate 

• Full screen editing 

• Global search & replace 

• Powerful insert/delete 

• Dynamic print formatting 

• No control key mod. 

Send check or MO for $24.00 
plus sales tax for Calif, 
cust. UPS shipping in USA 
prepaid. 



$ 24.00 

$10.00 for manual only 



'Electric Pencil licensed to PMC 
Software by Michael Shrayer. 
TRS-80 trademark of Tandy Corp. 



PMC SOFTWARE 



-PMC 



SOFTWARE- 



Proven Software Solutions 

for the TRS-80, PMC-80 & 81 User 

At VERY Special Prices 



GAMES 


Title 


List 


Our 

Price 


Tille 


List 


Our 

Price 


Title 


List 


Our 

Price 


Advanced Operating 


Systems 










Big 5 






+ VOYAGE OF THE VALKYRIE 




SCOTT ADAMS' ADV #1 #2 X #.' 




ATTACK FORCE 






D32KI&III 


39.95 


32.00 


D32K IS III 


39.95 


.11 nn 


D 32K I 8 III 


19.95 


15.00 


T 16K I 8 III 


29.95 


24.00 


SCOTT ADAMS' ADV 


#4, #5 8 #6 


T 16K I 8 III 


15.95 


12.00 








D32KISIII 


39 95 


31.00 


COSMIC FIGHTER 






Adventure Internatio 


al 




SCOTT ADAMS' ADV #7 #R 8 Of 




D32K I 8 III 


19.95 


15.00 


ARMOR PATROL 






D32KISIII 


39.95 


ai nn 


T 16KIS III 


15.95 


12.00 


I D32K l& III 


24.95 


19.00 


SCOTT ADAMS' ADV. 


#10, #11 8*1? 


DEFENSE COMMAND 




I T 16KI&III 


19.95 


15.00 


D32K 1 SMI 


39.95 


31.00 


D32K I 8 III 


19.95 


15.00 


COMBAT 






SEA DRAGON 






T 16KI 8 III 


15.95 


12.00 


D32KIS III 


20.95 


16.00 


D32KI S III 


24.95 


19.00 


GALAXY INVASION 






T 16KI8 III 


19.95 


15.00 


T 16K 1 S III 


19.95 


15.00 


D32KI Sill 


19.95 


15.00 


CONQUEST OF CHESTERWOOD 


SHOWDOWN 






T 16K I 8 111 


15.95 


12.00 


D 32K I & III 


20.95 


16.00 


D32K 1 S III 


20.95 


16.00 


METEOR MISSION 






T 16KI8 III 


19.95 


15.00 


T 16K I S III 


14 Q5 


12.00 


D32KIS III 


19.95 


15.00 


+ DEMON VENTURES! 







+ SILVER FLASH-PINBA' I 1 




T 16KI SIM 


15.95 


12.00 


REIGN OF THE RED DRAGON 




D32KISIII 


19.95 


15.00 


ROBOT ATTACK 






D32K 1 S III 


24.95 


19.00 


T 16K I S III 


14.95 


12.00 


D32K 1 8 III 


19.95 


15.00 


ELIMINATOR 






SKY WARRIOR 






T 16K 1 8 III 


15.95 


12.00 


D 32K 1 & III 


24.95 


19.00 


D32KI S III . ... 


20.95 


16.00 


+ STELLAR ESCORT 






T 16K I SHI 


19.95 


15.00 


T 16K I S III 


14.95 


11.00 


D32KI 8 III 


19.95 


1500 


GALACTIC EMPIRE 






SPACE INTRUDERS 




T 16KI Sill 


15.95 


12.00 


T 16K I & III . ... 


14.95 


12.00 


D32K 1 & III 


20.95 


16.00 
15.00 


SUPER NOVA 






GALACTIC REVOLUTION 




T 16KI S III . ... 


19.95 


D32KI 8 III 


19.95 


15.00 


T 16KI & III 


14.95 


12.00 


STAR FIGHTER 






T 16K I S III 


15.95 


12.00 


GALACTIC TRADER 






D 32K I S III 


29.95 


23.00 


Cornsoft 






T 16K IS III 


14.95 


12.00 


T 16K I S III 


24.95 


19.00 


+ BOUNCEOIDS 






+ GALACTIC TRILOGY 






STAR TREK 3 5 


D32KIS III 


19.95 


15.00 


I D32KISIII 


39.95 


30.00 


D32KI S III 


19.95 


15.00 


T 16K I & III 


15.95 


12.00 


LUNAR LANDER 






T 16KI S III 


14.95 


1 1.00 


SCARFMAN 






D32K I & III 


20.95 


16.00 


TREASURE QUEST 






D32KI8 III 


19.95 


15.00 


T 16K IS III 


14.95 


11.00 


D 32K I S III 


19.95 


15.00 
1 1.00 


T16K I 8 III 


15.95 


12.00 


MACES 8 MAGIC #1- 


BARLOG 




T 16K I 8 III 


14.95 


SPACE CASTLE 






D 32K 1 


29.95 


23.00 








D32K 1 8 III 


19.95 


15.00 


MACES 8 MAGIC #2- 






Automated Simulations (EPYX) 




T 16K I Sill 


15.95 


12.00 


STONE OF SISYPHUS 






CRUSH, CRUMBLE 8 CHOMP 




Med Systems 






D32K 1 


29.95 


23.00 


32K I 8 III 


29.95 


23.00 


ASYLUM 






MACES & MAGIC #3- 






T 16K IS III 


29.95 


23.00 


D32K I 8 III 


22.95 


18.00 


MORTON's FORK 






DUNJONQUEST— 






T16K I 8 III 


19.95 


15.00 


D 32K 1 


29.95 


23.00 


HELLFIRE WARRIOR 






+ ASYLUM II 






MISSILE ATTACK 






D32K I 8 III 


39.95 


30.00 


D32K I 8 III 


22.95 


18.00 


D32KI& III 


20.95 


16.00 


T 16K IS III 


39.95 


30.00 


T16KI 8 III 


19.95 


15.00 


T 16KIS III 


14.95 


11.00 


DUNJONQUEST— 






DEATHMA2E 5000 






OTHER VENTURE #2- 






KEYS OF ACHERON 






D32K IS III 


17.95 


14.00 


CROWLEY MANOR 






D32K IS III . ... 


19.95 


15.00 


T 16K I 8 III 


1495 


11.00 


D32KI&III 


20.95 


16.00 


T 16KI&III 


19.95 


15.00 


LABYRINTH 






T 16K IS III 


19.95 


15.00 


DUNJONQUEST— 






D32K IS III 


17.95 


14.00 


OTHER VENTURE #3 






SORCERER OF SIVA 






T 16K IS III 


14.95 


11.00 


ESCAPE FROM TRAAM 




D32K I Sill 


29.95 


23.00 


WARRIOR OF RAS — 


DUNZHIN 




D32K 1 Sill 


20.95 


16.00 


T 16K IS III 


29.95 


23.00 


D48KI S III 


29.95 


23.00 


T 16K I Sill 


1995 


15.00 


DUNJONQUEST— 






T48K 1 8 III 


29.95 


23.00 


OTHER VENTURE #4- 






TEMPLE OF APSHAI 






WARRIORS OF RAS- 


- KAIV 




EARTHOUAKESF1906 




D32K I SHI 


39.95 


30.00 


D48K 1 8 III 


29.95 


23.00 


D32K IS III 


20.95 


16.00 


T 16KI8 III 


39.95 


30.00 


T48K 1 Sill 


29.95 


23.00 


T 16K IS III 


19.95 


15.00 


DUNJONQUEST— 






WARRIORS OF RAS- 


- THE WYt DF 


OTHER VENTURE #5- 






UPPER REACHES OF APSHAI 




D48K 1 8 III 


29.95 


23.00 


+ DEATH PLANET 






D32KI8III 


19.95 


15.00 


T48K 1 8 III 


?9 95 


23.00 


T 16KI 8 III 


19.95 


15.00 


T 16K I S III 


19.95 


15.00 


Melbourne House Software 




PLANETOIDS 






+ RICHOCHET 






PENETRATOR 






| D 32K I & III . . 


20.95 


16.00 


D32KI8 III 


19.95 


15.00 


D 32K 1 8 III 


24 95 


20.00 


T I6K I S III 


19.95 


15.00 


T 16KI Sill 


19.95 


15.00 


T16KI8 III 


24.95 


20 00 



Now Twice As Many Programs! 



EDUCATION 




WORD PROCESSING 


Advanced Operating Systems 










MOSTLY BASIC 




GRAMMATIK 






EDUCATIONAL PKG. 7 PRG. 




D32K 1 






T 16K I 8 III 24.95 


20.00 


PROOF EDIT 






MOSTLY BASIC 




D 32K 1 






SCIENTIFIC PKG. 7 PRG. 




PROOFREADER 






T16KI8III 24.95 




D32KI 






TIME DUNGEON- 




SOFT-SCREEN 






AMERICAN HISTORY 




D48KI 






T 16K I 8 III 24.95 


20.00 


SOFT-TEXT 






TIME DUNGEON— 




D48K 1 


69,00 


54.00 


+ WORLD HISTORY 








T 16K I 8 III 24.95 


20.00 


ELECTRIC PENCIL 






Automated Simulations (EPYX) 
JABBERTALKY 

D32KI8III 29.95 




T 16K 1 


100.00 


24.00 


23.00 


INFO. PROCESSING 


T 16K I 8 III 29.95 


23.00 


Adventure Internatio 
+ MAXI CRAS 


■al 








D48K 1 8 III 


99.95 


79.00 


BUSINESS 




MAXI MANAGER 
D48K 1 S III 


99.95 




Small Business Systems Group 




+ MAXI MANAGER UTILITY PACK #1 






D48K 1 S III 






D48KI8III 195.00 










ACCOUNTS RECEIVABLE 










D48K I 8 III 195.00 










GENERAL LEDGER 




+ COMPUTER FILING SYSTEM (CFS) 




155.00 








INVENTORY CONTROL 










D 48K 1 8 III 195 00 


155.00 


ELECTRIC SPREADSHEET 








D 32K 1 8 III 


69.95 


65.00 




155.00 


T 16KI 8 III 


34.95 


30.00 



OPERATING SYS. 

Micro Systems Software 

DOS PLUS V3.3S 

D32K I 100.00 80.00 

UTILITIES 

Adventure International 

+ DIRECTORY INFO. MGT II (DIM II) 

32KISIII 24.95 19.00 

Howe Software 
MON3 

T 16K 1 39.95 31.00 

MON4 

D 32K I 49.95 39.00 

STERM 

T16KI 69.95 55.00 

SYSTEM DIAGNOSTIC 

D32KISIII 99.95 79.00 

MISCELLANEOUS 

Adventure International 
HINT SHEET for single 
Adventure #1 thru #12 

1.00 1.00 

Software Affair 
ORCHESTRA-85 

T16KI 99.95 95.00 

D 16KI 99.95 95.00 



NEW 



475 Ellis St. 
Mtn. View, 
CA 94043 



Orders: (415) 968-1604 



PMC SOFTWARE 

475 Ellis St., Mt. View, CA 94043 
Orders: (415) 968-1604 



Terms: FOR FAST DELIVERY, send certified checks, money orders. VISA or MasterCard number and expiration date. Personal checks require 3 weeks 
U.S.A. sales only. PRICES INCLUDE UPS continental delivery (do not use P.O. Box). CALIFORNIA customers add 6'/;% lax. Prices subject to change. 



tsSee List ol Advertisers on Page 435 
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TAX PLANNING 

PERSONAL FINANCE 

BUSINESS ACCOUNTING 

for the 

Model III Computer 

TAX/BUDGET PLANNER— a valuable tool for 
personal budgeting and tax planning. The pro- 
gram calculates personal cash flow including 
federal income taxes. It can be used for such 
things as determining the timing for capital 
gains/losses, amount of income tax withhold- 
ings and more. Using the keyboard, the user 
fills in six spreadsheets displayed by the com- 
puter. The user can go back and change any 
amounts on the spreadsheets. The program 
includes the relevant parts of the 1981 Eco- 
nomic Recovery and 1 982 Fiscal Responsibility 
Acts, plus automatic calculation of: 

1. tax liability per the tables or schedules. 

2. tax liability per the averaging 

method (uses lower of 1 or 2) 

3. capital loss and charity contribution 

carryforwards 

4. new minimum tax and self 

employment tax 
BUSINESS BOOKKEEPER— General journal, 
general ledger accounting system. Accounts 
are created by keying in the journal entries. 
Features automatic posting to the ledger. Auto- 
matic report generation includes: (1) Balance 
Sheet, (2) Income & Expense, (3) General Jour- 
nal and (4) Chart of Accounts. 
MONEY MANAGER— Personal bookkeeping 
system that allows the user to track and report 
on his income and expenses plus checking 
account, savings account and credit card bal- 
ances. Separate reports for business and 
personal income and expenses. 

TAX/BUDGET PLANNER $99 

BUSINESS BOOKKEEPER/MONEY MANAGER $49 

(with purchase of TB PLANNER) $39 

DEMO (TB PLANNER & MONEY MANAGER) $ 7 

y' 53 

Capital Software 

1 627 Peach Ct. E., Seattle, WA 981 1 2 



Pep up your UN€ INPUT 
routine with €-Z UN€ INPUT. 

The contents of a variable are 
not destroyed if UN€ INPUT is 
terminated immediately. All 
of the £DIT subcommands can 
be used to edit them. UN€ 
INPUT can be terminated by 
the up arrouj, doujn arrouj or 
enter key and the terminating 
key can be tested to alter 
program control. 

ONLV $14.95. Supplied on 
cassette for the TRS-80 
Models I & III Disk Basic 
systems. Specify RAM 
version ujhen ordering. Send 
check or money order to: 
Howard Bowe 
1 6 Lombardi Place 
Amityville, NV 11701 



Listing continued 

630 J0=YEAR+4712 

640 LYR=INT((J0-l)/4) 

650 JD=365*J0+LYR 

660 IF YEAR<1582 THEN 720 

670 IF YEAR=1582 AND( (MNTH<10) OR (MNTH=10 AND DY<15) 



THEN 720 



1 ;MNTH;"/ n ;DY; n / n ;YEAR; n G 



HELIO LON. 
(DEG) 



HELIO LAT." 
(DEG) " 



Y/N" 



6 80 JD=JD-10 

690 YR1583 = INT( (YEAR-150D/100) 
700 LPYR1583=INT( ( YEAR-1201)/400] 
710 JD=JD-YR1583+LPYR1583 
720 JD=JD+DY+H(MNTH) -.5 
730 IF YEAR<=0 THEN YEAR=YEAR-1 

7 40 PRINT "JULIAN DAY IS ";JD;" 
MT" 

750 TJ=(JD-2444400.5)/36525 
760 IF CRD=2 THEN 800 
770 PRINT " DIST. TO SUN 
780 PRINT " A.U. 

7 90 GOTO 910 
800 GEO=0 
810 PRINT 

820 PRINT "WANT REFERRED TO EQUINOX OF DATE? 
830 GOSUB 2120 

840 ON Ql GOTO 850 ,880 

850 INPUT "WHAT YEAR DO YOU WANT RESULTS REFERRED TO";Yl 

860 K=Y1-YEAR:CRD=4 

870 PRINT "RESULTS REFERRED TO YEAR ";Y1 

880 PRINT " DIST TO EARTH RT ASCEN DECLIN" 

890 PRINT" (A.U.) (HR/MIN) (DEG)" 

900 IF GEO=l THEN 1420 

910 FOR B=l TO 10 

920 READ Z$(B) r N,A,ElCC,Il,PlER,AlN,DA,DP,DE,DI,TPP 

930 AN=A1 

+DA*TJ 

940 PER=P1ER+DP*TJ 

950 ECC=E1CC+DE*TJ 

960 I=I1+DI*TJ 

970 MA=(N*(JD-TPP)-(DP-1.3965) *TJ)/K2 

980 EA=MA+ECC*SIN(MA) 

990 M0=EA-ECC*SIN(EA) 

1000 DL=(MA-M0)/(1-ECC*COS(EA) ) 

1010 EA=EA+DL 

1020 IF ABS(DL) >.0001 THEN 990 

1030 R(B)=A*(l-ECC*COS(EA)) 

1040 TA=K2*2*ATN(SQR((l+ECC)/(l-ECC))*TAN(EA/2)) 

1050 U=TA+PER-AN 

1060 IF U>0 THEN 1080 

1070 U=U+360 

1080 IF U>360 THEN U=U-360 

1090 L(B) =AN+K2*ATN(C0S(I/K2) *TAN(U/K2) ) 

1100 IF U>90 THEN 1120 

1110 GOTO 1140 

1120 IF U>270 THEN L(B) =L( B) +360 :GOTO 1140 

1130 L(B)=L(B)+180 

1140 IF L(B)>360 THEN L(B) =L(B) -360 

1150 X1=SIN(I/K2) *SIN(U/K2) 

1160 LAT(B)=ATN(X1/SQR(1-X1*X1)) 

1170 IF CRD=2 OR CRD=4 THEN 1190 

1180 PRINT USING "% % ##.## ###.# ###.# 

";Z$(B) ;R(B) ;L(B) ;LAT(B) *K2 
1190 NEXT B 

1200 IF CRD=2 OR CRD=4 THEN 1420 

1210 DATA 0,31,59,90,120,151,181,212,243,273,304,334,365 
1220 DATA MER, 4. 0923388,. 3 87099,. 205631, 7. 00437, 77. 1509, 48. 0994, 
1.1 852, 1.5555,. 00002,. 002, 244437 6. 770 

1230 DATA VEN, 1.60213,. 723332,. 0067 83, 3. 39444, 131. 2958, 76. 5038,. 
89 98, 1.4080, -.00005, .001, 244 4323. 110 
1240 DATA EAR, .985609,1, .016717, 0,102. 6040, 0,0, 1.7192, -.00004,0, 

2444242.321 

1250 DATA MAR, .524033, 1.52369, .093387, 1.8498, 335. 6989, 49. 4066, .7 

7099, 1.840 8, .00009, -.0007 ,2443 951.049 

1260 DATA JUP,. 083091, 5. 2028,. 04846 87, 1.3042, 14. 08, 100. 251, 1.01 

08, 1.6111,. 00016, -.006, 24426 36.0 

1270 DATA SAT,. 0334597, 9. 53 884,. 055614, 2. 4889, 92. 665, 113. 486,. 87 

306, 1.95 83, -.0003, -.004, 244207 8.0 

1280 DATA URA,. 011732, 19. 1818,. 047262,. 77194, 170. 34, 7 3. 90,. 5111, 

1.6250,. 0003,. 0006, 24393 84. 2 

1290 DATA NEP, . 005981 ,30 . 058 ,. 008590 ,1 .7719 , 44 . 453 ,131 . 565 ,1 .10 

17,. 877 8,. 00 01, -.009, 240 803 4. 7 

1300 DATA PLU,. 003921, 3 9. 829,. 2547 8, 17. 137, 223. 014, 109. 96,. 8, 1.5 

,0,0,2355886.7 

1310 DATA HAL, -.01300 08, 17. 95,. 967 3, -17. 5, 3 06. 9, 60, 3. 3, 1.6, 0,0, 2 

418781.5 

1320 IF CRD=2 OR CRD=4 THEN 1420 

1330 PRINT "WANT GEOCENTRIC COORDINATES FOR SAME DATE? Y/N" 

1340 GOSUB 2120 

1350 ON Ql GOTO 1380 ,1360 Listing continues 
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Listing continued 

1360 GE0=1 

1370 GOTO 810 

1380 GOSUB 2110 

1390 GOSUB 1810 

1400 GOTO 340 

1410 PRINT 

1420 OBLIQ=(23.4419-.013*TJ)/K2 

1430 XSUN=R(3) *COS( (L(3) +180J/K2) 



))/K2) *COS(OBLIQ) 
))/K2) *SIN(OBLIQ) 



1440 YSUN=R(3) *SIN( (L(3)+ll 

1450 ZSUN=R(3) *SIN( (L(3)+ll 

1460 FOR B=l TO 10 

1470 IF B=3 THEN 1740 

1480 XP=R(B) *COS(LAT(B) ) *COS (L( B) /K2) 

1490 YP=R(B)*(COS(LAT(B))*SIN(L(B)/K2)*COS(OBLIQ)-SIN(LAT(B)) *SI 

N(OBLIQ)) 

1500 ZP=R(B) *(COS(LAT(B) ) *SIN( L(B) /K2) *SIN(OBLIQ) +SIN(LAT(B) ) *CO 

S(OBLIQ)) 

1510 XT=XP+XSUN 

1520 YT=YP+YSUN 

1530 ZT=ZP+ZSUN 

1540 DS=SQR(XT*XT+YT*YT+ZT*ZT) 

1550 Z0=ZT/DS 

1560 CL(B)=K2*ATN(Z0/SQR(1-Z0[2) ) 

1570 RA(B) =K2*ATN(YT/XT) 

1580 IF XT>0 THEN 1610 

1590 RA(B)=RA(B)+180 

1600 GOTO 1630 

1610 IF YT>0 THEN 1630 

1620 RA(B)=RA(B) +360 

1630 IF CRD=4 THEN 1640 ELSE 1680 

1640 CL(B)=CL(B)+.005567*K*COS( (RA(B) +. 0064*K) /K2) 

1650 RA(B)=RA(B)+.0128*K+. 005567 *K*SIN(RA(B)/K2)*TAN(CL(B)/K2) 

1660 IF RA(B)<0 THEN RA(B) =RA(B) +360 

1670 IF RA(B)>360 THEN RA(B) =RA(B) -360 

1680 RH=INT(RA(B)/15) 

1690 RM=(RA(B)/15-RH)*60 

1700 IF RM<60 THEN 1730 

1710 RH=RH+1 

1720 RM=0 

1730 PRINT USING"% % ##.## ##/##.# ###.# " 

;Z$(B) ;DS;RH;RH;CL(B) 

1740 NEXT B 

17 50 PRINT "WANT ALT-AZIMUTH COORDINATES? Y/N" 

1760 GOSUB 2120 

1770 ON Ql GOTO 1780 ,1870 

1780 GOSUB 2110 

1790 GOSUB 1810 

1800 GOTO 340 

1810 PRINT "WANT ANOTHER DAY? Y/N" 

1820 GOSUB 2120 

1830 ON Ql GOTO 1860 ,1840 

1840 REP=1 

1850 RETURN 

1860 STOP 

1870 CLS 

1880 Z8=(DY-INT(DY) ) *24 

1890 INPUT "LATITUDE = ";ATAZ 

1900 IF ABS(ATAZ)>65 THEN 1890 

1910 INPUT "LONGITUDE = ";AZLN 

1920 IF ABS(AZLN) >180 THEN 1910 

1930 PRINT MNTH;"/";DY;"/";YEAR; n GMT" 

1940 PRINT " ALTITUDE AZIMUTH" 

1950 PRINT " (DEG) (DEG) " 

1960 LST=17.2182+.0657093*(JD-2444400.5) +1.0027*Z8 

1970 FOR B=l TO 10 

1980 IF B=3 THEN 2080 

1990 HRA=(15*LST-RA(B)-AZLN)/K2 

2000 Z9=SIN(CL(B)/K2) *SIN( ATAZ/K2) +COS (CL(B)/K2) *COS ( ATAZ/K2) *CO 

S(HRA) 

2010 ALT=K2*ATN(Z9/SQR(1-Z9[2) ) 

2020 Zl=-COS(CL(B)/K2) *SIN(HRA) 

2030 Z2=SIN(CL(B)/K2)*COS(ATAZ/K2)-COS(CL(B)/K2)*SIN(ATAZ/K2)*CO 

S(HRA) 

2040 MU=K2*ATN(Z1/Z2) 

2050 IF Z2<0 THEN MU=MU+180 

2060 IF MU<0 THEN MU=MU+360 



2070 PRINT USING"% % 
2080 NEXT B 
2090 GOSUB 1810 
210 GOTO 340 

FOR B=l TO 



###.#"; Z$(B) ;ALT;MU 



2111 



100: NEXT B: RETURN 



2120 A$=INKEY$ 

2130 IF A$="N" THEN Ql=l:GOTO 2160 

2140 IF A$="Y" THEN Ql=2: GOTO 2160 

2150 GOTO 2120 

2160 RETURN 



EIGHTY 

SYSTEM 

NEWSLETTER 

FOR TRS-80* USERS 
(Mod. I/II/III/16/COLOR) 






(Also for dealers, mfg. and 
industry personnel.) 

Published 52 times per year 
and mailed First Class 

□ Latest TRS-80* System News 

□ Product Notes & Reports 

□ New Hardware & Software 

□ Industry Trends 

□ User Notes & Comments 

□ TRS-80* Article Summaries 

RATES 

$39.00 Year - First Class 

(US, Canada & Mexico) 

$75.00 Year- Foreign (Air) 

(Must be in US Funds) 

SAMPLE COPIES $2.00 

EIGHTY SYSTEM NEWSLETTER 

3001 Route 27 Franklin PL, NJ 08823 

□ $39.00 (1-Year Subscription) 
D $75.00 (Foreign-Air-US Funds) 

□ $ 2.00 (2 Sample Issues) 

Name 



Company 
Address _ 

City 

State 



Zip 



(MC & VISA OK-Include card number, 
expiration date & signature.) 

*TRS-80 is a Registered Trademark of Tandy 
Corporation/Radio Shack Div. 



vSee List of Advertisers on Page 435 
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Uranus, Neptune, and Pluto. 

These four types of errors displace 
the planets from their positions as cal- 
culated in relation to Earth. The errors 
could be zero for three of the four 
cases. That happens if you are at the 
right spot on Earth's surface, and the 
moon is in a "good" position (see Figs. 
6 and 7). Planetary aberration always 
displaces the planets as seen from 
Earth. You can make corrections in the 



program by allowing for the travel time 
of light when finding the heliocentric 
positions. (See References 3 and 5 for 
further explanation.) 

Table 1 shows the combined maxi- 
mum errors for each planet. These er- 
rors combine right ascension and decli- 
nation. The program output lists right 
ascension to . 1 arc minutes, which cor- 
responds to about .025 degrees. The 
four error terms give an error of plus or 



Line 100— Many of the constants require more than six-digit accuracy, TPP in particular. The 

counter B must not be double precision. 

410-600— Date input with checkpoints. H(B) is the counter for the day of the year, corrected 

for leap years. 

620-730— Julian day calculation. It is correct for any year from 4713 B.C. onward. 

750— T J is the number of centuries between the Julian day of interest and June 10, 1980 

(JD = 2444400.5). 

820-870— Select results referred to the vernal equinox of the date entered, or referred to the 

position of the vernal equinox of another year. 

910-1 190— Calculates the heliocentric coordinates. Need to get results in the proper quadrant 

due to use of the arc tangent (ATN) function. 

1220-1310— Data for the planets and Halley's comet. 

1420-1740— Calculates geocentric coordinates; lines 1640-1650 find the right ascension and 

declination if you want results referred to a different year. Heliocentric coordinates must be 

found before geocentric. 

1880-2080— Calculates alt-azimuth coordinates. Geocentric coordinates must be found before 

alt-azimuth coordinates. 

Table 3. Program Explanation 



minus .1 arc minutes in right ascension. 

Heliocentric Errors 

In finding the heliocentric positions, I 
approximated the true variations of the 
orbit elements by a straight line. For ex- 
ample, in line 950: 

ECC = E1CC + DE*TJ 

This means that the eccentricity at any 
time (ECC) equals the eccentricity on 
June 10, 1980 (E1CC), plus the rate of 
change of eccentricity per century (DE), 
times the number of centuries from 
June 10, 1980 (TJ). Including terms that 
use the variable "time" (in this case TJ) 
to the second power would give a better 
approximation: 

ECC = E1CC + DE*TJ + DDE*TJ*TJ 

This requires more data to be listed; 
you need DDE for all 10 planets. Since 
the program has ample room, you 
could easily do this. By using only first 
powers of time and going back 480 
years, maximum errors of about .02 
degrees in true longitude occur for 
Jupiter and Saturn. The further back in 
history you go, the greater the error 
becomes. 



Experience the 

Magazine 

of the Future . 



The Programmer's Institute's magnetic magazines 
will entertain, educate, and challenge you. 

Each issue features ready-to-load programs ranging from 
games, adventures, home applications and utilities to personal 
finance, educational, and our unique teaching programs. Our 
magazines include fully listable programs, a newsletter con- 
taining descriptions and instructions for all programs, and notes 
on programming techniques used. 



TM 




for the TRS-80 COLOR Ext. Basic 



ORDERING INFORMATION 

Subscriptions* Cassette Diskette 

Year $50.00 $75.00 

Vi Year $30.00 $45.00 

Trial Issue $10.00 $15.00 

* Add $2.00 postage and handling. 

ALL SOFTWARE REQUIRES 16K. 



"Received my first copy 
. . . it's great! Please 
rush to me one of each 
back issue, so /'// have a 
complete set." 

R.G., Chicago, IL 



"Not only are the games 
fun and the applications 
useful, but the quality of 
the programs is excellent. " 
S.P., Midwest 
Computer Software Sales 



FREE CATALOG AVAILABLE UPON REQUEST. 



See your local dealer or order direct: 
THE PROGRAMMER'S INSTITUTE 

a division of FUTUREHOUSE 
P.O. BOX 3191, DEPT. 1-B 

^1ill!!ir"llMlllllM CH APEL H ILL, NC 27514 

1-919-967-0861 

10 AM - 9 PM, Mon - Sat 
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I assumed that orbit elements 
changed linearly. In fact, they don't. 
They vary in a cyclical, nonrepetitive 
manner, with periods of a few years to 
tens of thousands of years. Over a short 
time, a linear approximation is ade- 
quate, but it becomes less accurate with 
a time span. 

The last error term results from the 
gravitational perturbations on each 
planet by the other planets. If enough of 
these error terms are included, the true 
heliocentric positions can be found for 
any time. The problem is how to find 
these terms and how many to include. 

The terms' values are listed in astron- 
omy texts, usually under the name 
"perturbation theory." Astronomical 
Formulae for Calculators includes an 
excellent presentation of perturbation 
terms. These terms can be called long- 
period terms, and you should include 
about 100 of them. I didn't include per- 
turbation terms in the program because 
of the extra time and memory they 
require. 

The maximum error of the perturba- 
tion terms for the planets from Mercury 
to Saturn is 1.1 degrees (see Table 2), 
which means Saturn can be up to 1 . 1 de- 
grees away from the longitudes found 
with the program. For the years around 



1982, the greatest error is less than .2 de- 
grees. Errors in latitude are less than .01 
degrees and usually can be neglected. 
Errors in distance from the sun are 
typically .001 AU. 

Errors for Uranus and Neptune can 
be greater than 2 degrees. Pluto's orbit 



has not been reduced to a closed form to 
allow easy error calculations. Data for 
Halley's comet applies only from 
1980-1990. It will be visible in small 
telescopes from 1985-1987. 

The errors are the differences be- 
tween the values from my program and 



DECLINATION 




-DEGREES WEST 



RIGHT ASCENSION 



DEGREES EAST- 



CD Jupiter— as seen from earth, .012° diameter 
Neptune— as seen from Earth, .0007° 
diameter. True orbit 



[j error band, does not include perturbation 

terms 
o position calculated by program 



Fig. 8. Position of Neptune with respect to Jupiter December 28, 1612 to January 30, 1613 
(Reprinted with permission, Scientific American, December, 1980). 



You've invested a lot of time and money into your computer . . . 

It's time that investment paid off! 




IHECOL^RACCOUNTANT 




The Programmer's Institute introduces THE COLOR ACCOUNTANT, the only complete personal financial package 
specifically designed for the TRS-80 COLOR computer. This unique package includes: 



1. Complete Checkbook Maintenance 

2. Chart of Accounts Maintenance 

3. Income /Expense Accounts 

4. Net Worth Statement 



8. Home Budget Analysis 

9. Decision Maker 
10. Mailing List 



5. Payments/Appointments Calendar 

6. Color Graph Design Package 
(graphs any files) 

7. Check Search 

After the initial setup, THE COLOR ACCOUNTANT requires less than an hour of data input each month. 

The checkbook maintenance program is the key to the entire package. Once your checkbook is balanced, the checkbook summary file will 
automatically update the home budget analysis, net worth, and income/expense statements. You can then graph any file, record bills and 
appointments, make decisions, print a mailing list, analyze various accounts or stocks, and even calculate taxes. 

All programs are menu-driven and allow add /change/delete. Each file and statement can be listed to screen or printer, and saved to cassette 
or diskette. THE COLOR ACCOUNTANT also comes with 40 pages of documentation that leads you step-by-step through the entire package. 
The TRS-80 COLOR Ext. Basic requires 16K for this package. ($74.95 cassette, $79.95 diskette). 

See your local dealer or order direct: 
THE PROGRAMMER'S INSTITUTE 

a division of FUTUREHOUSE 
P.O. BOX 3191, DEPT. 1-B 
CHAPEL HILL. NC 27514 

■I 
31 



The perfect supplement to THE COLOR ACCOUNTANT, The Tax Handler includes: 

1. Complete Form 1040 

2. Schedule A (Itemized Deductions) 

3. Schedule G (Income Averaging) 

This year let The Tax Handler prepare your taxes ($24.95 cassette, $29.95 diskette). 




1-919-967-0861 

10 AM - 9 PM, Mon - Sat 



'See List ot Advertisers on Page 435 
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the values listed in the Astronomical 
Almanac. The perturbation errors pro- 
duce the greatest differences, and you 
can neglect most other errors. You ob- 
tain the true positions by solving simul- 
taneous differential equations. For each 
year, an equivalent set of orbit elements 
is calculated from the simultaneous 
equation solution. Astronomers deter- 
mine how much the elements change 
from year to year and try to approx- 
imate this change. For any one year, 
each element can be considered cons- 
tant. For hundreds of years, a linear ap- 
proximation is used. For longer 
periods, squared and cubed terms are 
necessary. 

Halley's Comet 

For Halley's comet, the maximum er- 
ror between the program's results and 
those in Comet Halley's Handbook will 



occur when it is closest to Earth — 
November 1985 and April 1986. 

There are two reasons for this. The 
comet is changing its distance from 
both the sun and Earth very rapidly. 
The geocentric coordinates are approxi- 
mately equal to the arc tangent of the 
heliocentric position divided by the dis- 
tance to earth. As the comet's distance 
from Earth decreases, the viewing error 
becomes greater. 

A second, more basic reason is that 
Halley's comet is nearing a heavy object 
— Earth. Earth's gravitational attrac- 
tion pulls the comet out of the smooth, 
elliptical orbit astronomers assumed it 
followed. 

The maximum error is approximately 
.6 degrees for the two closest approach- 
es on November 27, 1985, and April 11, 
1986. The errors at Halley's perihelion 
and after June 10, 1986, are typically 



J u lien Day 


s 2310199.68 






1/4.18/1613 GMT 






Dist to Sun 




Helio Lon. 


Helio Lat. 






A.U. 




(DEG) 


(DEG) 


MER 




0.41 




311.863 


-6.99 


VEN 




0.72 




163.479 


3.39 


EAR 




0.98 




104.108 


0.00 


MAR 




1.59 




89.897 


1.27 


JUP 




5.43 




166.677 


1.25 


SAT 




9.57 




348.420 


-2.13 


URA 




18.99 




84.440 


0.17 


NEP 




30.23 




174.841 


1.33 


PLU 




49.98 




39.159 


-15.94 


HAL 




15.70 




137.724 


-17.50 


Want geocentric coorcdinates for same 


date? Y/N 






Fig. 9. Program 


's Calculations for Right Ascensions and Declinations 


of All Planets on 


January 4, 


1613, 


at 4:19 am GMT. 









Want referred to equinox of date? Y/N 

What year do you want results referred to? 1950 

Results referred to year 1950 





Dist to Earth 


RT Ascen. 


Declin 




A.U. 


(HR/MIN) 


(DEG) 


MER 


1.36 


19/57.485 


-22.912 


VEN 


0.87 


16/9.326 


-18.222 


MAR 


0.68 


4/47.757 


25.460 


JUP 


5.06 


12/6.990 


0.700 


SAT 


10.04 


23/19.283 


-6.596 


URA 


18.06 


5/51.676 


23.663 


NEP 


29.92 


12/6.993 


0.701 


PLU 


49.58 


3/0.682 


0.363 


HAL 


14.93 


9/23.345 


-4.079 



Want alt-azimuth coordinates? Y/N 

Fig. 10. Further Calculations for Right Ascensions and Declinations of All Planets on January 
4, 1613, at 4:19 am GMT. 



.25 degrees. When Halley's comet is at 
perihelion, it will be on the opposite side 
of the sun from Earth. The program re- 
sults for the comet are only valid for 
1980-1990. 

Occultation of Neptune 
by Jupiter in 1613 

A rare event occurred on January 4, 
1613. As seen from Earth, Jupiter oc- 
culted (passed in front of) Neptune (see 
Fig. 8). The small circles in Fig. 8 show 
the true position of Neptune with re- 
spect to Jupiter as found by Steven 
Albers from the solution for the differ- 
ential equations of motion. The small 
squares show the results from my pro- 
gram, along with the error limits re- 
sulting from all error terms except for 
the long-period terms. Figures 9 and 10 
show the program's calculations for the 
right ascensions and declinations of all 
the planets on January 4, 1613, at 4:19 
a.m. GMT. I've listed the numbers to 
three decimal places, because the separ- 
ation of the centers of Jupiter and Nep- 
tune are about .001 degrees apart. Since 
Jupiter's disk is .012 degrees in diam- 
eter, it completely covered the disk of 
Neptune. 

The data in Fig. 10 refers to the year 
1950. Doing this allows us to compare 
the right ascension and declination val- 
ues of the program to the values in 
"Mutual Occulations of Planets: 1557 
to 2230. "Both declination and right 
ascension are in error by .1 degree. 
Most of this error is due to long-period 
terms. That's good agreement by the 
listed program for a date over 350 years 
ago. The positions of all the planets for 
January 4, 1613, are shown in Fig. 11. 
The Earth-Jupiter-Neptune line-up is 
easily seen. 

Program Improvements 

To save memory and improve the 
speed of calculating, you can make sev- 
eral changes to the program. You can 
write the mean anomaly in the form 
(((a + b*T)*T) + c*T) (see Reference 5). 
I didn't do this because I wanted to fol- 
low the definition of mean anomaly. 

If you are certain that you won't 
enter bad data, delete all the check- 
points for data input. For example, you 
know you won't enter 14 when input- 
ting the month, or -2.3 for the day. You 
can delete lines 410-470, 570, and 590. 

Formulas for finding the Julian day 
can be written on one program line. 
They don't show how to obtain the Juli- 
an day, but they do give the right num- 
ber for it. You can substitute such a 
formula for lines 620-730. (Although 
the earliest year on my program is 1500 
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RUN BASIC PROGRAMS AT 




WITH ZBASIC 2.2. 

THE WORLDS FASTEST TRS-80 BASIC COMPILER from SIMUTEK 



BELIEVE IT OR NOT WE'VE ADDED MORE 
NEW FEATURES to the ONLY INTERACTIVE 
BASIC COMPILER for the TRS-80 1 

1. Speed increases of 10-100 times are typical after compilation. 

2. Compiled code can be RELOCATED to run anywhere in memory. 
Code is even ROMablel 

3. ZBASIC 2.2 NOW SUPPORTS BOTH RANDOM and 
SEQUENTIAL DISK I/O. 

4. ZBASIC 2.2 is now a super tool for business programmers: 
RANDOM ACCESS FILES, and PRINT USING statements are 
supported as well as a HIGH PRECISION MATH package (with 
no rounding problems). 

5. Special BUILT-IN MACHINE LANGUAGE COMMANDS to 
increase program operation by as much as 1 000 timesl Special 
commands are implemented for fast memory searching (CPDR, 
CPIR), block memory moves (LDIR, LDDR), inputting and printing 
HEX numbers, inserting MACHINE LANGUAGE into COMPILED 
CODE, disabling and enabling interrupts, inverting memory, 16 bit 
PEEKs and POKES, and stack control, debug and much more. 

6. ZBASIC 2.2 compiles the ENTIRE PROGRAM into to Z-80 
machine language. (Not 8080 code or a combination of BASIC and 
machine language like some other compilers.) Clumsy LINKING 
LOADERS, and RUNTIME MODULES are not needed; ZBASIC 2.2 
creates a ready to run MACHINE LANGUAGE program. 

7. NO ROYALTIES imposed on registered ZBASIC owners. 

8. Typical COMPILATION TIME is TWO SECONDS for a 
4K program. 

9. Use TRS-80 Basic to write ZBASIC programsl 

1 0. Compile many existing programs with only minor changes. 
(Some BASIC programming experience is required.) 

1 1 . Fully compatible with both the Model I and the Model III. Mod I 
compiled programs work on a MODEL III, and visa-versa. ZBASIC 
works with NEWDOS-80. NEWDOS+, DOSPLUS, LDOS, MULTIDOS, 
ULTRADOS, TRSDOS etc. 

1 2. BUILT-IN and much improved MUSIC and SOUND EFFECTS 
commands. 

1 3. Improved CHAINING for disk users. 

14. TIMES now available on DISK version. 

1 5. ZBASIC 2.2 now has an INPUT @ command (similar to PRINT @). 

1 6. The TAB function will now tab 255 columns on a printer. (BASIC 
cannot tab past column 64.) 

1 7. NEWDOS 80 2.0 USERS can use the CMD "dos command" 
functionl 

1 8. NEW and EASIER to use USR COMMANDS. 

1 9. New math functions to calculate XOR and INTEGER 
REMAINDERS 

20. Logical STRING COMPARISONS are now supported. 

21. The disk commands INSTR, MIDS ASSIGNMENT are now 
supported on both DISK AND TAPE ZBASIC. 

22. DEFSTR is now supported. 

23. Eight disk files may be opened simultaneously; random, 
sequential or mixed. 

24. LINE INPUT*, is now supported 

25. Invoke the compiler by simply hitting these two keys: ":-" 

26. NEW 100+ PAGE MANUAL WITH DESCRIPTIONS AND 
EXAMPLE. 

27. ZBASIC 2.2 Comes with CMDFILE/CMD program from 
MISOSYS, to allow appending or merging compiled programs and 
machine language programs from tape or disk. 



ZBASIC 2.2 DOES NOT SUPPORT THESE 
BASIC COMMANDS: 

1 . ATN, EXP, COS, SIN. LOG, TAN, and exponentiation. (However, 
subroutines are included in the manual for these functions.) 

2. ERROR, ON ERROR GOTO, ERL, ERR RESUME. 

3. No direct commands like AUTO, EDIT, LIST, LLIST ETC, although 
these commands may be used when writing programs. 

4. Others NOT supported: CDBL, CINT, CSNG, DEFFN, FIX, FRE. 

5. Normal CASSETTE I/O. (ZBASIC supports it's own SPECIAL 
CASSETTE I/O statements.) 

6. SOME BASIC COMMANDS MAY DIFFER IN ZBASIC. For 
instance, END jumps to DOS READY, STOPjumps to BASIC 
READY etc. 

7. MEMORY REQUIREMENTS: to approximate the largest BASIC 
program that can be compiled in your machine (at one time), enter 
BASIC and type: PRINT (MEM-6500)/2. Remember, you can merge 
compiled programs together to fill memory. 

ZBASIC 2.2 SPEED COMPARISON DEMO 

To help give you an idea how fast compiled programs are, we have 

included this demo program: 

ZBASIC 2.2 DEMO PROGRAM 

Time to compile and run complete program :0MIN. 2 SEC. 

BASIC Execution speed MOD I , LEVEL II : 7 MIN. 34 SEC. 

ZBASIC Execution speed MOD 1 , LEVEL II :0 MIN. 1 8 SEC. 

BASIC Program size (WITHOUT VARIABLES) : 89S BYTES 

ZBASIC Program size (WITHOUT VARIABLES) : 2733 BYTES 
(Remember that the ZBASIC program includes an 1879 byte sub- 
routine package.) Program shown exactly as compiled and run in 
BASIC and ZBASIC. 

10 •========= ZBASIC 2.2 EXAMPLE PROGRAM AND TIME TEST======== 

29 CLS:CLEAR100:DEFINT A-X:DEFSTR Z:DIM AA (64, 24) , Z (50) : RANDOM 

30 AA=100:BB=-1000:CC=3:DD=-3:EE=-9999:ST*="START TIME "+TIME« 
40 FOR I=1T0127STEP2 :F0R J=47T01STEP-3: XX = P0INT ( I , J) :SET ( I , J) 
50 XX=(I-J)/CC»(7+I+J> :XX=ABS(INT(RND(I»J)-AA>+7> : RESET (I, J) 
60 XX=PEEK(I+J) :POKE15360+I+J, J :0UT255, J AND (3«J> : XX=INP (I ) 
70 AB*=STR*(I+J> :BA*=LEFT*(AB*,2> :AA < 1/2, J72) =VAL (BA«> -t-AA«3 
80 BA$=BA*+RIGHT*(BA«, RND(3) ) : XX=INSTR ( 1 , BA«, "9") : XX=SQR ( I»J) 
90 BA*=MID*(BA*,2, 2) :MID« (BA«, 1, 1 ) =Z :IF XX THEN 100 ELSE CLS 
100 IF LEN(BA«)>3 DR SGN(XX)=1 AND ASC(BAS>=32 THEN PRINT"+++"; 
110 IFPOS<0)>62 THEN TRON: TROFF : PRINT ELSE XX=NOT ( RND (99) ) +100 
120 A»=INKEY*:IF A*="Y" OR A*="y" AND I>120 THEN PRINT"TRUE. . " 
130 RESTORE : READA, C, Z ( J) , D: GOSUB170 :GOSUB170:GOSUB170:GOTO210 
140 NEXT :PRINT"»"; :NEXTI :CLS: PRINT9512, ST*, "STOP TIME ";TIME« 
150 STOP' ============== END OF MAIN TEST LOOP ================= 

160 DATA 12345, -1, "TEST", -9999 

170 ON RND<6) GOTO 180,190,200,180,190,200 

180 RETURN 

190 RETURN 

200 RETURN 

210 ON RND(9> GOSUB 180,190,200,180,190,200,180,190,200 

220 GOTO 140 

NOTICE ZBASIC 2.0 OWNERS: you can upgrade your ZBASIC 2.0 for no charge. 
Just send us your original diskette/cassette and a S.A.S.E with your registered 
serial number and copy of your invoice. We will send you ZBASIC 2.2 and 
updates to your manual. 

VISA. MASTERCARD, AMERICAN EXPRESS, COD. ORDERS ONLY. 

800 528-1 149 order line 

ZBASIC 2.2 DISK VERSION AND MANUAL 89.95 

ZBASIC 2.2 TAPE VERSION AND MANUAL 79.95 

ZBASIC 2.2 DISK & TAPE VERSION AND MANUAL 99.99 

MANUAL ONLY ...(APPLIES TO PURCHASE) 25.00 

SIMUTEK COMPUTER PRODUCTS INC. 

TECHNICAL QUESTIONS PLEASE CALL (602) 323-9391 
4897 E. SPEEDWAY, TUCSON, ARIZONA 85712 ^, 2 

TRS-80 is tm of Radio Shack, a Tandy Corp. 
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A.D., the Julian day calculation is accu- 
rate for any time after 4713 B.C.) Also, 
if you don't want geocentric or alt- 
azimuth coordinates, eliminate most of 
lines 1360-2120. To decrease the display 
time for heliocentric positions, change 
line 100 to: DEFDBL J,T. 

What Else Can You Do? 

You can also adapt this program to 
look at the solar system from another 
planet. The heliocentric calculations 
stay the same since they give the true lo- 
cations of the planets. Find the helio- 
centric positions before calculating any 
other coordinate system information. 

You must make changes in lines 
1460-1510. In line 1460, OBLIQ is the 
tilt of the ecliptic with respect to the 
planet from which you are looking. For 
the listed program, this planet is Earth. 
On June 10, 1980, Earth's tilt was 
23.4419 degrees. If you want to look 
from Mars, using "marcentric" coordi- 
nates, the ecliptic should remain the 
plane of Earth's orbit, so you don't 
have to change the constants in the data 
statements. Change OBLIQ to 23.98. 
This is the tilt of the Martian axis of ro- 
tation to the ecliptic. Line 1460 will look 
like this: 

1460 OBLIQ = (23.98-.002*TJ)/K2 

The -.002 term is the precession term. 
Mars's precession is much less than 
Earth's since Mars has no large moon to 
perturb it. The precession of Mars re- 
sults from influences by the sun and Ju- 
piter. The following lines also change: 

1470 XSUN = R(4)*COS((L(4) + 1 80/K2)* 

COS(LAT(4)/K2) 

1480 YSUN = R(4)*SIN((L(4) + 180)/K2* 

COS(OBLIQ)*COS(LAT(4)/K2) 

1490 ZSUN = R(4)*SIN((L(4) + 180)/K2)* 

SIN(OBLIQ)*COS(LAT(4)/K2) 

The COS(LAT) terms take into ac- 
count Mars's inclination to the ecliptic. 
Similar terms would have appeared in 
finding XSUN for Earth, except that 
Earth's inclination is defined as zero. In 
reality, the latitude of Earth is not 



always zero, but can be as "high" as .03 
degrees. Because COS(.03 degrees) is 
about .99999985, the latitude term can 
be ignored for Earth. 

Since Mars is the fourth planet, all 
references must be to it, not to Earth, in 
the equations. The counter B must be 
changed from 3 to 4. Line 1510 
becomes: 

1510 IF B = 4 THEN 1760 

With these changes you can find the 
ascensions and declinations of the other 
planets as they would be seen from 
Mars. Martian alt-azimuth coordinates 
are more difficult to find. You must use 
Martian latitudes and longitudes, which 
can be found in some observational as- 
tronomy texts. You must obtain a rela- 
tion between the Martian day and an 
Earth day. Mars rotates once every 24 
hours, 37 minutes, but the formulas are 
based on Earth's 24 hours per day, 
365.25 Julian days per year. 

You can also adapt this program to 
find the path of a spaceship sent from 
Earth to Mars. Normally, you know the 
spacecraft's x, y, and z-coordinates, as 
well as the x, y, and z-velocities with re- 
spect to Earth. These quantities usually 
come from direct radar or acceleromet- 
er information. 

A spacecraft changes orbit by firing 
its engines, giving it a velocity change in 
the x, y, or z direction, or all three. The 
velocity changes are seldom translated 
into changes in the orbital elements. In 
real time, you don't need orbit elements 
when you have the distances and veloci- 
ties. However, some formulas let you 
change the orbit elements for use in a 
program like this one. Texts that deal 
with satellite dynamics can give you the 
methods for changing orbit elements 
due to a spacecraft's velocity changes. 

If you are interested in the alt-azi- 
muth coordinates for a star, you can use 
lines 1880-2080. Input the right ascen- 
sion and declination of the star. The 
star's right ascension would be read as 
RA(B) in line 1990. The declination be- 
comes CL(B) in line 2000. You must 




also calculate the Julian day to find the 
local sidereal time (LST) in line 1960. 
The printout will list the altitude and 
azimuth of the stars as you see them 
from your latitude and longitude. 

You can calculate the transmission 
time for sending a message from Earth 
to another planet. The distance from 
Earth to the planet is found and printed 
out with the geocentric coordinates and 
can be used in your own application. 
Light (and radio waves) travels one 
A.U. in about 498.5 seconds. 

Planet brightness can be calculated, 
too. Each planet reflects a certain 
amount of sunlight from its surface. 
This percent reflectance is called albe- 
do. You can find the planet's bright- 
ness, as seen from Earth, if you know 
the planet's albedo, diameter, distance 
from the sun, and distance from Earth. 
The planet's distances from the sun and 
from Earth are known. All you need to 
do is read the extra data concerning al- 
bedo and diameter for the 10 bodies. ■ 



Don Carrera is an engineer with 
Westinghouse Electric. Contact him at 
50 Suhan Drive, RD 11, Irwin, PA 
15642. 



Fig. 11. Alignment of Jupiter and Neptune can be easily seen here. Positions are plotted from data 
from Fig. 9. The planets orbit counter-clockwise. Three planets are off the scale of the drawing; 
Halley's comet position shown by the program is meaningless at this date. The 0° mark indicates the 
direction of the vernal equinox for 1613 A.D. 
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jffl| COMPUTER CONNECTION^ 



New Toll Free Order Number 



m 



D 



□ 



□ 



Connection-80 BBS state of the 

Art in Microcomputer Bulletin Board Programs 
for the TRS-80. Available for Mod I (101000) or 
Mod III (103000) $199.95. 

Electric Pencil Ver 2.1. This is 

the easiest to use word processor for the TRS-80 
Models I III. Easy to follow instruction manual, 
full documentation. Regularly S89.95 Holiday 
Special $59.95! 

-f\.I*lrlTl-oU Security Company Service 
Maintenance Billing Package for both the Model 
I & III. Menu driven basic programs, handles 
central station billing on monthly, quarterly, semi- 
annual, or annual cycles. Complete sales and aging 
reports. Multi field customer listing. Interactive 
dunning program for delinquent accounts with 
letter writer. (1 13026) $499.95. 

Clear Disk Drive Cases — 

Give your disk drives a modern look. Clear 
Plexiglass Case gives a clean look to your system. 
Regularly $79.95 Holiday Special $69.95!! 



X OWer UraW A super-easy screen display 
generator. Allows you to save screens in Basic. 
Packed String, Load file, or CMD file. Give a 
professional look to your program. Regularlv 
$39.95, Holiday Special $29.95!! 



H Dosplus 3.4 

Operating System 



You've read all about this incredible Operating 
System. With all its' features only the price could 
improve it. Sooo... Holiday Special $79.95!!! 

(101005) Model I Single Density 

(101006) Model I Double Density 
(103006) Model III 

IVl"^al The most powerful Editor 
Assembler ever written. Full screen editing, linking 
loader, full macro support and much more! 
Holiday special only (101007) $99.95. 



B 



Electronic Messenger completely 

automated electronic mail program for the 
Model III. Transmitts and receives mail auto- 
matically. From a short note to a full disk! The 
standard in Electronic Mail for all Computers 
(103013) $149.95. (Now only $59.95!!!!!) 

Postman Mass Mailing 

oyStem This Mass Mailing Package is 
without a doubt the most powerful mailing list 
program ever written! Info-World gave it a 4 

excellent (highest) rating! Regularlv SI 29.95. 
Holiday Special $99.95 

H2 Manufacturing Inventory 

v-OntrOl A complete point-of-sale order 

entry system for TRS-80 Model I III Includes 
Invoice Generator. Billing Record Maintenance. 
Inventory Tracking, Production of finished goods 
from raw materials, etc... Fantastic! Regular 
$199.00. Holiday Special $149.00!! 



□ 



□ 



□ 



M 



PaSCal-80 The Fabulous Pascal-80 
Package by New Classics Software. Considered to 
be the best Pascal Package available for the 
TRS-80! Regular Price $99.95. Holiday 
Special (113008) $79.95!! 

MicrO CasllA point-of-sale Inventory 
Cash Register, and Accounts Receivable 
System for the TRS-80 Model III. Includes 
Invoice Generator and Inventory Control! 
Regularly $199.00 Holiday Special (103030) 
$149.95!! 

Super Utility A Must for all serious 
computer users. Allows ;you to repair damaged 
disk directories, boot tracks, etc. A real value at 
$79.95. but a holiday special at $39.95!! 

Uniterm A Modular Terminal program for 
both the Model 1 & III. Full Up and down loading 
capabilities with a 38K buffer in a 48K mackline! 
113000 $79.95. 



*A11 Holiday Specials End 1-15-83!!! 

Postmarks after that date will not be accepted at these prices!! 




^ B. T. Enterprises --z 
10B Carlough Road 
Bohemia, N.Y. 11716 
516 567 8155 (voice) 
!v— :--"^-^iI 516 588 5836 (modem) 

B.T. Enterprises is a division of Bi- lech Enterprises 



Dealer Inquires Welcome 
Prices Subject to change 
N.Y.S. Residents Add Tax 



New Toll Free Lines for 

out of New York Stale 

orders 

800 645 1165 



WELCOME 
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Aerocomp's 
Proven 
Best-By Test! 
The 



11 



ii 




Double Density Controller 

• Technical Superiority 

At last! A double density controller for Model l witn higher probability of data recovery than with any other 
double density CONTROLLER ON the MARKET TODAY! The "DDC" from Aerocomp. No need to worry about the pro- 
blems that keep cropping up on existing products. AEROCOMP'S new analog design phase lock loop data separator 
has a wider capture window than the digital types currently on the market. This allows high resolution data center- 
ing. The finest resolution available with digital circuitry is 125 ns (nano seconds). The "DDC" analog circuit allows in- 
finately variable tuning. Attack and settling times are optimum for 5-1/4 inch diskettes. 
The units presently on the market use a write precompensation circuit that is very "sloppy ". Board to board 
tolerance is extremely wide - in the order of + 100 ns. The "DDC" is accurate to within + 20 ns. 
The bottom line is state of the art reliability! 

* Test Proven 

Tests were conducted on AEROCOMP'S "DDC", Percom's "Doubler A"* and "Doubler ll"* and LNW's "LNDoubler"** using 
a Radio Shack TRS80*** Model l, Level 2, 48 K with TRS80 Expansion interface and a Percom TFD100 * disk drive 
(Siemens Model 82). Diskette was Memorex 3401. The test diskette chosen was a well used piece of media to deter- 
mine performance under adverse conditions. The various double density adapters were installed sequentially in the 
expansion interface. 

The test consisted of formatting 40 tracks on the diskette and writing a 6DB6 data pattern on all tracks. The 6DB6 
pattern was chosen because it is recommended as a "worst case" test by manufacturers of drives and diskettes. An 
attempt was then made to read each sector on the disk once - no retrys. Operating system was Newdos/80, Version 
1.0, with Double zap, version 2.0. Unreadable sectors were totalled and recorded. The test was run ten times with 
each double density controller and the data averaged. Test results are shown in the table. 



* Features 

TRS80 Model l owners who are ready for reliable double 
density operation will get (1) 80% more storage per 
diskette, (2) single and double density data separation 
with far fewer disk I/O errors, (3) single density com- 
patibility and (4) simple plug-in installation. Compatible 
with all existing double density software. 

* value 

$139.95 for the best double density 
controller on the market. 

$1 79.95 for "DDC" complete with dosplus 3.3D 
$229.95 for "DDC" complete with LDOS 



• TEST RESULTS • 



MFR & PRODUCT 


SECTORS LOCKED OUTiavo 


AEROCOMP "DDC" 





PERCOM "DOUBLER II" 


18 


PERCOM "DOUBLER A" 


250 


LNW "LNDOUBLER" 


202 



Note: test results available upon written request. All tests conducted prior to 8-25-81 

Aerocomp's 14 day money back guarantee applies to Hardware only. 

Specials will be prorated. Shipping $2.00 in Cont. US. See opposite page for details. 



Data Separators 

The advances that make the "DDC" great are incorporated in the new aerocomp Single Density Data Separator ("SDS") 
and Double Density Data Separator ("DDS"). 



* Has your original manufac- 
turer left you holding the bag? 

If you already own a Percom "Doubler A", "Doubler ll" or LNW 
"LNDoubler", the aerocomp "DDS" will make It right. Look at the test 
results: 



MFR. & PRODUCT 


SECTORS LOCKED OUT 


WITHOUT "DDS" 


WITH "DDS" 


PERCOM "DOUBLER II" 


18 


1 


PERCOM "DOUBLER A" 


250 





LNW "LNDOUBLER" 


202 






Note: Same test procedures as "DDC". 
* Trademark of Percom Data Co. 
** Trademark of lnw 
*** Trademark of Tandy Corporation 
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• "DDS" $49.95 

(Use 1791 chip from your DD Con- 
troller) 

M UUb with disk controller 

chip included $/ 9.95 

* Disk controller 

chip $34.95 

(Shipping $2.00 Cont US - see opposite 
page for details) 



Plugs directly into your existing 
Double Density Controller. 



Do you need a 
Single Density Data 
Separator? 

The internal data separator in the 
WD1771 chip (R/s Expansion interface) 
is NOT recommended by WD for 
reliable data transfer. Do you have any 
of these problems: Lost data, tracks 
locked out, CRC errors, disk retry? YOU 

NEED ONE! 

• "SDS" $29.95 

(For Mod. I; shipping $2.00) 



See opposite 
pagemm 
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TRS80 




DISK DRIVES 

40 & 80 TRACK 

$199.,s 



low 



NEW LOW PRICES 

Thanks to you our sales volume has 
allowed us to cut costs and we're pass- 
ing the savings along. We offer the best 
disk drive value in the market place. 
Reliability, features and cost tough to 
beat. We deliver... and we stand behind 
our products. AEROCOMP is the only 
manufacturer to offer FREE TRIALI Buy 
Aerocomp drives today. You deserve the 
best. 

BEST FEATURES 

* Fast 5 ms. track-track access time. 

* Operates single or double density. 

* "FLIPPY" feature for lower media cost 
|4(>l &80-IL 

* Head load solenoid. 

* Disk ejector. 

* Easy entry door. 

* NEW EXTERNAL 
CONNECTION. [n 

cover to hook up cab 



DRIVE CABLE 

longer neefi lo remove me 



MODEL III 

DISK DRIVE 

SYSTEMS 



Disk Drive Sysrem Kirs for your Model III 
complere wirh 40 Track Aerocomp Disk 
Drives (one or rwo), Disk Controller 
Board, Power Supply, Mounting Towers 
and all necessary cables and hardware. 



System Kit with One Drive $499 

System Kit with Two Drives . . . $699 



Convert your cassette- based Model 
to Disk Drives Today! 



ORDER TODAY! 



40-Track Drive 

80-Track Drive 

40-Track "FLIPPY" Drive. . . 
80-Track "FLIPPY" Drive. . . 
40-Track Dual-Head Drive. 
80-Track Dual-Head Drive. 



Ail .ihow drives <ve complete will 
ami external rfnve cable conriecnor 
'jO/OO H/ available on special orde 

• 

• 



. $259.95 
$409.95 

. $329.95 

. $419.95 
$419.95 

. $569.95 

silver enclosure Dowei supply 
I IS VAC SO/60 H/ /MO VAC. 
Add i 15.00. 

40-Track Bare Drive $199.95 

80-Track Bare Drive $359.95 

40-Track "FLIPPY" Bare Drive$279.95 
80-Track "FLIPPY" Bare Drive$369.95 

* SPECIAL PACKAGES* 

STARTER A $299.95 

40-Track Drive, 2-dnve cable, TRSDOS 
2.3 Disk & Manual, Freight & Ins. 

STARTER B $369.95 

40-Track "FLIPPY" Drive, cable, TRSDOS 
2.3 Disk & Manual. Freight & Ins. 

COMBO C $379.00 

40-Track Drive, 2-dnve cable, 
LDOS • Freight & Ins. 

COMBO D $559.00 

80-Track "FLIPPY" Drive, 2-dnve cable, 
LDOS' Freight & Ins. 

COMBO E $63900 

Two 40-Track Drives, 2 -Drive 

cable. TRSDOS 2.3 Disk & Mannual, 

Freight & Ins. 

COMBO F $989.00 

Two 80-Track "FLIPPY" Drives, 4-dnve 
LDOS Ins 

COMBO G $889.00 

Two 40-Track Dual-Head Drives, cable, 

smalLDOS Disk & Manual. Freight & 

Ins. 

COMBO H $1289.00 

Two 80-Track Duaf-Head Drives, cable, 
LDOS , Freight & INS. 

DOSPLUS 3.4 or NEWDOS / 80.2.0 
available wirh any package ar exrra cosr. 

AdilS5 00 per drive lor shipping S handling (Corn. US) 

FREE TRIAL OFFER 

Order your AEROCOMP Disk Drive and 
use it with your system for up to 14 
days. If you are not satisfied for ANY 
REASON (except misuse or improper 
handling), return it, packed in the 
original shipping container, for a full re- 
fund. (> hardware only. Special packages will be prorared). 

We have complete confidence in our pro- 
ducts and we know you will be satisfied! 
ORDER TODAYJI! 



WARRANTY 

We offer you a 1 20 day unconditional 
warranty on parts and labor against any 
defect in materials and workmanship. In 
the event service, for any reason, 
becomes nescessary, our service depart- 
ment is fast, friendly and cooperative. 

100% TESTED 

AEROCOMP Disk Drives are completely 
assembled at the factory and ready to 
plug in when you receive them. Each 
drive is 100% bench tested prior to ship- 
ment. We even enclose a copy of the 
test checklist, signed by the test techni- 
cian, with every drive. AEROCOMP 
MEANS RELIABILITY!! 

ORDER NOW!! 

To order by mail, specify Modei 
Number(S) of Drive, cable, etc. (above), 
enclose check, money order, VISA or 
MASTERCHARGE card number and ex- 
piration date, or request C.O.D. ship- 
ment. Texas residents add 5% sales tax. 
Add $ 5.00 per drive for shipping & handl- 
ing (Cont. US). Please allow 2 weeks for 
personal checks to clear our bank. No 
personal checks will be accepted on 
C.O.D. shipments-cash, money orders or 
certified checks only. You will receive a 
card showing the exact C.O.D. amount 
before your shipment arrives. Be sure to 
include your name and shipping address. 
You will be notified of the scheduled 
shipping date. Your bank credit card will 
NOT be charged until the day we ship.!! 

DRIVE CABLES 

2 DRIVE S24.95 

4-DRIVE S34.95 

WRITE AEROCOMP TODAY 
FOR MORE VALUES II! 



CALL TOLL FREE FOR FAST SERVICE 
(800) 824-7888, OPERATOR 24 

FOR VISA/MASTERCHARGE/C.O.D. ORDERS 

California dial (800) 852-7777. Operator 24. Alaska 
and Hawaii dial (800) 824-7919, Operator 24. 
TOLL FREE LINES WILL ACCEPT ORDERS ONLYl 

For Applications and Technical information, call 
(214) 337-4346 or drop us a card. 



Dealers inqiries invited 

AE3GCGfilP 

Redbird Airport, Bldg. 8 

P.O. Box 24829 

Dallas, TX 75224 " 82 



^See List ol Advertisers on Page 435 
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TECHNIQUE 



Block Letters for 
The Mod 



by George Berman 



Following a heavy session of statisti- 
cal analysis, I found myself peering at a 
ream of fanfold, trying to decipher what 
I had done on each page. Then I remem- 
bered the clearly titled output I used to 
get in batch runs at a service bureau, 
and I realized I needed a titling routine 
to make my listings readable. The pro- 
gram I designed will add big block-letter 
title pages to your fanfold stacks. 

Program Listing 1 shows how the ti- 
tles are generated. It draws upon a di- 



Make your printed pro- 
gram listings more 
readable with these big 
block-letter title pages. 

rect-access file, called Block, which con- 
tains each character from ASCII(33) 
through ASCII(96). In this file, each 
record number corresponds to the 



REM 

1 REM 

2 ' 

10 REM 

11 REM 

12 ' 

20 REM 

21 REM 

22 REM 

23 REM 

24 REM 

25 REM 

26 REM 

27 ' 
100 
110 
111 ' 
200 REM 
201 
202 
203 ' 
300 

310 

311 ' 

400 

410 

420 

421 

422 

423 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 END 

630 

640 

650 



TITLE/UTL 9 MAY 82 G R BERMAN 

Prints block titles using 5x5 characters 

INPUT FILE 
BLOCK/UTL Direct-access file of block-letter strings 

VARIABLES 

F$(4) Fields for strings defining a character 

L$(NL) Lines of title 

NL Number of lines in title 

R Record containing character 

TH Horizontal tab to center each line 

TV Vertical tab to center title block 

DEFINT A-Z : DEFSTR F 
DIM F$(4 ) 

CONSTANTS 

P=66 ' Page length , lines 

W=96' Page width, characters 

OPEN "D", 1, "BLOCK/UTL", 25 

FIELD 1, 5 AS F(0), 5 AS F(l), 5 AS F(2), 5 AS F(3), 5 AS F(4) 

CLS : PRINT CHR$( 26); " TITLE " ; CHR$(25) 
INPUT "HOW MANY LINES"; NL : DIM L$(NL) 
FOR I = 1 TO NL 
INPUT LSI I) 

IF 7*LEN(LS(D) > W THEN 630 
NEXT 

TV = (P - 7*NL)/2 

FOR I = 1 TO TV : LPRINT : NEXT 
FOR I = 1 TO NL 

TH = (W - 7*LEN(L$(I> ) )/2 
FOR K = TO 4 
LPRINT TAB(TH) ; 
FOR J = 1 TO LEN ( L$ ( I ) ) 

R = ASC(MID$(L$(I) ,0,1) > - 32 
IF R>0 THEN 530 

LPRINT " " ; : GOTO 550 
GET 1, R 
LPRINT F(K); 
LPRINT " "; 
NEXT J 
LPRINT 
NEXT K 

LPRINT : LPRINT 
NEXT I 
SYSTEM "T" 

PRINT : PRINT CHR$(26); "LINE"; I; "TOO LONG. START OVER." ; CHRSC25) 
FOR J = 1 TO 2500 : NEXT 
GOTO 400 

Program Listing I 



ASCII code of the character, less 32. 

Within a record, five fields define 
rows 1 -5 of the enlarged block letter. 
These are mostly constructed from # 
signs, with a few exceptions (see Fig. 1). 
The program produces a 5-by-5 repre- 
sentation of each character in your title. 
It centers each line horizontally, and 
centers the entire title block vertically on 
the page. You will need to insert the ap- 
propriate page length and width in lines 
201 and 202. To run the program, set 
the top of form on your printer and 
align the paper perforation. Then, an- 
swer the prompts for the number of 
lines and for what's in each line of your 
title, and the printing will begin. 

When loading the direct-access file, 
Block, remember Program Listing 2 is a 
user-friendly file loader. Every time you 
specify a character, it displays a 5-by-5 
block outline on the screen and lets you 
fill the rows one by one. If necessary, 
you can shut down and begin later. The 
sequence of entries is unimportant, and 
you don't have to complete all charac- 
ters if you don't think you'll need them. 
Feel free to redesign the characters. 
Some people like to use the lowercase 
letter instead of the # sign, but I think it 
results in an uneven appearance. By fol- 
lowing the character designs in Fig. 1, 
without making many changes, you 
should be able to load Block in less than 
thirty minutes. ■ 



Contact George Berman at 84 
Franklin Ave., Yonkers, NY 10705. 



The Key Box 

Model II/16 
32K RAM 
TRSDOS 

Printer 
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# # # # # # # # # # # # # 

# # # # # # # # # # # # # # 



# * # # # # # # ### #### ### #### 

# # # # ## ## ## # # # # # # # # # 

# ### # # # # # # # # # #### # # ### 
# # # # # # # # ## # # # # *# # # 




### # # ##### # # # # ### # 



###* # # 



### 



### 



#### 



# 
# 



# 
# # 



##### # # # # # # # # # # ##### 

# # # # # # # # # # # # 

# # # # # # # # # # # 

# # # # # # # # # # # # 

# 



### 



# # 
# # 



## 



## 



# 



# # # # 



# 



##### 



# 



# # # 

# # # 

# #### # 



##### ### ### ### 

# # # # # # /# 

# ### #### # / # 

# # # # #/ # 

# ### ### ### 



# # * 
# # * * 

# # 
## ## 



# 
# 

# 

# 



> 



##### > 



# ### # # ### 

> # # # # # 

# # ### ## 

# # # # # 
### # # * 

Figure I 



REM 

1 REM 

2 ' 

10 REM 

11 REM 

12 ' 

20 REM 

21 REM 

22 REM 

23 REM 

24 REM 
2 5 REM 
26 ' 
100 
110 
111 ' 
200 
210 
211 ' 
300 
310 
320 
330 
340 
350 
360 
365 
37Q 
380 
390 
400. - 
410 
420 
430 END 



LOADBLOC/UTL 9 MAY 82 G R BERMAN 

Loads file with title characters in 5 x 5 format 

OUTPUT FILE 
BLOCK/UTL Direct-access file of block-letter strings 

VARIABLES 

AS Temporary variable 

C$ String defining character 

F<4) Fields for strings defining a character 

L$ Character being coded 

R Record containing character 

DEFINT A-2 : DEFSTR F 
DIM F(4) 

OPEN "D" , 1, "BLOCK/UTL", 25 

FIELD 1, 5 AS F(0), 5 AS F(l), 5 AS F(2), 5 AS F(3), 5 AS F(4) 

CLS : PRINT "TYPE 'END' TO QUIT" 

INPUT "CHRACTER TO BE CODED"; L$ 

IF L$ = "END" THEN 430 

R = ASC(L$)-32 

PRINTS (5,0), STRING$(5,124) : PRINT @ (11,0), STRINGS ( 5 , 124 ) 

PRINT @ (6,0) , ""; 

FOR I = TO 4 

LSET F( I) = "" : CS = "" 

AS = INKEY$ : IF AS = "" THEN 370 

IF AS = CHRS(13) THEN PRINT AS; : GOTO 400 
PRINT AS; : CS = C$ + AS : GOTO 370 

LSET F(I) = CS 
NEXT 
PUT 1, R : GOTO 300 



Program Listing 2 






If you 
ever wished that 
you had a better program- 
ming language, PASCAL 80 may 
be the language you dream about. It is 
a compiled language, faster, more ac- 
curate and easier to modify than Basic. 
Yet it is so easy to use that you can 
forget the hassles and diskette spinning 
of other compiled languages, including 
other versions of Pascal. 

Now you can create your own com- 
mand files that execute from DOS 
without having to load a language into 
the computer first, but do it with far less 
work than machine language. You can 
sell your compiled programs without any 
royalty payments! 

Although designed for teaching and 
ideal for that purpose, PASCAL 80 also 
allows serious applications with a full 
fourteen digits of accuracy, even on log 
and trig functions! 

Both random and sequential access 
files are supported, without cumber- 
some format statements. 

PASCAL p offers most of the 
features of ISO Standard Pascal as well 
as a number of useful extensions, in- 
cluding CLS, PEEK, POKE, CALL and 
graphics commands, Pascal 80 exten- 
sions include the use of READ and 
WRITE with record oriented files, 
ELSE in CASE statements,; and other 
useful? features:. 

PASCAL 80 allows you to create files 
on the TRS-80® Model I, Model III, 
LNW-80, PMC-80, or LOBO MAX-80 
that will run on any of the other 
machines under TRS-DOS®, LDOS, 
NewDOS, NewDOS 80, DBL-DOS or 
DOS Plus. 

PASCAL-80 

PASCAL 80 is used in dozens of High 
Schools, Colleges, and Technical 
Schools, and has been favorably re- 
viewed in Byte, Creative Computing, 
and other magazines. 

You get all of this at a bargain price of 
only $99 plus $2 shipping. If you call and 
order by MasterCard or VISA, we will 
even credit you $1 for the phone call. 
Call or send your check today! 



NEW QLASSICS SOFTWARE 



239 Fox Hill Road 
Denville, NJ 07834 4 
(201) 625-8838 ^255 



£ST 



TRS-80*and TRS-DOS are trademarks of Radio Shack, 
LNW-80 of LNW Research, PMC-80 of Personal Micro 
Computers, LOBO, LDOS, and MAX-80 of Lobo Systems, 
DOS-Plus of Micro Systems Software, NewDOS and 
NewDOS 80 of Apparat, and DBL-DOS of Percom. 
PASCAL 80 is a trademark of New Classics Software. 
Pointer Variables, Variant Records, NEW, DISPOSE, 
WITH, GET, and PUT are not implemened in PASCAL 80. 



^■See List of Advertisers on Page 435 



80 Micro, January 1983 • 179 



UTILITY 



Make yours more efficient. 



The Garbage Collector 



Bob Snapp 

3719 Mantell Avenue 

Cincinnati, OH 45236 



Variable length character strings are a 
boon to the high-level language pro- 
grammer. Consider printing an employee's 
name on a paycheck. If the name were John 
Jones, you would not want it on the check 



Reserved memory 
Allocated by Memory Size? 



String Space 

Allocated by Clear statement 



Stack 

(moves downward) 



Free memory 



Array Table 
and 

Variable Table 
(moves upward) 



Resident Basic program 



File butters 

Allocated by Number of Files? 



Basic interpreter, 
Reserved storage, 
Operating system. 



Table 1. Microsoft Basic Memory Map. 



The Key Box 

Model I, II, or III 
Microsoft Basic 



as John Jones, but with the last name im- 
mediately adjacent to the first. Using fixed- 
length strings, each name field is as long as 
the longest practical name and is filled with 
blanks. For the desired appearance you 
would have to tediously count the number 
of trailing blanks in the first name field and 
subtract that from the maximum field 
length. We should be grateful Microsoft 
chose the variable length approach such 
that we can LPRINT NF$;" ";NL$. 

Suppose the application program con- 
structs an array of names where the longest 
is 30 characters, but the average length is 
only 12. If storage were statically allocated, 
an array of 1000 names would gobble up 
30,000 bytes of memory. North Star Basic 
and IBM's VSBasic handle strings this way. 
Our current generation processors address 



only 65,536 bytes of memory. The question 
is not "Can I justify the cost of more 
memory?", but "What would I do with more 
memory if I had it?" 

Again, Microsoft made the wiser choice. 
Memory is allocated dynamically as re- 
quired. In the example above, only 12,000 
bytes of memory are required to imple- 
ment the string array. 

Good things are not free. In exchange for 
flexible, memory efficient string handling, 
we require complex overhead to manage 
the strings. 

Table 1 is a map of memory allocation for 
Microsoft Basic. Two of the map areas are 
completely dynamic: The stack moves 
downward and the variable/array tables 
move upward. Stack requirements are nor- 
mally minimal, but deeply nested GOSUBs 
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Table 2 
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or For.. .Next loops can make it quite large. 
When the stack is about to bump into the 
variable/array tables, or vice versa, the 
dreaded OM error results. 

Let us direct our attention to the string 
space. A storage pool for strings is set aside 
immediately below any reserved memory. 
The size of this area is determined by the 
Clear nnnn statement; defaults are 50 or 100 
bytes, depending upon the TRS-80 model. 

Within the variable table, a string oc- 
cupies three bytes of storage: one byte for 
the current length of the string (0-255), two 
bytes for the location of string data. The 
string data can be in one of four places. If 
the string was named in a Field statement 
the data is in the file buffer area. If it was 
created by a Let or Read statement the data 
is contained within the Basic program. A 
string length of zero has no string data. In 
any other situation the string data is 
located somewhere in the string pool. 

Space in the pool is allocated to active 
strings starting from the top. Pointers are 
maintained by Basic to next available string 
location and to top of stack. To store a 
string in the pool, the number of bytes re- 
quired is subtracted from next available. 
The result is compared to top of stack. 



When the comparison shows available 
space the string is stored, next available is 
updated and processing continues. 

Here is a simple Basic program; a 
diagram of what the string pool will look like 
is in Table 2. 



10 CLEAR 12 



20 A$ 
30 B$ 
40 C$ 
50 C$ 
60 A$ 



STRING$<3," ") 
STRING$<3," ") 
AS 

B$ 
C$ 



The letter F indicates a free position in the 
pool. Following the execution of line 10, all 
12 positions are free. When line 20 is ex- 
ecuted, the top three positions are allocated 
to A$. In lines 30 and 40, space is further 
allocated to B$ to C$. Note carefully the 
results of line 50. When C$ is assigned a sec- 
ond value, additional space was taken from 
the pool for the new value. The old space oc- 
cupied by C$ is abandoned! This space is 
marked with the letter G (for garbage). 

The problem arises during the execution 
of line 60. The interpreter determines three 
more bytes of string storage are needed for 
the new value of A$, but no space is 
available. 



GARBAGE-COLLECTOR: PROCEDURE; 

IF PACKED-INDICATOR = TRUE THEN SIGNAL ERROR (OUT-OF-STR IN G -SPACE); 
PACKED-INDICATOR = TRUE; I* caller sets back to false */ 
NEXT-AVAILABLE -STRING-LOCATION = TOP-OF-STRING-SPACE; 
DO UNTIL (HIGH-STRING-LOCATION = 0); 
HIGH-STRING-LOCATION = 0; 
POSTION = START-OF-WORKSPACE; 
DO WHILE (POSITION < END-OF-WORK5PACE); 
CALL EVALUATE-STRING-LOCATION; 
INCREMENT POSITION TO NEXT WORKSPACE ENTRY; 
END; /* do while (position < end-of-workspace) */ 
POSITION = START-OF-VARIABLE -TABLE; 
DO WHILE (POSITION < END-OF-VARIABLE-TABLE); 

IF VARIABLE -TYPE = STRING THEN CALL EVALUATE-STRING-LOCATION; 
INCREMENT POSITION TO NEXT VARIABLE ENTRY; 
END; /* do while (position < end-of-variable-table) */ 
POSITION = START-OF-ARRAY-TABLE; 
DO WHILE (POSITION < EN D-OF-ARR AY-TABLE); 
IF ARRAY-TYPE = STRING THEN DO; 

CALCULATE SIZE OF ARRAY AND POINT POSITION AT FIRST ELEMENT; 
DO WHILE (MORE ELEMENTS IN THIS ARRAY); 
CALL EVALUATE-STRING-LOCATION; 
INCREMENT POSITION TO NEXT ELEMENT; 
END; /* more elements in this array */ 
END; /* array type = string */ 
INCREMENT POSTION TO NEXT ARRAY; 
END; /* position < end-of-array-table */ 
CALL PACK-SELECTED-STRING; 
END; /* until high-string-location = */ 
RETURN; /* that's all, folks! */ 
EVALUATE-STRING-LOCATION: PROCEDURE; 
IF STRING-LENGTH = THEN RETURN; 

/* don't bother with null strings */ 
IF STRING-DATA-ADDRESS > NEXT-AVAILABLE-STRING-LOCATION THEN RETURN; 

/* above test indicates this string already packed */ 
IF STRING-DATA-ADDRESS < BOTTOM-OF-5TRING-5PACE THEN RETURN; 

/* above test indicates this string not in string space */ 
IF STRING-DATA-ADDRESS < HIGH-STRING-LOCATION THEN RETURN; 

/* this means that this is not the highest string data */ 
HIGH-STRING-LOCATION = STRING-DATA-ADDRESS; 

HIGH-STRING-DESCRIPTOR-ADDRESS = CURRENT-STRING-DESCRIPTOR -ADDRESS; 
RETURN; 
END; /* EVALUATE-STRING-LOCATION »/ 
PACK-SELECTED-STRING: PROCEDURE; 

/* references here relative to high-string-descriptor-address */ 
MOVE STRING DATA TO (NEXT-AVAILABLE-STRING-LOCATION - STRING-LENGTH 
STRING-DATA-ADDRESS = (NEXT-AVAILABLE -STRING-LOCATION 

- STRING-LENGTH + 1); 
NEXT-AVAILABLE-STRING-LOCATION = 

NEXT-AVAILABLE -STRING-LOCATION - STRING-LENGTH; 
RETURN; 
END; I* PACK-SELECTED-STRING »/ 
END; /* GARBAGE-COLLECTOR »/ 

Program Listing 1 
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THE SOFT 
SOLUTION 

USE YOUR TRS-80 
WHILE IT PRINTS! 

Don't Spend 
Hundreds For A 
Buffer Box, Get 
The Soft Solution: 

SPOOlIT Works 

Automatically with 
Almost Any TRS-80 
Program! 

SPOOlIT uses techni- 
ques similar to those 
used on large computers 
to allow you to print in 
the 'Background' while 
doing other tasks in the 
'Foreground.' 

SPOOlIT: Only $40 

ORDER NOW 

(212)807-7033 

NEVINS MICROSYSTEMS INC. 

210 Fifth Ave. 
N.Y., N.Y. 
10010 
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FOR YOUNG CHILDREN 

Nine educational and entertaining 
games controlled by a single pro- 
gram. Even very young children can 
select a game, play it, and select a 
ditterent game ...ALL BY THEMSELVES! 

• PICTURE MENU GIVES CHILDREN 
CONTROL 

• MATCH NUMBERS AND LETTERS 

• COUNT COLORFUL BLOCKS 

• ADD AND SUBTRACT STACKS OF 
BLOCKS 

• LEARN THE ALPHABET 

• PRACTICE SPELLING NAMES 

• COMPARE SHAPES 

• DRAW AND SAVE COLORFUL PIC- 
TURES 

The large numbers and letters till the 
screen with color. Children enter 
single key stroke responses and get 
immediate visual and musical feed- 
back. Hints are provided when ap- 
propriate. Beyond just teaching 
children basic skills, EARLY GAMES 
makes them feel comfortable as they 
control the computer. Designed for 
children ages 2V2 to 6 years old. 

EARLY GAMES offers the child a 
diverse selection of activities which 
stimulate the process of problem 
solving as well as foster individual 
creativity. 

Pamela Bach, Director 
Youth World Day Care Center 

I took EARLY GAMES home for my kids 
and they really liked it! It held their at- 
tention and they learned from it! 

Jeanette Fritze 
Computer Saleswoman 

EARLY GAMES can help children 
learn new concepts, information, 
and skills and also introduce them to 
the joys and benefits of home com- 
puters. 

Peter Clark, faculty 

Institute of Child Development 

University of Minnesota 

All nine games for $29.95 

(Minnesota residents add 5% sales tax) 

Apple II Plus 

IBM Personal Computer 

Atari 24K Disk or 16K Cassette 

TRS-80 Model l/lll 32K Disk or 16K Cassette 

TRS-80 Color Computer 16K Disk or Cassette 





VISA/MasterCard 



EARLY GAMES 

educational software 

Suite 140E 
Shelard Plaza North 
Minneapolis, MN 55426 
1-800-328-1223 

Minnesota residents call: AM 

^402 

612-544-4720 



"Garbage collection occurs in 
inverse proportion to the 
amount of unused string space." 



CT = ( ( ( 149 * SV (use 129 for Mod II) 
+ 271 " AC (use 251 for Mod II) 
+ 92* AE 
+ 53 * NS 

+ 219 * NN (use 199 for Mod II) 
+ 21 *SS 

+ 258 )* PS) + (83* BC))/CS 
Where: CT is collection time In seconds; 

SV is the number of simple (non-array) variables; including string variables; 
AC is the number of arrays; 
AE is the number of string array elements; 
NS is the number of null (zero length) string elements, 
NN is the number of non-null string elements, including those located out- 
side the string pool; 
SS is the number of simple (non-array) string elements; 
PS is the number of non-null string elements located in the string pool; 
BC is the total number of bytes used for string data; and 
CS is the Z-80 clock speed, in cycles per second: 
Unmodified TRS-80 clock speeds are: 
Model 1-1774083, 
Model H-4000000, 
'Model III-2027520. 

Figure 1 



The Garbage Collector 

Alarms go off all over the place! The in- 
terpreter calls the Garbage Collector. The 
garbage collector arrives and finds a hole in 
the middle of the pool. He pushes the value 
of C$ upward into the hole, leaving a new 
free area at the bottom of the pool. The gar- 
bage collector departs, leaving his bill be- 
hind. In this case his invoice is not for 
money, but for time. 

In this example, the garbage collector 
acts quickly. When many strings are active 
his job can become rather formidable. He 
always comes through, but sometimes his 
bill is very large. 

I have transcribed his operations guide 
into a PL/l-like pseudocode, in Listing 1 . The 
amount of work he has to do grows ex- 
ponentially with the number of strings. The 
main loop, Do until High-String-Location = 
0, is executed once for each string in the 
pool. The hottest subroutine, Evaluate- 
String-Location, is executed (for each itera- 
tion of the main loop) once for every string. 

The formula in Fig. 1 calculates the time it 
takes the garbage collector to do his work: 

Many factors are usually not significant 
in determining the final result. A good ap- 
proximation can usually be found from: CT 
= 310 * PS A 2 / CS (300 for Model II). 

The second formula was derived from ex- 
perimentation, rather than calculations and 
is often more accurate than the first. 

The time required to garbage collect is 
roughly proportional to the square of the 
number of strings. If you double the number 
of strings, you multiply the garbage collec- 
tion time by four. 

For a Model III program with 500 active 
strings, using the second formula, we get: 
310 * 500 A 2 / 2027520 or 38.224 seconds. Dur- 



ing this time, the machine will seemingly 
lock up, not responding even to the Break 
key. Your machine is not malfunctioning. 

To take the matter to its ridiculous ex- 
treme, the program shown below will pro- 
duce a garbage collection time (Model III) of 
3 hours, 26 minutes, 24 seconds, again us- 
ing the second formula. 



10 CLEAR 9100 

20 DIM A$(9000) 

30 FOR l% = 1 TO 9000 

40 A$(l%) = CHR$(32) 

50 NEXT 

60 PRINT TIMES 

70 PRINT FRE(A$) 

80 PRINT TIMES 



Garbage Reduction Methods 

Reducing garbage collection time can be 
divided into two main groups: Reducing the 
frequency of garbage collection and reduc- 
ing the time required for garbage collection. 
Reducing frequency is simpler. 

Without changing the code in the pro- 
gram, increase the value in Clear to cause 
less frequent garbage collection. Garbage 
collection occurs in inverse proportion to 
the amount of unused string space. In a pro- 
gram using 1000 bytes of string space with 
1100 bytes as a string pool, garbage collec- 
tion occurs at some general rate N. If you 
were to clear 6000 bytes, the unused string 
space is 50 times as large and garbage col- 
lection occurs at the rate N/50. Your best 
choice is to clear the largest possible value. 

You determine this by trial and error. 
Keep increasing the cleared value until you 
get OM errors, then reduce it until OM errors 
go away. To be safe reduce it by a few hun- 
dred bytes more than seems necessary. 
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EPSON MX-1 00 III, MX 80 ■ FT III, MX 80 - III CALL FOR PRICE 

Okidata 80 Printer 80 CPS, List $449 $330.00 

Okidata 82A Printer 1 20 CPS, List $649 $440.00 

Okidata 83A Printer 1 20 CPS, List $1,119 $675.00 

Okidata 84 Printer (parallel) 1 32 column, 200 CPS $980.00 

Okidata 84 Printer (serial) 1 32 column, 200 CPS $1050.00 

Okidata 2350 Printer (parallel) 1 32 column, 350 CPS two color 

ribbon, List $2,800 $1860.00 

Smith Corona TP-1 Daisy-wheel printer, parallel or serial, 10 or 

1 2 pitch, List $895 $615.00 

BMC 1 2AU 1 2 inch 1 5 MHZ, green on black monitor $95.00 

BMC 1 2EU 1 2 inch 20 MHZ, green monitor with non-glare screen $129.00 

DC Hayes Smartmodem (300 & 1 200 BAUD) List $699 $505.00 

DC Hayes Smartmodem, List $279 $219.00 

Diskette storage case for 5V< inch diskettes (holds 1 00 diskettes) $18.00 
Practical Peripherals Epson Buffer (parallel 16K) for Apple II or 

Radio Shack, List $1 59 $125.00 

Percom Doubler II $149.00 

Practical Peripherals Micro Buffer Inline 32K (specify serial or 

parallel) $244.00 

Tandon 40 Track Drive complete w/case & power supply $255.00 

CASH ONLY PRICE INCLUDES money order, certified company & personal check & COO. 
Personal and company checks take two 
weeks to clear. 

Shipping & Handling Charge on light 

items $2.50. Prices subject to change 

without notice. NJ residents add 5% til -\ ro 

sales tax. M I Mb(W ff 

HOURS: 10 AM to 5 PM Weekdays. f J ^i*\) Uj 

After 5 PM and Weekends 

Questionable. 

|S<fi3FiNC 

Send for 

PHMPI PTF \ P0B °X 1449. BL00MFIELD«NJ» 07003 

circular 55 201-751-8444 




TRS-80™ Model 1 & 3 Software 

MACHINE LANGUAGE SOFTWARE 
MONITOR #5 $59.95 

Disassembler; memory displays; move, search, modify 
memory; read and write machine language cassettes; object 
code relocator; hexadecimal arithmetic; disk file input and 
output; direct input and output of disk sectors; RS-232-C 
input and output; complete debugging package including 
single stepping, setting and displaying registers, setting 
breakpoints and executing machine instructions. 

SYSTEM DIAGNOSTIC $99.95 

Tests for every component of your TRS-80 Model 1 or 3: 
ROM, RAM, Video Display, Keyboard, Cassette Recorder, 
Line Printer, Disk Drives, RS-232-C Interface. Disk drive 
tests handle single and double density, 35, 40, 80 track drives. 

SMART TERMINAL $74.95 

Model 1 1 CP/M Version $79.95 

The intelligent telecommunication program. Automatic 
transmission and reception of data. True BREAK key. Com- 
plete character mapping, lower case. Cassette and disk files 
compatible with both SCRIPSIT" and Electric Pencil'". Same 
program supports both cassette and disk systems. 

Documentation to any program can be purchased sepa- 
rately for $10.00, deductible from later software order. 
Specify TRS-80 Model 1 or 3. 
Send S.A.S.E. for FREE software catalogue. 
Add S3. 00 for postage and handling. 
New York State residents add 4V*% sales tax. 

HOWE SOFTWARE 

14 Lexington Road, New City, New York 10956 

(914) 634-1821 

TRS-80 is a registered trademark of Tandy Corp. ^ 1 75 
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THE PROFESSIONAL 
TOOL FOR STOCK AND 
OPTION TRADING 

Includes: 

• Black— Scholes Call Valuation 

• American Put Option Valuation 

• Unrealized Profit and Loss 

• Strategy Costs 

• And More. . . 

TRS-80 MODEL I OR III 



Complete ProTrade Package: $350 
Manual with Demo Disk: $35 
(Applies to Purchase) 



ORDER NOW 

(212) 807-7033 



NEVMS MICROSYSTEMS MC 

210 Fifth Avenue 
New York, NY 
10010 




sSee List ol Advertisers on Page 435 
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TRS-80* 

Models 
l&lll 



RIMES 



Discount 
Prices! 



«jgp> 



Greaf 6/ft fcfeas for Christmas! 

Your Cost 

For Little Kids (Ages 4 - 1 0) Tape / Disk 

Little Red Riding Hood (Adv. Int.) 11.90/ - 

Old McDonald's Farm (Adv. Int.) 1 1 .90/ - 
Twas the Night Before Xmas 

(Adv. Int.) 11.90/ - 

The Playful Professor (Med. Sys.) 11.90/14.30 

For Big Kids 

The Eliminator (Adv. Int.) 15.90/19.90 

Reign. . .Red Dragon (Adv. Int.) - / 19.90 

Star Fighter (Adv. Int.) 19.90/23.90 
Crush, Crumble & Chomp 

(Auto. Sim.) 23.90/23.90 

Defense Command (Big Five) 12.70/15.90 

Robot Attack (Big Five) 1 2.70/1 5.90 

Panik (Fantastic) 15.90/19.90 

The Institute (Med. Sys.) 15.90/18.30 

Laser Defense (Med. Sys.) 11.90/14.30 

Strike Force (Melbourne) 13.55/16.95 

For the Office 

Personal Check Mgr. (Adv. Int.) - / 19.90 

Mail List (Precision Proto.) - / 71.90 

Electric Webster (Prosoft) - /1 19.60 

Newscript 7.0 (Prosoft) - / 99.90 

Newscript 7.0 & Labels (Prosoft) - /111.90 

Free surprise gift with order! 
RIMES COMPUTER PRODUCTS 

262Tracey, Dept. 1A 

Grand Island, N.Y. 14072 

(716)773-2519 

Add $1 .50 for U.S. shipping. Add $1 .50 for COD. 

Add $4.50 for Canada or Mexico. 

For fastest service send M.O. or cert, check, 

Mastercard/Visa also accepted. 

Allow 2 weeks for personal checks. 

New York Residents add sales tax. 

'TRS-80 is a trademark of Tandy Corp. , 



No Shipping or 
Handling Charges! 

DRIVES TANDON TEAC 

Bare Complete Bare Complete 

40TkSS $216 $248 $216 $248 
40 Tk DS 289 345 309 359 
80 Tk SS 289 345 309 359 
80TkDS 379 429 419 459 

MODEMS 

HAYES Smartmodem $229 

HAYES Smartmodem 1200 559 

HAYES Chronograph 219 

Signalman Mark I D.C 95 

UDS103OALP 169 

UDS 103 JLP 205 

PRINTERS 

Epson MX80 FT $559 

Epson MX100 749 

Microline 82A 479 

ORCHESTRA 85/90 99 

Orchestra Software Call 

COMPUTERS 

Model III with 2 Tandon Drives $1785 

Model III with 2 Tandon 

Drives and RS232 1880 

LNW80 Model I 1475 

LNW80 Model II 2050 

TIDEWATER DATA SYSTEMS 

14 PARKVIEW AVENUE 
PORTSMOUTH, VIRGINIA 23704 
(804) 397-9636 ^ 3 38 

All prices discounted for cash. 

Charge orders 4% additional 

We accept MasterCard and Visa 

Virginia Residents Please Add 4% Sales Tax. 



"Multiple concatenation is 
another string space villain." 



Programs tend to require changes. To keep 
from re-doing the trial and error use a 
reverse logic clear. The space required for 
variables and stack changes slowly when 
modifications are made to the program. Use 
the following technique: Determine, through 
the trial and error process, the largest prac- 
tical amount to clear. Call this value X. Enter: 
CLEAR : PRINT MEM. Call this value Y. The 
expression Y-X represents the space 
needed for variables and stack. Call this 
value Z. Replace the Clear statement in 
the program with CLEAR 0:CLEAR MEM - 
Z, plugging in the number derived above. 

Each time a string variable appears on 
the left side of an assignment statement 
(statement containing an equal sign), the 
old value of the string variable is aban- 
doned unless the string variable is used 
with LSET, RSET or MID$. The easiest way 
to benefit from this is to prevent the 
abandonment of a string when its value, not 
its length, changes. If A$ and B$ both have a 
length of 15, A$ = B$ causes the previous 
space occupied by A$ to be abandoned, 
contributing to the fragmentation which 
calls the garbage collector. The execution 
of MID$(A$,1,15) = B$, will not contribute to 
fragmentation. 

Multiple concatenation is another string 
space villain. If A$, B$, C$, D$ and E$ all 
have a length of 5 and we want to construct 
Z$ with the five other strings strung to- 
gether, the execution of Z$ = A$ + B$ + 
C$ + D$ + E$ will play havoc with the 



string space. Basic will execute the state- 
ment as if you had entered: 

T1$ = a$ + B$ 

T2$ = T1$ + C$ 

T3$ = T2$ + D$ 

Z$ = T3$ + E$. 

A much less damaging set of code would be: 

Z$ = STRING$(25,0) 
MID$(Z$,1,5) = A$ 
MID$(Z$,6,5) = B$ 
MID$(Z$,11,5) = C$ 
MID$(Z$,16,5) = D$ 
MID$(Z$,21,5) = E$. 

The first statement in this sequence could 
be omitted if Z$ already had a length of 25. 
A typical set of code found in an INKEY$ 
routine might look like: 

100 W$ = "" 

110 l$ = INKEYS : IF l$ = "" THEN 110 

120 IF ASC(I$) = 13 THEN RETURN 

130 W$ = W$ + l$ 

140 IF LEN(W$) = N THEN RETURN ELSE 110 

A less damaging code would be: 

100 W$ = STRING$(N,"") 

110 l$ = INKEYS : IF IS = " " THEN 110 

120IFASC(I$) = 13 THEN 150 

130 K = K + 1 : MID$(W$,K,1) = IS 

140 IF K = N THEN RETURN 

150 FOR J = NT0 1 STEP -1 

160 IF MID$(W$,J,1)< > " " THEN P = J : J = 1 

170 NEXT 

180 W$ = LEFT$(W$,P) : RETURN. 



100 CLEAR 12000 
110 OPEN "R",1,"DATAFILE" 
120 FIELD 1, 10 AS FK$, 90 AS DT$ 
130 DIM RRX(LOFU)), KT$(LOF(D) 
140 FOR 1% = 1 TO LOF(l) 
150 GET 1,1% 
160 KT$(I%) = FK$ 
170 RR*(I*) = I* 
190 NEXT 

200 'INVOKE A MACHINE LANGUAGE SORT HERE. SORT KT$ and RR* 
210 'USING KT$ AS KEY, RR* TAGGING ALONG. 
220 LINE INPUT "NAME";SA$ : IF LEN(SA$) <> 10 THEN 220 
230 GOSUB 10000 

240 IF ER* THEN PRINT "NOT FOUND" ELSE PRINT DT$ 
250 GOTO 220 

10000 'BINARY SEARCH OF STRING ARRAY, 
RECORD RETRIEVED IF FOUND, 
ER* SET IF NOT. 
10010 ER% = 
: ZB% = 1 
: ZD% = LOF(l) + I 
: ZC% = (ZB% + ZD%) / 2 
10020 IF SA$ = KT$(ZC%) THEN GET 1,RR*(ZC%) 

: RETURN 
10030 IF KT$(ZC%) > SA$ THEN ZD* = ZC% 

: ZC* = (ZC% + ZB) / 2 
: IF ZC* = ZD* THEN ER* = -I 
: RETURN 
ELSE 10020 
10040 ZB* = ZC* 

: ZC* = (ZC% + ZD%) / 2 
: IF ZC* = ZB* THEN ER* = -1 
: RETURN 
ELSE 10020 

Program Listing 2 
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TERMINAL-WAR IS HERE 

IN THIS SPACEWAR MODEM GAME, YOU MUST NOT ONLY BEAT YOUR OPPONENT BUT THE COMPUTER AS 
WELL. CHOOSE FROM PHASERS. PHOTON TORPEDOES, TRACTOR BEAMS, AND 12 OTHER COMMANDS AS 
YOU ATTACK YOUR ENEMIES OR SIMPLY JUST DEFEND YOURSELF. 

ONLY $29.95 (split the cost with a friend) 

INCLUDES: 2 DETAILED MANUALS. 2 DISKS EACH WITH THE 2 PLAYER MODEM VERSION 1 PLAYER VER- 
SION, AND A SPECIAL TERMINAL PROGRAM SO 16K COMPUTER USERS CAN PLAY TERMINAL- 
WAR. (THE TERMINAL PROGRAM IS TRANSFERABLE TO CASSETTE). 
CASSETTE WITH TERMINAL PROGRAM ALREADY ON IT: $1 50 



SYSOPS: BBS VERSION AVAILABLE. 

MINIMUM SYSTEM REQUIREMENTS: 

2 FULL DUPLEX MODEMS 

1 32K DISK COMPUTER 

1 16K LEVEL II CASSETTE COMPUTER 
1 PLAYER VERSION: 1 32K DISK COMPUTER 

-DEALER INQUIRIES INVITED— 

MODEM ORDER LINE (607) 273-0596 



SPECIFY MOD I OR MOO III DISKS OR ONE OF EACH 

WE ACCEPT MONEY ORDERS, CERTIFIED CHECKS, 
C.O.D., PERSONAL CHECKS (2 WEEKS TO CLEAR) 
ADD $2.00 SHIPPING. NY RESIDENTS ADD 7% TAX. 

MAIL ORDERS: OCEAN COMPUTER PRODUCTS 
P.O. BOX 6474 
ITHACA, NY 14850 

24 HR. VOICE LINE (607) 273-6608 

^525 
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PROFESSIONAL SOFTWARE 



TRS-80® MODEL II & 16 



NOW AVAILABLE! + 

♦ 

BASIC COMPILER by microsoft .easy to use $339.00*1 

• TRSDOS* 2.0 COMPATIBLE • INCLUDES M-80, CREF-80 A EDIT 80 J 

• UP TO 30 TIMES FASTER • AUGMENTED WITH OUR DOCUMENTATION T 
DISK SORT • YOU DON'T HAVE TO BE A PROGRAMMER TO USE IT! „.„ n $69.99* i 

• MENU DRIVEN • RANDOM FILES • EASY TO USE • SPEC'S SAVED ON DISK nAMU DOC. ONLY $10°° X 

• EASILY INSERTED INTO JOB STREAM FOR NON-STOP RUNNING • FULL DISK CAPACITY DISK DEDUCTIBLE X 

• 1,000 REC's. SORTING 15 BYTES, INCLUDING ALL DISK I/O = 2 MIN, 45 SEC's. SUPPORTED ° N PURCHASES A 

BASIC CROSS REFERENCE .save hours! $59.99* ♦ 

• SEE USED LINE#s/NAMES AT A GLANCE • PRODUCES NICE PROG. LISTING • INDISPENSABLE DOC. ONLY $10°° ♦ 

EPSON mx-80$460«' mx-ioo$700 m * hurry-limited timei 

PAPER 914x11 18lb WHITE STRIPS TO 614x11 3,000/BOX 

MAILING LIST * high capacity • spans disk • no sorting 

• FAST RETRIEVAL-UPDATE • R/S CONVERSION INCLUDED • LONG/SHORT FORMATS 

• ESTIMATED AVAILABILITY - DEC. 1982 

•PLUS POSTAGE & HANDLING. PRICES SUBJECT TO CHANGE WITHOUT NOTICE. 

GOOD-LYDDON DATA SYSTEMS 
5486 RIVERSIDE DR., CHINO, CA 91710 



DED. ON PURCH. ♦ 

$25.00* ♦ 
$149.95*J 

DOC. ONLY SIO" ♦ 
DED. ON PURCH. ♦ 



I 
I 

>♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ ♦♦♦♦♦♦ ♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦/ 



TRS-80 & TRSDOS ARE 
REGISTERED 
TRADEMARKS OF 
TANDY CORP 



(714) 980-4563 



3RAMFILE0 

HAS GIVEN BIRTH 
TO A NEW PRODUCT! 

This new product is RAMSAIL. It 
controls Sales And Inventory Logging 
using the Random Access Memory in 
a cassette based TRS-80. * 
The tremendous speed of RAMFILE 
(the In-memory file manager) and 
the flexibility of BASIC have been 
married to create a package that will 
price item sales and print detailed 
customer invoices. The activity is 
continuously logged in memory to 
provide on-line inventory status and 
end of day summaries of product 
sales, receipts and payments. If you 
control less than 600 inventory items 
and want to automatically track sales 
and inventory, then RAMSAIL is the 
package for you. 

For Model I or III, 32K or 48K with 
printer. Cassette tapes and manual — 
$99.95. Manual available separately at 
$10.00. Illinois Residents include 5% sales 
tax. 

4E" INDIVIDUAL SYSTEMS INC. 
IS" P-O. BOX 343 

Downers Grove, Illinois 60515 

'Trademark of Tandy Corp. ^ 424 



SAVE MONEY ON 
TRS-80& COMPUTERS 




TRS-80 Model 16 



* All Inventory 100% TRS-80 Equipment 

* Free Price List 

1 No Out-Of-State Taxes 

* F-48 Warranty form 

* Immediate Shipment 



TRS-80 is the registered trademark of Tandy Corporation 



1-800-835-9056 

Kansas Residents — 316-624-1919 (collect) 

^ CHECK WITH US AND SAVE 

We have the largest Inventory in the 
Central United States. Immediate 
shipment directly to you from our 
warehouse. 

is Visa or Mastercard 
is Bank Cashiers Checks 
v* Bank Money Orders 
<s Bank Wire Transfers 



<s We now Carry Telephones 
and Telephone Answering 
Systems ! 



Jimscot, Inc. 

1023 N. Kansas — Box 607 

Liberal, Ks. 67901 " 254 




isSee List ol Advertisers on Page 435 
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Verbatim® 
Diskettes 



Top-quality Verbatim® Diskettes 
from Tech* Data, your complete 
word and data processing supply 
center. Dealer inquiries invited. 

Call Toll Free 

1-800-237-8931. 

In Florida, call 

813-577-2794. 



V 



Tech* Data Corporation 

325 1 Tech Drive North 
St. Petersburg, FL 33702 



W..I..D..E REPORT SUPPORT 

MDD 11/16 and DAISY WHEEL II 

Print 15 and 20 Characters/inch 



. 



D L P Company 

6798 Wetheridge Dr. 
Cincinnati, Ohio 45230 

513 232-7791 " 413 

VISA OR MASTERCARD ACCEPTED 

$75.00 

260 characters in just 13" at 20 
CPI; 170 in 7". Excellent qua- 
lity 15 CPI printing; 195 Char. 
in 13"; 120 in 8". SCRIPSIT™ 2.0 
TRSD0S w 2.0/4.1, VISICALC®, PRO- 
FILE™, BASIC, COBOL, etc. 



GO 
PIGGYBACK! 




CEflTRD 

ADD lowercase with our 
plug-in piggyback boardl 

9WX7H Dot Matrix $135 
5WX7H Dot Matrix S 95 

TWO complete character sets on board: 
96 character ASCII PLUS choice of 
128 character API. TRS-60/H-19 Graphics or 
Scientific. (Customer dellned: add $507set). 
Most printers convertible: specify logic board f 

Radix 
Technologies 

Suite 400 Carolyn Building ^ 



10400 Eaton Place 

Fairfax. VA 22030 (703) 385-0900 

HM, MMtBOH. Matt, CM MM.M 
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"A reduction of only 30 percent 

in the number of strings 

cuts the collection time in half." 



In the first set of code, a string will be 
abandoned once per character input. In the 
second example, strings will be abandoned 
only twice. 

On the Model II, Swap exchanges two 
values without leaving a trail of garbage be- 
hind. On the Model I or III, the following 
combination of VARPTR, PEEK and POKE 
can be used: 



FORI% = 0TO2 

T% = PEEK(VARPTR(A$) + I%) 

POKE (VARPTR(A$) + l%),PEEK(VARPTR(B$) + 1%) 

POKE (VARPTR(B$) + l%),T% 
NEXT 



Keep in mind the collection time is roughly 
proportional to the square of the number of 
strings. While this means doubling the 
number of strings multiplies the time by four, 
it also provides a fertile ground for time sav- 
ing. A reduction of only 30 percent in the 
number of strings cuts the collection time in 
half. This is the area to attack. Reducing the 
number of strings is the only effective way to 
reduce the collection time. 

A list of names and addresses will pro- 
vide a good example of string reduction. 
With a table of 100 you might be tempted to 
DIM, for example, separate arrays for last 
name, first name, address, city, state and 
zip code. That technique would create 600 
strings. Merging each data item into a 
single string using a home-grown delimiter 



cuts the 600 to 100. Any time you see more 
than one string array with the same dimen- 
sion, it is probably a prime opportunity to 
cut strings. 

In building an index to a large data file, 
suppose the data file has 1000 records, 
each uniquely identified by a 10 character 
string. To gain speedy access to each 
record by its identifier string, you might 
pass through the file once, building parallel 
arrays of the identifier (string) and the rec- 
ord number (integer). Sort the arrays on the 
identifier, with the record number tagging 
along. When the user requests a record by 
identifier, binary search the string array, us- 
ing the record number corresponding to the 
located string as the key for direct retrieval 
of the complete data record desired. Pro- 
gram Listing 2 is a sketch of this approach. 

This routine performs quickly. Unfortu- 
nately, garbage collection is in the 150 sec- 
ond range on a Model III. 

Modifying the technique eliminates gar- 
bage collection, with some additional over- 
head in disk accesses. After sorting the 
arrays, get rid of the string array. On the 
Model II, use erase. On the Model I or III, 
pass through the string array setting all the 
strings to nulls. Use the array of record 
numbers as a key to do the same binary 
search on disk. Binary searching 1000 rec- 
ords never takes more than 10 probes. The 
individual searches are slower, but more 
consistent (see Program Listing 3).H 



100 CLEAR 12000 

110 OPEN "R",1,"DATAFILE" 

120 FIELD 1, 10 AS FK$, 90 AS DT$ 

130 DIM RR*(LOF(l)), KT$(LOF(l)) 

140 FOR I* = 1 TO LOF(l) 

150 GET 1,1% 

160 KT$(I*) = FK$ 

170 RR*(I*) = I* 

190 NEXT 

200 'INVOKE A MACHINE LANGUAGE SORT HERE. SORT KT$ and RR* 

210 'USING KT$ AS KEY, RR* TAGGING ALONG. 

211 FOR I* = 1 TO LOF(l) 

212 KT$(I*) = "" 

213 NEXT 

220 LINE INPUT "NAME";SA$ : IF LEN(SA$) <> 10 THEN 220 
230 GOSUB 10000 

2*0 IF ER* THEN PRINT "NOT FOUND" ELSE PRINT DT$ 
250 GOTO 220 

10000 'BINARY SEARCH OF DATAFILE, 
RECORD RETRIEVED IF FOUND, 
ER* SET IF NOT. 
10010 ER* = 
ZB* = 1 

ZD* = LOF(l) + 1 
ZC* = (ZB* + ZD*) / 2 
10015 GET 1,RR*(ZC*) 
10020 IF SA$ = FK$ THEN RETURN 
10030 IF FK$ > SA$ THEN ZD* = ZC* 

: ZC* = (ZC* + ZB) / 2 
: IF ZC* = ZD* THEN ER* = -1 
: RETURN 
ELSE 10015 
10040 ZB* = ZC* 

: ZC* = (ZC* + ZD*) / 2 
: IF ZC* = ZB* THEN ER* = -1 
: RETURN 
ELSE 10015 

Program Listing 3 
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TRS-80 

COMPUTER 
DISCOUNTS 



• Factory Direct 

• Best Prices Anywhere 

• No Out-of-State Taxes 

• 100% Radio Shack Warranty 

• Free Price List 

SCOTT TASSO 

Owner 
Radio Shack Associate Store #7053 

175 E North Delsea Drive 
Vineland, N.J. 08360 
800-257-0426 
NJ 609-691-7100 ^10 



/ Epson \ 
Giveaway 



%- 



Epson MX70/80 Cartridges 

£ .COO EACH 

^^^ ^^F Min. 3 of same color 

Reloads $2.50 each Min. 12 
$30.00 a Doz. of Same Color 

Cartridges and Reloads Available 
In Black, Red, Green, Blue, Brown 

flK systems 

35 Cherry Court, East Northport. N.Y. 11731 

N.Y.S. Residents Add Tax. Add $2.00 Shipping & Handling 

Prices Subject to Change 

Allow Clearing Time lor Personal Checks 

Money Orders & Certified Checks shipped same day 




TAXAID 



Your Federal Income Tax & estimates with less pain, 
strain and time 1 

Great for April 1 5; terrific for keeping up with changes 
all thru the year Change any items and new tax is 
recalculated for you. "What if" all you please to make 
better financial decisions! 

Use your copy of Visicalc (tm) with our data files — over 
8DK 



Form 1040, Sched A. 
5695 for S1 3.95; add 
Forms 3468, 4562. 



3.D, Forms 2106. 2441 and 
$5.00 for Sched C.E.G.SE S 



Modi l/lll 48K Disk, on 35 trk SD diskettes 
Printer w/1 5CPI desirable for 8" paper 
Check/MO, 1 st Class Mail Ppd 
Deductible, of course 



OCR Associates 

Fit 1 , Mount Dr. , Sevierville, TN 37862 

[tm] VisiCorp 6 1 5-453- 1 892 



$$$ 



$ $ $ 



d£i Munch? 

D/Punch Conversion Kits will help you SAVE MONEY, 
SAVE STORAGE SPACE, SAVE TIME D/ Punch Kits 
ore engineered so you con quickly, occurotely, & 
safely moke alterations necessary to let you use both 
sides o« your H or S sectorod SINGIE-SIDED Diskettes. 
Converting 1 box ol diskettes will more than pay (or 
each D/Punch Kit. * Hub-Reinforcer Kit occurotely 
positions Hub-Reinf. Ring to hub opening. * Disk- 
Sleeve lets you replace your lost or damaged sleeves. 
Indicate your system config. with order. 

a. D/Punch Kit A — (5%" drives & eq.) tor ex. 
[Apple, Atari, CBM 4040, Franklin) $ 6.95 

b. D/Punch Kit B — (5'4" drives & eq.) for ex. 

[TRS 80 (Mod I, III), IBM, Osborne, ZenithJ 14.95 

c. D/Punch Kit C — (8" drives & eq.) for ex. 

[Altos. Zenith, TRS 80 Mod II) 16.95 

d. Labels — (100 pes) 3.00 

e. Write-Protect Stickers — [100 pes) 2.65 

f. Hub-Reinforcer Kit (5'i") 10.99 

g. Hub-Reinforcer Kit (8") 12.99 
h. Hub-Reinforcer Rings (5'4") — [50 pes] 5.85 
i. Hub-Reinforcer Rings (8") — [50 pes] 6.20 
|. Disk Sleeves (5 'A") — [10 pes) 2.35 
k. Disk Sleeves (8") — [10 pes) 3.85 

Add: $2 shipping & handling for each SI 5 order 

increment. AK, HI, & overseas cust.: write for SiH charges. 

MA res add 5% tax. Send check or money order to: 

D/PunchCo(12) 

P.O. Bex 201. Newton Hlds MA 02161 '' 

Tel: (617) 964-2126 Telex: 4991009 CHTRI 

«1982, D/Punch Corp., Pot. Pend - 



$$$ 



™TRS80 color 

From the January 1981 issue ol Ihe CSRA Computer 
Club newsletter: 



There was some amusement al the Novem- 
ber meeting when Ihe Radio Shack repre- 
sentatives slated thai the software in the , 
ROM cartridges could not be copied This 
month's 68 Micro Journal reported they had 
disassembled the programs on ROM by 
covering some of the connector pins with 
tape. They promise details next month. Never 
tell a hobbyist something can't be done! This 
magazine seems to be the only source so lar 
of technical informations on the TRS-80 color 
computer-. Devoted to SS-50 6800 and 
6609 machines up to now, 68 Micro Journal 
plans to include the TRS-80 6809 unit in 
future issues. _ 



To get the MOST from your 6809 CPU - This is the 
BEST SOURCE! The ONLY Magazine for the 8809 
Computer Months Ahead of All Others' 

68 MICRO JOURNAL 

5900 Cassandra Smith Rd. 
Hixson, TN 37343 

USA 

1 Vr— $24.50 2 Yr.— $42 50 3 Yr— $64 50 

■Foreign Surface Add $12 Yr fo USA Price 

Foreign Air Mail Add $35 Yr. to USA Price 

■Canada & Mexico Add $5 50 Yr to USA Price **'' 



C & S Electronics Mart Ltd 



32 E. Main Street. Milan. Michigan 48160 



26-1061 
26-1062 
26-1065 
26-1066 
26-4002 
26-3001 
26-3002 
26-3003 
26-3022 
26-3023 
26-5000 
26-5001 
26-3501 
26-3503 
26-3505 

Prices can c 



Model 111 4K Lev. 1 
Model III 16KLev.II 
Model III 48K 1 disk 
Mod. Ill 48K 2 disk/RS-232 
64K Model 11 1 disk 
Color Comp. 4K Lev. 1 
Color Comp. 16K Lev. II ext 
Color Comp. 32K Lev. II ext 
O-DriveforC.C. 
1-3 Drives for C.C. 
Videotext 4K 
Videotext 16K 
Pocket Comp. 
Interface 
Printer/Interface 

hange without notification. All prices a\ 



S 650.00 

805.00 

1660.00 

2050.00 

2995.00 

300.00 

. 450.00 

. 590.00 

520.00 

340.00 

320.00 

420.00 

135.00 

26.00 

115.00 




We will match or beat any price in the United States. 



sh prices: there will be a 4% handling charge for credit card use 



S 138 



Ml ■» MmSm^mm 


Dealer R 491 


439-1400 — 439-1508 




Colter 




48 K 2 disk drive 40 track 


$1800.00 


48 K 2 disk/RS-232 


1875.00 


48 K 2 disk/80 track 


1950.00 


48 K 2 disk/80 track/RS-2 32 


2025.00 


Printers 




Comet Printer 


340.00 


Smith Corona TP- 1 


695.00 


Line Printer V 


1595.00 


CItoh8510 


700.00 


Line Printer VI 


950.00 


Line Printer VII 


280.00 


Line Printer VI11 


670.00 


Daisy Wheel II 


1675.00 


Quick Printer 


275.00 


Quick Printer II 


1 70.00 


Plotter 


1320.00 



sSee List of Advertisers on Page 435 
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GAMES 



Lunar Lander 



by Nat R. Koch 



Games are rarely writ- 
ten for the Model II, 
but here's one that lets 
you make a lunar landing. 



Few games are written for the Model 
II, so here is one you might like to try. 
Lunar Lander is not an arcade-style 
game, but it is realtime. It is written in 
Model II Basic and runs relatively fast. 

The object of the game is to land your 
spaceship on one of the designated 
landing areas (thin horizontal lines) 
without touching the rest of the surface 
or running out of fuel. To control the 
ship ( A ), thrust the main engine by hit- 
ting the space bar. You can also fire lat- 
eral rockets by using the <and> keys. 

You have several options for prevent- 
ing a crash: abort, hyperspace, and 
freeze. Abort, A, provides the com- 
bined effects of several simultaneous 
thrusts. Hyperspace, H, moves the ship 
to a random position on the top six lines 
of the screen. Freeze, F, freezes the 
ship's lateral and vertical motion. You 



The Key Box 

Model II 
Model II Basic 
32KRAM 



are allowed 1-3 hyperspaces per round, 
and you might not be allowed to freeze. 
All three options use up more fuel 
than thrusting or firing the lateral 
rockets. If you run out of fuel, your 
ship plummets to the surface and the 



game ends. If you go over the top of the 
screen, you are automatically put in 
hyperspace. 

When the program is run, you will be 
asked three questions: Game # asks you 
which of seven playing boards you want 



Program Listing 



LUNAR LANDER 
FOR THE MODEL II 
BY NAT KOCH 
***************** 



11 
12 
,13 
14 
15 
16 
17 

19 CLEAR 3000 

20 CLS: RANDOM 

70 DIM SCREEN(2160) ,CC(520) 

100 ' 

101 ' WORKING PROGRAM 

102 ' 
110 ' 

120 INPUT" Game number (1-7) ";GN 

130 IF GN<1 OR GN>7 THEN GOTO 120 

135 D=40 

140 INPUT" Speed (1-80) ";D 

150 IF D<1 OR D>80 THEN GOTO 140 

155 D=ABS(D-81) 

160 INPUT" Gravity (1-5) ";G 

170 IF G<1 OR G>5 THEN GOTO 160 

180 ' 

181 

182 

190 

210 

220 

221 

222 ' 

225 CLS: RESTORE 

23 READ AA,AB,AC 

240 IF AAOGN THEN GOTO 230 

250 READ S r E,I 

260 IF S=GN+1 THEN GOTO 300 

IF 1=9999 THEN GOSUB 12 

GOTO 250 



CLEAR OLD BOARD 



FOR C1=0 TO 520:SCREEN(CC(C1) )=0:NEXT CI 

F=1000 : VEL=0 : SW=0 : GRAV=1 : H=RND ( 3) : FR=RND ( 2) -1 : P=E 



READ DATA 



l:FLAG=0:C2=C 



271 
281 
300 
301 
302 
310 
320 
330 
340 
350 
360 
370 



ELSE GOSUB 1100 



1 MAIN PROGRAM 

IN$=INKEY$:IF IN$="" THEN GOTO 40 

IF IN$="," THEN SW=SW-1:F=F-RND(5) *1 

IF INS="." THEN SW=SW+1:F=F-RND(5) *1 

IF IN$=" " THEN VEL=VEL-1:F=F-RND(10 

IF INS="A" THEN GOSUB 700 

IF IN$="H" THEN GOSUB 750 

IF IN$="F" THEN GOSUB 800 



400 PRINT@P," 



Listing continues 
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Your best 

Model l/lll 

peripheral buy 

is a modem. 



Considering expanding your TRS-80 
Model I or III? Then you should know 
that only one kind of peripheral can 
give you all these extra capabilities 
... in a single unit: 

• Computer-to-computer data 
communications, for better 
personal or business manage- 
ment. 

• Access to free "bulletin board" 
resources. 

• Access to Source, Compu- 
Serve and other time-sharing 
systems. 

• Services like electronic mail, 
instant news and financial re- 
ports. 

• An almost limitless supply of 
new games and other enthusi- 
ast activities. 

Of course, we're talking about a 
modem. A far more sensible first 
step in expanding than, say, joy- 
sticks, or a voice box, or a printer. 
And, therefore, your best peripheral 
buy. 

A modem opens up a whole new 
world to you. A world of thousands 
of computers and computer people 
just like you, in homes and busi- 
nesses around the block and across 
the country. A world you tap through 
your telephone. 

But don't simply settle for any mo- 
dem. For the most modem satisfac- 
tion, you need to make the best mo- 
dem buy. 

And that's LYNX. 




The new LYNX for TRS-80 Model I and Model 
III. It's the latest innovation from the people who 
are making data communications affordable. It's 
the best first step you can take in expanding. It 
makes your microcomputer a whole new animal. 




DLYINTX-O 



123 LOCUST STREET LANCASTER, PENNSYLVANIA 17602 
Phone 717/291-1116 



TRS-g 



is a trademark of the Radio Shack Division of Tandy Corporation. 
FCC Registration Number: A909KE-68171-DM-N 



Your best 

Model l/lll 

modem buy 

is LYNX. 



The new LYNX is the ideal modem 
for your Model I or III. That's because 
it's the key element of a total direct- 
connect telephone communica- 
tions package. 

This package includes all serial 
and computer bus interfaces, cables 
and terminal software . . . and comes 
to you with these remarkable fea- 
tures: 

• SINGLE PRICE: $299.95! 

• Compatible with both Model I 
t and III. 

• No separate purchases 
quired. 

• One-year warranty. 

• Auto dial/auto answer. 

• Works with any software, 
eluding ST-80 by Micklus. 

• Active clear, break, and "con- 
trol" keys. 

• Half or full duplex, variable word 
length, parity and stop bits. 

• Dial from phone, keyboard, or 
memory. 

• Works with or without Model I 
expansion interface. 

• Works with or without Model III 
RS-232 card. 

• Can be placed on either side of 
Model III. 

• No tools needed to install. 

No other modem gives you so much 
in a single package. And when you 
compare the LYNX price with the to- 
tal cost of bringing any other modem 
on line, it could save you OVER $100! 



re- 



in- 



Consult your local microcomputer retailer, or call one of these LYNX handlers today— TOLL FREE: 



THE BOTTOM LINE 
Milford, NH 
800/343-0726 

B. T. ENTERPRISES 
Centereach, NY 
800/645-1165 

• See List of Advertisers on Page 435 



BREEZE/QSD 
Dallas, TX 
214/484-2976 

COMPUTER PLUS 
Littleton, MA 
800/343-8124 



THE PROGRAM STORE 
Washington, DC 
800/424-2738 

STEVENS COMPUTERS 
Phoenixville, PA 
800/345-6279 



SIMUTEK 
Tucson, AZ 
800/528-1149 

PROGRAMS UNLIMITED 
Jericho, NY 
800/645-6038 



SOFT SECTOR MARKETING 
Garden City, Ml 
800/521-6504 

MICRO-MART 
Montreal, Quebec 
514/731-9486 
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to use. Speed is the time between ship 
movements — at 80 it is very slow, but at 
1 the game is impossibly fast. Beginners 
should start at about 50. Gravity asks 
you what level of gravity you want. At 
gravity level 1 the ship floats, while at 5 
it drops like a rock. A beginner should 
use gravity level 2. 

All the boards are drawn with lines. 
Each data statement contains a list of 
start and end-line coordinates and in- 
crements. If the increment is 9999, that 
line is interpreted as a landing area (a 
thin line on the screen). Even though 
board #8 has no instructions, it is neces- 
sary, because the board-scanning 
variable starts at one board and ends at 
the next. 

If you design your own playing board 
with several vertical surfaces, you might 
get a BS error from the Basic inter- 
preter. To correct this you need to di- 
mension the CC array larger and clear 
more memory. However, the program 
is fine for most boards. ■ 



Nat Koch, 13, is an eighth grade stu- 
dent at Queen Anne School in Prince 
George 's County, Maryland. He lives at 
3304 Carlton Ave., Temple Hills, MD 
20748. 



REAL ESTATE INVESTMENT 
SOFTWARE 

FOR TRS 80 SYSTEMS 

REAL PACK is a comprehensive package of 
programs for analyzing real estate investments. 

INCOME PROPERTY ANALYSIS projects profits and 
cash flows before and after taxes, ROI, IRR, equity 
returns, breakeven occupancy requirements, property 
values, mortgage balances and results of sale for up 
to 15 years. Handles multiple loans, depreciation 
methods, income and appreciation patterns. 
LOAN calculates loan terms, provides amortization 
tables, and computes discounted loan values or 
yields. Handles balloon payments; provides loan 
evaluations at future time periods. 

WRAP provides similar computations for wrap around 

loans. 

HOUSE RENT/BUY compares cash flows and real 

costs for house purchase compared to renting. 

Handles multiple mortgage and graduated payment 

loans. Generates unique personalized narrative letter 

to explain the tabular output. 

POLICY analyzes real estate investment strategies. 
You specify investment values such as leverage, 
interest, capitalization, and appreciation rates and also 
investment strategies such as tax free exchanging, 
sale and purchase of larger properties, and physical 
improvement to increase income ala Nickerson. 
Projects, for up to 20 years, profits and cash flows, 
rates of return, the results of projected individual buy, 
sell, and trade transactions, tax consequences, and 
accumulated property values and cash flows. 

REALTOR TESTED by professionals; error tolerant 
and easy to use. 

MORE THAN AN OPERATING MANUAL. The 150 

page instruction manual also includes chapters, "How 
to Use REAL PACK to Increase Your Real Estate 
Business" and "How to Operate Your Own Financial 
Analysis Business". 

$295.00 for the whole package. 

Check. COD, Visa, Mastercharge. 

To order, call (206) 734-4323 or write: o 

CONEX ELECTRO SYSTEMS INC. 

1602 Carolina Street, Belllngham, WA 98226 



PRINT CHR$(02) ; 

' MOVE SHIP USING VEL,SW,UD,AND GRAV 

IF SW=>3 THEN SW=3 ELSE IF SW<=-3 THEN SW=-3 

IF VEL=>3 THEN VEL=3 ELSE IF VEL<=-3 THEN VEL=-3 

GRAV=GRAV+G:IF GRAV>8 THEN VEL=VEL+1 :GRAV=1 

UD=VEL*80 

P=P+(UD+SW) 

IF P<0 THEN GOSUB 1000 

IF P>1919 THEN GOTO 950 

IF SCREEN (P)=l THEN GOTO 90 

IF SCREEN(P)=2 THEN GOTO 850 

PRINT@P, n ~"; 

IF FLAG=1 THEN GOTO 640 

PRINT@0,"F:";F;" H: n ;H; n FRZ:";FR 

• DELAY HERE 

FOR DELAY=1 TO D*10:NEXT DELAY 
IF F>0 THEN GOTO 310 

• SHIP OUT OF FUEL SEQUENCE 

PRINT@30,"OUT OF FUEL": FOR Z=l TO 1000:NEXT Z 

F=0 

PRINT930, SPACES (59) 

PRINT@0,"F:0 H:";H;" FRZ : " ; FR ; " 

FOR FALL=1 TO 2 4 

FLAG=l:GOTO 5 00 

PRINT@P," "; :P=P+80:PRINT@P,"~"; 
NEXT FALL: END 



410 
420 
421 
422 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
5 40 
545 
550 
560 
561 
562 
570 
580 
590 
591 
592 
600 

605 

610 

615 

620 

630 

640 

650 

700 

701 

702 

703 

704 

710 ' ABORT 

720 PRINT@30,CHR$(26) "ABORT"CHRS ( 25) : FOR Z=l TO 500:NEXT Z 

730 PRINT@30, SPACES (59) 

740 VEL=VEL-(2+RND(3) ) :F=F-RND(15) *10:RETURN 

750 ' HYPERSPACE 

760 PRINT0P," "; 

780 H=H-1:IF H<0 THEN H=0 :PRINT@30 , "HYPERSPACE NOT FUNCTIONAL" : FOR Z=l TO 1000:N 

EXT Z:PRINT@30,SPACE$(59) :RETURN 

790 PRINT@30,CHRS(26) "HYPERSPACE"CHR$( 25) : FOR Z=l TO 500:NEXT Z : PRINT@30 , SPACES ( 

59) : F=F-RND ( 10 ) *10 : P=RND ( 4 80 ) -1 : VEL=0 : SW=0 : RETURN 

800 ' FREEZE 

810 FR=FR-1:IF FR<0 THEN FR=0 : PRINT@30 , "FREEZE NOT FUNCTIONAL" : FOR Z=l TO 1000-.N 

EXT Z :PRINT@30, SPACES ( 59) : RETURN 

820 PRINT@30,CHR$(26) "FREEZE"CHRS( 25) : FOR Z=l TO 500:NEXT Z :PRINT@30 , SPACES ( 59) 
:F=F-RND(10) *10 

830 VEL=0:SW=0: RETURN 

850 ' LAND OR CRASH ON PAD 

853 IF FLAG=1 THEN GOTO 860 

855 IF VEL<3 THEN GOTO 875 

860 PRINT@30,"YOU CRASHED ON THE PAD" ; : PRINT@P, "X" : FOR Z=l TO 1000:NEXT Z:Z=RND( 

3) 

870 IF Z=3 THEN PRINT@30 , "There were no survivors"; 

873 GOTO 2000 

87 5 PRINT@P,"A"; 

880 PRINT@30,"YOU LANDED SAFELY : Rating =" ; F+H*100+FR*200 :GOTO 2000 

900 • CRASH 

905 PRINT@P,"*"; 

910 C1S="*"+CHR$(255)+CHR$(252)+CHR$(252)+"* *" :C2$="* "+CHR$( 255) +CHR$ ( 255) +CHRS 

(252)+CHR$(252)+CHR$(252)+"* *" 

915 C3S=" "+CHRS(255)+CHR$(252)+" ":C4$=" "+CHRS ( 255) +CHR$( 255) +CHR$ ( 252) +CHRS 

(252)+CHR$(252)+" 

Listing continues 



SUBROUTINES FOR WHAT HAPPENS TO SHIP 



2 OR MORE PRINTERS TO CONNECT 
TO YOUR COMPUTER? 



All STANOARD. PARAUEllNTERfACEO PRINTERS 



CONNECTIONS ARE GOLDP 



All ORDERS odd J3.50IO. shipping ond hondling 

PrinterPicker® Switch Unit $65.00 

Adaptor Cable Set* $25.00 



s an Adaptor Cable Sol. 
Modal III; o. EXTENDER 
MorPicker© Switch Unit). 



ot NON-T 

•JOTE: All romputer sysl 

Cablo Sol for eoc 



! t 'TRS-BO is a trademork ol th. Tandy Corporal 
/V/\ COMPU WARE Corporation 1 
/ S t ,0 ° 8 *bin B !on Road H 

\ \. \ Ch.rry Hill, NJ 08034 1 

VV 609-428-2309 B 



2 OR MORE COMPUTERS TO 
CONNECT TO YOUR PRINTER(S)? 

• STOP PLUGGING AND UNPLUGGING CABIES to chonqe balk ond 



nUlTIPIE PulerPicke.'" UNITS MAY BE INTERCONNECTED to lorn 
, system to interswilth any number ol printers and/or .ompoler 

OCATE Puto.Picket® WHEREVER ITS CONVENIENT fOR YOU .. 
within the 3 It. reach ol tho adaptor cable. 

WORKS WITH All STANDARD, PARAUEL - INTERFACED PRINTERS 



All CONNECTIONS ARE 



All ORDERS odd $3.50 lor shippins and hondlina.. 

PuterPicker® Switch Unit $115.00 

Adaptor Cable Set.*. $25.00 

» Each Purer Picker® Switching Unit requires an Adoptor Cable Set. 

Speclly type: I US- 80.' Model I, Model II or Model III; or EXTENDER 

(lor connection to another Puter P, eke. ©Switch Unit); 

or NON-TRS-80' (lor all other computers). 

NOTE: All computer systems require a TRS-BO' Model I or III Printer 

Coble Set lor each printer (No.26-1401)... our price: $25.00 






RS-B 



irk ol the Tandy Co 



/Ny/V COMPUWARI Corporation \ 

S / / lOOB Abinolon Road | 

\ X. \ Cherry Hill, NJ 08034 | 

\S\S 609-428-2309 E 



^263 
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Listing 


continued 






920 PRINT830, "CRASH": FOR Z = l TO 300:NEXT 


Z 




940 PRINT@P-80,C1$; :FOR Z=l TO 300:NEXT Z : PRINT@P-80 ,C3$ 


•:PRINT@P-160,C2$;:FOR Z 


= 1 


TO 300:NEXT Z:PRINT@P-160,C4$; 






943 


PRINT@40 , "There were no survivors" 






945 GOTO 2000 






950 




OVERSHOOT BASE 






960 


^RINT@30,"YOU OVERSHOT THE BASE":GOTO 2000 




1000 


■ 


OUT OF ORBIT 






1010 


PRINT@30,"SHIP OUT OF ORBIT":FOR Z= 


L TO 1000:NEXT:PRINT@30,SPACE$(59) :P= 




RND(480)-1:F=F-RND(10) *10 : VEL=0 : SW= 


i : RETURN 




1100 


' 








1101 


1 


SUBROUTINE TO DRAW IN TERRAIN 






1102 


' 








1110 


FOR LN=S TO E STEP I 






1115 


PRINT@LN,CHR$(153) ; 






1125 


SCREEN(LN)=1:CC(C2) =LN:C2=C2+1 






1130 


IF I 


=-80 THEN SCREEN (LN+1) =1 :CC (C2) 


=LN+1 : C2=C2+1 : SCREEN ( LN+2) =1 : CC ( C2) =LN 




t-2:C2 


=C2+l:GOTO 1170 






1140 


IF I 


=80 THEN SCREEN(LN-1)=1:CC(C2)= 


uN-1 : C2=C2+1 : SCREEN ( LN-2) =1 : CC ( C2) =LN- 




2:C2 


=C2+l:GOTO 1170 






1150 


SCREEN (LN+80)=1:CC(C2)=LN+80:C2=C2+1: SCREEN (LN+160) 


=1:CC(C2)=LN+160:C2=C2+ 




1: SCREEN (LN+240) =1 :CC (C2) =LN+240 :C2 


=C2+1 




1170 


NEXT 


LN: RETURN 






1200 


1 








1201 


■ 


SUBROUTINE TO DRAW IN BASE 






1202 


' 








1210 


FOR LN=S TO E STEP 1 






1220 


PRINT@LN,"_"; 






1230 


SCREEN(LN)=2:CC(C2)=LN:C2=C2+1:SCREEN(LN+80)=1:CC(C2)=LN+80:C2=C2+1:SCREEN 




(LN+160) =1:CC(C2)=LN+160:C2=C2+1 






1240 


NEXT 


LN : RETURN 






2000 


1 








2001 


1 


END GAME 






2002 


' 








2005 


FOR Z=l TO 1000:NEXT Z 






2010 


PRINT@0,"F:";F;" H:";H; H FRZ : " ; FR; SPACE$ ( 59) 




2045 


GOTO 


110 






9000 


• 








9002 


1 


*** BOARD #1 *** 






9004 


1 








9006 


DATA 


1,0,0 






9008 


DATA 


640,644,1, 565,567,1, 


488,490,1, 


571,895,81 


9010 


DATA 


976,977,9999, 1058,1301,81, 


1302,1306,1, 


1387,1468,81 


9012 


DATA 


1469,1471,1, 1552,1795,81, 


1796,1797,1, 


1718,1639,-79 


9014 


DATA 


1560,1562,9999, 1643,1645,1, 


1566,934,-79, 


854,614,-80 


9016 


DATA 


535,543,1, 464,467,1, 


548,548,0, 


629,630,9999 


9018 
9020 


DATA 


711,712,1, 793,1036,81, 


1117,1118,9999 


, 1199,1199,0 


9022 


■ 


*** BOARD #2 *** 






9024 


■ 








9026 


DATA 


2,0,0 






9028 


DATA 


320,324,1, 405,1045,80, 


1126,1526,80, 


1607 ,1688,81 


9030 


DATA 


1769,1771,9999, 1692,1218,-79, 


1138,658,-80, 


579,273,-79 


9032 


DATA 


264,268,1, 349,905,81, 


916,918,9999, 


999,1566,81 


9034 


DATA 


1567,1569,1, 1490,1490,0, 


1411,1412,9999 


, 1493,1493,0 


9036 


DATA 


1574,1577,1, 1498,1178,-80, 


1099,388,-79, 


469,469,0 


9038 


DATA 


550,551,9999, 632,793,81, 


794,797,1, 


718,478,-80 


9040 


DATA 


399,399,0 






9042 


' 








9044 


' 


*** BOARD #3 *** 






9046 


1 








9048 


DATA 


3,0,0 






9050 


DATA 


400,405,1, 326,247,-79, 


248,250,1, 


331,1141,81 


9052 


DATA 


1221,1541,80, 1622,1703,81, 


1784,1786,9999 


, 1707,1712,1 


9054 


DATA 


1633,1554,-79, 1555,1557,1, 


1478,1241,-79, 


1322,1565,81 


9056 


DATA 


1646,1647,9999, 1728,1809,81, 


1810,1814,1, 


1735,1735,0 


9058 


DATA 


1656,1658,9999, 1579,1579,0, 


1500,940,-80, 


861,387,-79 


9060 


DATA 


388,391,1, 472,473,9999, 


554,557,1, 


478,479,1 


9062 


■ 








9064 


• 


*** BOARD #4 *** 






9066 


' 








9068 


DATA 


4,0,0 






9070 


DATA 


240,247,1, 328,1688,80, 


1769,1771,9999, 


1692,812,-80 


9072 


DATA 


733,496,-79, 416,256,-80, 


177,185,1, 


266,752,81 


9074 


DATA 


832,1712,80, 1793,1794,9999 


1715,1235,-80, 


1156,436,-80 


9076 


DATA 


357,199,-79, 200,204,1, 


285,605,80, 


686,1739,81 


9078 


DATA 


1740,1741,9999, 1742,1747,1, 


1668,1115,-79, 


1035,395,-80 


9080 


DATA 


316,319,1 






9082 


1 








9084 


1 


*** BOARD #5 *** 






9086 


• 








9088 


DATA 


5,0,0 






9090 


DATA 


1440,1124,-79, 1045,1047,9999 


, 968,257,-79, 


258,265,1 


9092 


DATA 


186,193,1, 274,436,81, 


517,518,9999, 


599,923,81 


9094 


DATA 


1003,1403,80, 1484,1486,1, 


1567,1570,9999 


, 1491,291,-80 


9096 


DATA 


292,293,9999, 294,1494,80, 


615,616,9999, 


1575,1578,1 


9098 


DATA 


1499,393,-79, 314,315,9999, 


316,317,1, 


398,1438,80 


9100 


DATA 


1519,1519,0 






9102 


1 








9104 


' 


*** BOARD #6 *** 






9106 


■ 








9108 


DATA 


6,0,0 






9110 


DATA 


1840,260,-79, 181,183,9999, 


264,1560,81, 


1481,296,-79 


9112 


DATA 


217,219,9999, 300,1919,81 






9114 


1 








9116 


1 


*** BOARD #7 *** 






9118 


DATA 


7,0,0 






9120 


DATA 


1520,1530,1, 1451,1135,-79, 


1056,1057,9999, 


1138,1786,81 


9122 


DATA 


1787,1798,1, 1799,1799,9999, 


1800,1809,1, 


1730,1330,-80 


9124 


DATA 


1251,1093,-79, 1014,1015,9999, 


936,778,-79, 


698,378,-80 


9126 


DATA 


299,301,1, 382,463,81, 


544,546,9999, 


467,230,-79 


9128 


DATA 


231,235,1, 316,1756,80, 


L837, 1839,1 




9132 


■ 








9134 


' 


*** BOARD #8 *** 






9136 


' 








9138 


DATA 


8,0,0 







SOFTWARE TECHNOLOGY 

BREAKTHROUGH 

FROM XYZT 

LIBRARYSUPPORTOPTION . . . $79.00/ 

$10 ma 
Organize your diskettes - put your 
files in libraries! No more mess in the 
directory - your files are logically grouped 
together and can be easily manipulated. 
Your existing software will access files 
directly in libraries. Regular DOS commands 
can be used to DO, LIST, PRINT, KILL, 
LOAD, COPY library files. Execute/CMD 
modules and run BASIC programs directly 
from libraries. 

Plus, LSO saves space-in most cases 
diskette capacity effectively doubles. Not 
to mention increase speed of operation! 
Each library can contain up to 240 files. 
You may have as many libraries as many 
files as your system allows you to have. 
Fully documented, includes complete set 
of utilities and self-relocatable of course. 



INTERACTIVE CONTROL LANGUAGE 

(rel.2-B) $59.00/$1 ma 

The most powerful control language 
ever designed for the micro. Intended for 
control of computer operations, software 
enhancement and customization. Just 
check list of features: 

• Complete control over •Interactive program/ 
computer operation ICL coexecution* 

• Powerful command •Enhances DOS, 



language processor 

• Interaction with 
computer operator 

• Control Interception* 

• Queue structure for 
data manipulation* 

• Variables and 
information passed 
between programs 

• Virtual I/O for keyboard 
and display operations* 

* Exclusive ICL feature 



assemblers, compilers, 
wordprocessors, 
databases, etc.* 

• Provides data for 
keyboard input 

• Access to display output* 
•&RETCODE indicates 

result of execution* 

• Conditional execution 
of DOScommandsand 
and /CMD files 



Package includes 65 page manual, self-relocatable 
ICL and 1 2 ready to use procedures. 



RAM-SLEDGES $25.00 

Have you ever tried to write a self- 
relocatable program? You know what it 
takes! No more problems with 
RAM-SLEDGES! Write your program any 
way you like, then use RAM-SLEDGES 
to make it self -relocatable. Itwasdeveloped 
for internal use and production. 

Free KEYCOPY/CMD is included. 

To order, specify 

Mod l/lll and DOS: 

NEWDOS*-DOSPLUS* 

LDOS® - TRSDOS* 

MULTIDOS® 

Check M.O-.C.O.D., VISA, 

MC plus $4.00 s/h. 
Foreign orders • extra $ 1 0.00 
S 158 




XYZT Computer 
Dimensions, Inc. 

2 Penn Plaza, Suite 1500 
New York N.Y. 10121 
(212)244-3100 
Order by Mail or Check Your Local Dealer 



p'See List of Advertisers on Page 435 
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GAME 



Dogfight 



by Ralph White 



H 



ere's an arcade game for your Color Com- 
puter — envision yourself as a flying ace sitting 
in a cockpit while shooting the enemy's biplanes. 



Flying Ace is an arcade-type game for 
the TRS-80 Color Computer with Ex- 
tended Basic, 16K of memory, and the 
right joystick. Using graphics mode 3 



consumes a great deal of memory, so 
only about 2,500 bytes remain unused 
for expansion of the program. 
The screen shows the view from your 



A(34,20) 


Airplane graphics array 


A 


Horizontal position of the joystick 


B 


Vertical position of the joystick 


G 


Number of planes that escaped 


H 


Number of planes shot down 


R 


Number of planes presented 


S 


Shots taken 


T 


Elapsed time on current plane 


TT 


Total elapsed flight time 


X 


Horizontal distance from plane's center to center of 




sights 


Y 


Vertical distance from plane's center to center of sights 




Table 1. List of Variables 



Lines 


Function 


70-150 


Draws airplane 


250-280 


Assures plane will be within screen boundaries 


290 


Draws the plane on the screen 


300 


Checks firing button 


310 


Generates random movement of the plane 


340 


Checks firing button 


350-380 


Firing routine 


380 


Boundary values to determine a hit or miss 


400-430 


Display for a hit 


440-640 


Scoreboard 


650-790 


Instructions 




Table 2. Program Outline 



plane's cockpit. Biplanes appear, and 
by using the right joystick, you maneu- 
ver your plane to get the enemy's bi- 
plane in your sights. Then, press the 
button on the joystick to fire the ma- 
chine guns. 

The object is to shoot as many planes 
as possible in about six minutes of fly- 
ing time; approximately 30 seconds are 
allotted for each plane. The score for- 
mula in line 520 is based on the number 
of shots taken, hits, planes escaped, and 
total elapsed time. Speed and accuracy 
improve your score; misses and letting 
planes escape hurt it. 

The program operates in a cycle that 
draws the plane, computes a new posi- 
tion, and reads the joystick. You can 
exit the cycle in only two ways: by suc- 
cessfully shooting a plane or by allow- 
ing a plane to escape. 

Moving the joystick to the extreme 
right, left, top, or bottom will bring the 
enemy plane into your sights quickly; 
slightly moving the joystick makes the 
target plane move more slowly. 

The value of the firing button is 
checked twice in each cycle (lines 300 
and 340), to ensure that the button 
responds when pushed. If the button is 
pushed, memory location 65280 will 
contain either 126 or 254. If the button 
is not pushed, memory location 65280 
will contain a 255. 

The Sound function provides a tone 
burst with each shot. Line 380 contains 



The Key Box 

Color Computer 
16K RAM 

Extended Color Basic 
Right Joystick 
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H Mffil WHERE 

WgfA gfm QUALITY PROGRAMS 

V^^Kkj^r IMCI MEET COMPETITIVE PRICES 
2701 -C W. 1 5th • SUITE 324 • PLANO, TX 75075 • (21 4) 680-8268 



kCount 
a 



^ 204 



January 
Savings 




PCHECK/CMD 

PFIX/CMD 

PREFORM/CMD 

PVU/CMD 

PERASE/CMD 

PMOVE/CMD 

PDIRT/CMD 

PASSGO/CMD 

PUN/CMD 

PEX/CMD 

PMOD/CMD 

PFIND/CMD 



PCOMPARE/CMD 

PCLEAR/CMD 

PSS/CMD 

PMAP/CMD 

PMX/FLT MX80 

PHELP/CMD 

PBOOT/CMD 

PFILT/FLT 

DVORAK/FLT 

DVORAK/JCL 

CODE/JCL 

DECODE/JCL 



MOD I OR MOO 



A point of sale 
inventory, cash 
register and 

accounts receivable interactive^ 
system with invoicing. Prints sales 
summaries by code and sales person. 
Daily, weekly and monthly. Requires 
2 Drive MOD III minimum with 3 Drive 
optimum. Small businesses will adore 
this outstanding program. 



a highly sophisticated mass mailing 

un undo' all ol the popular 

)ble lor the Mod I or III The 

chine an;jii:u(i> 

and occupies only 

r. i . RAM B •our computer There 

New features have oeen addec lo !ne program 
thatothershavealwayslacked You now have the 
ability lo keep track o< mailings using the 1M 
Mags' that are incorporated Into itie Powcrma'i 
program The Powermail system will handle a tile 
up to 8 megabytes, or 65535 names, whichever is 
smaller The program will run in as little as 32K 
and one disk drive although 4BK ar*d 2 dr ves art- 
desirable The program will also sort the entire 
maximum tile sue and open up lo 108 tiles 
simultaneous^ du-mj Me ii'ocess Author 
Kim Watt 




MOD I OR MOD III 



SuperDirectory 

By Computer Shack 



SUPER .1X11 TV PIUS 

TECH MANUAL 

INSIDE SUPER UTILITY PLUS . 
OPERATOR'S MANUAL 



SAVE $40.00 




) TRACK VERSIONS AVAILA9LE 




DOSPLUS II outperforms the O.E.M. 
DOS with an ultra sophisticated 
operating system that is five or more 
times faster, more reliable and totally 
compatible with all standard business 
oriented software that's designed for 
use with the Model II. 

The result is a unique computer/ 
operating system that far exceeds 
manufacturers specifications with 
more potential and capacity to handle 
any business needs. 

MOD II 




Automatic Density Recognition 
Automatic Track Count Recognition 
Automatic DOS Recognition 
The Best Directory On The Market 



s^po'Dn •i„-k(. Irce ipace on your 
»»STEST ana EASIEST to use and 



EYE EASE GREEN CRT SCREEN 
FOR 



TRS-80 



REAOY TO INSTAH 
SELF BONDING 
DUSTPROOF SEAL 
OPTICALLY CORRECT 
NO DISTORTION 



SHATTERPROOF 
ENHANCES IMAGE 




$24.95 



PREFERRED BY COMPUTER PROFESSIONALS 
EVERYWHERE 



□PTicarn 



January Bonus 

on 

all orders of 

$100.00 

or more 
We will include a 

GREEN WINDOW 

of your choice 

MOD I, II, or III 

absolutely 

FREE 

If you do not see a program 
you desire, call DiskCount 
Data first. We stock most 
■ popular TRS-80 programs. 




VISA OR MC# 



EXP. DATE I 

VISA AND MASTER CARD CHEERFULLY ACCEPTED | 



• See List of Advertisers on Page 435 
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the boundary values for determining if 
a shot hits or misses a plane; when a 
plane is hit, a series of tone bursts is gen- 
erated. The difficulty of the program 
can be altered by changing the boun- 
daries of a successful shot. 

The position of the joystick is not 
read on every pass through the cycle. 
The value of MV alternates from — 1 to 
1 . If M V = 1 , the cycle is short circuited. 
The enemy plane is allowed to move 
more quickly. 

Lines 70-150 draw the biplane and 
store the plane in a graphics array. The 
Put command is then used to rapidly 
draw the plane on the screen. The bor- 
der of the array around the plane is a se- 
ries of blanks. When a new plane is Put 
on the screen, it is printed directly over 
the old image without erasing it. Since 
the new image is in a slightly different 
position, the border of blanks assures 
the old image is entirely covered. 

The high resolution graphics modes 
do not support text, so after each 
downed or escaped plane, the computer 
returns to the text mode to display all 
necessary information. ■ 

Ralph White can be reached at 529 
S. Vermont, Columbus, KS 66725. 



2in1 

COMPUTER CASES 



HEAVY DUTY FOR SHIPPING 




Order these EXTRAordinary cases. Immediately convert to 
DEMO TABLES. EXTRA sturdy for safe shipping of your 
Radio Shack IRS-80 MOD. Ill* Computer and your Line 
Printer VI* EXTRA strong locks, latches and hinges. EXTRA 
storage compartments for supplies and miscellaneous. 
EXTRA attractive at an EXTRA low price. 



TRS-80 MOD. Ill CASE 

$195 



FOB SAN 
DIEGO plus 
sales tax 



LINE PRINTER VI CASE 

$145 



• 280 

Computer Division 
TRADE SERVICE PUBLICATIONS, INC. 

109% Torreyana Road, San Diego, CA 92121 
(619) 457-5920 
"Trade Marks of Tandy Corp. 



10 GOTO650 

20 PCLEAR4 

30 PMODE3,l 

40 DIMA(34,20) 

50 PCLS 

60 SCREEN1,1 

70 FORI=4T028:PSET(I,8,3) :PSET(I,7,3) :PSET( I ,14 ,3) : PSET( I ,13 ,3) : 

NEXTI 

80 F0RI=5T012:PSET(17,I,3) :NEXTI 

90 FORI=14TO18:PSET(I,10,3) : PSET( I ,12,3) :NEXTI 

100 FORI=9TOl2:PSET(9,I,3) :PSET( 25 , I ,3) :NEXTI 

110 FORI=13T021:PSET(I,ll,3) :NEXTI 

120 PSET(17,9,3) 

130 PSET(13,16,3) :PSET(15,15,3) :PSET( 20 ,16 ,3) : PSET(19 ,15 ,3) 

140 PRESET(4,8,1) :PRESET(28 , 8 ,1) : PRESET(15 ,8 ,1) :PRESET(19 ,8 ,1) 

150 PRESET(4,14,1) :PRESET(28 , 14 ,1) 

160 GET(0,0)-(34,20) ,A,G 

17 PCLS 

180 R=1:T=0:TT=0:S=0:MV=1 

190 X=0:Y=0 

200 X=RND(200) -100:Y=RND(180) -90 

210 A=0:B=0 

220 PSET(128,86,0) :PSET(128 ,106 ,0) : PSET(108 ,96 ,0) :PSET(148 ,96 ,0) 

:PSET(128,85,0) :PSET( 128 ,107 ,0) :PSET(106 , 96 ,0) : PSET(150 ,96 ,0) 

230 X=X+INT( (32-A)/12) :Y=Y+INT( (32-B)/12) 

240 T=T+1:IFT>84GOTO440 

250 IFY>75THENY=75 

260 IFY<-75THENY=-75 

270 IFX<-112THENX=-112 

280 IFX>108THENX=108 

290 PUT(113+X,86+Y)-(147+X,106+Y) ,A,PSET 

300 IFPEEK(65280) =126ORPEEK(65280) =254GOTO350 

310 X=X+RND(5)-3:Y=Y+RND(3)-2 

320 MV=-MV:IFMV=1GOTO240 

330 A=JOYSTK(0) :B=JOYSTK(l) 

340 IFPEEK(65280) <>126ANDPEEK(65280) O254GOTO220 

350 S=S+1:SOUND50,2 

360 LINE(64,192)-(128,96) ,PSET:LINE (192 ,192) -( 128 ,96) ,PSET 

370 LINE(64,192)-(128,96) ,PRESET:LINE ( 192 ,192) -(128 ,96) , PRESET 

380 IFX>-10ANDX<10ANDY>-5ANDY<5GOTO40 

390 GOTO220 

400 FORI=15TO30STEP5:CIRCLE(128,96) ,1 ,4 , . 4 :NEXTI 

410 FORI=15TO30STEP5:SOUND(200-I*2) ,1 :CIRCLE(128 , 96) , I ,1 , . 4:NEXT 

I 

420 H=H+1 

430 FORTM=1TO500:NEXTTM 

440 PCLS 

450 CLS 

460 PRINTTAB(6) "AFTER " ;R; "AIRPLANES" : PRINT 

470 PRINTTAB(5) "SHOTS = ";S 

480 PRINTTAB(5) "HITS = ";H 

490 IFT<=84GOTO510 

500 PRINT"TOO MUCH TIME. HE GOT AWAY!":G=G+1 

510 PRINTTAB(5) "GOT AWAY = ";G 

520 TT=TT+T:PRINTTAB(5) "SCORE = " ; INT( ( 250*R-TT) *SQR(TT/250* 

R)*SQR(H/(S+1))) 

530 IFTT>1008GOTO640 

540 PRINT: PRINTTAB( 5) "TIME REMAINING" 

550 PRINT"MINUTES";TAB(16) ; "SECONDS" :M=INT( (1008-TT)/16 8) :SC=INT 

( ( (1008-TT)-M*168)/2.8) 

560 PRINTTAB(2) ;M;TAB(18) ;SC: PRINT 

570 PRINT: PRINT"PRESS THE FIRING BUTTON TO CONT." 

580 M=PEEK(65280) : IFMO126ANDMO254GOTO580 

590 PMODE3,l 

60 PCLS 

610 SCREEN1,1 

620 T=0:R=R+1 

630 GOTO190 

640 PRINT"TIME HAS EXPIRED": END 

650 CLS 

660 PRINT : PRINT :PRINTTAB( 10) "WORLD WAR I" : PRINT: PRINT 

670 PRINTTAB( 11) "FLYING ACE" 

680 FORTM=1TO1500:NEXTTM 

690 CLS 

700 PRINTTAB(10) "instructions" : PRINT 

710 PRINT "THE OBJECT OF THE GAME IS TO" 

720 PRINT"SHOOT AS MANY AIRPLANES AS YOU" 

730 PRINT"CAN IN THE TIME THAT IS GIVEN." 

740 PRINT" YOU WILL BE ALLOWED 30 SECONDS" 

750 PRINT"PER AIRPLANE AND A TOTAL OF 6" 

760 PRINT"MINUTES OF FLYING TIME. YOUR" 

770 PRINT"SCORE WILL BE BASED ON NO. OF" :PRINT"PLANES SHOT DOWN 

AND ACCURACY." 

7 80 PRINT: INPUT" PRESS <ENTER> TO CONT";Z$ 

790 GOTO20 

Program Listing 
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IT'S MORE FUN THAN A THREE-RING CIRCUS 



*#> 



*5^ 




EDUCATIONAL 
jjL FEATURES 

EXPANDS CREATIVITY 

DEVELOPS KEYBOARD SKILLS 

GEOGRAPHICAL QUIZZES 

MATH AND WORD GAMES 



# 



* it 



[OUR CHILD WILL BE CAPTIVATED 
for hours with your gift of the 60 programs in 
Computer Carnival. Tests of skill, haunted houses, j- j/ r 4* 
mazes, wizards and dragons are all a part of this 
funhouse book. Written in TRS-80* Level II Basic. 
Author Richard Ramella creates many characters, from the 
mysterious Sugar Louie to the mystical Madam Zelda, as he 
takes your child through his arcade of games, graphics and 
quizzes. 

Carnival Companion™ is a 30-minute cassette 
of the longer listings which eliminates the 
aggravation of typing and searching for errors, 
leaving more time to spend on the midway. 




LARGE READABLE TYPE 
SPIRAL BINDING 
, SHORT, EASY-TO-TYPE 

PROGRAMS & 

READY-TO-LOAD CASSETTE 
OF THE LONGER LISTINGS 
AND 

MORE 



it 



Toll Free 1-800-258-5473 for your credit 
card order. Or mail your order with pay- 
ment or complete credit card informa- 
tion plus $2 shipping and handling to: 
Wayne Green Inc. 
Attn: Book Sales 
Peterborough, NH 03458 
Dealer Inquiries Invited 



All orders shipped UPS if 
complete street address 
is provided. 



TRS-80 ir. ,1 

trademark ot the 
Radio Shock 
division of 
randy Corp 




[J COMPUTER CARNIVAL and CARNIVAL 

COMPANION CC7389 $24.97 
COMPUTER CARNIVAL (book only) BK7389 $16.97 
(In clud e $2.00 per order for shipp ing and handling charges.) 
| | Payment enclosed HI MC Fl VISA HI Am Ex 

Card* Expires MC Banks _ 



Package price: 
$24.97 
Book only: 
$16.97 
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from fi&Adventure 

\\(\^^ INTERNATIONAL 




STARFIGHTER 



BY SPARKY STARKS 

Creative Computing says, "The 
game Is great — nothing less than ex- 
cellent. " 

STARFIGHTER is the finest space 
battle simulation ever written for the 
TRS-80, and that's no idle boast. 80-U.S. 
Journal says that STARFIGHTER ". . .is 
like no other game ever seen." BYTE 
magazine reports that the game ". . .of- 
fers excitement and excellent use of 
TRS-80 graphics and sound." STAR- 
FIGHTER'S Arcade Action Graphlcs(tm) 
and sounds are enjoyably combined to 
produce truly mind-challenging game 
situations. 

The STARFIGHTER package Includes two cassettes (with separate 
Main Mission and New Pilot Training Simulator tapes), or one self- 
loading disk. Also Included is an extremely detailed 32-page Instruction 
manual. 
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LASER BALL 



BY NEIL MATSON AND MATTHEW McMAHON 
"TWs Is the one I've been waiting for . . . 
an incredible game In every sense of the 
word!" Will Hathaway, Arcader 
"Superb graphics, great sounds, and, best 
of all, the game really taxes your playing 
skills ..." Pat Henderson, Arcader 

Stand back, arcaders, it's LASER 
BALL — a white-hot sound and 
graphics extravaganza that'll practically 
fuse the circuits In your TRS-80! Your 
LASER BALL must race through a 
twisting maze avoiding or attacking 
killer disruptoids, depending on your 
energy status. Only the fast will survive 
— can you? 

LASER BALL doesn't miss a trick with its crisp Arcade Action 
Graphics(tm), high score save, 24 separate playing levels, joystick 
compatibility and more. Brand new from Adventure International! 




LUNAR LANDER 



BY MIKE WALL AND JACK MONCRIEF 

"Certainly one of the most realistic 

and Imaginative simulations for the 

TRS-80. . . " 80-U.S. Journal 

The tension Is nearly unbearable as 

your Lunar Excursion Module plummets 

towards a craggy lunar surface that's 

rife with jagged peaks and impossibly 

deep fissures. Only a firm hand on the 

controls and a steady eye on the 

monitor screen can spell the difference 

between a successful landing and an 

explosive death. 

Your Lunar Lander comes fully 

equipped with everything that you'll need to challenge this dangerous 

landing site, including sound, running high score, two player option and 

breathtaking Arcade Action Graphlcs(tm). 

ifeiMmi' G22&9 fl 033 9 
9 



ORDER FROM YOUR FAVORITE DEALER 
or CALL TOLL FREE (800) 327-7172 





SPACE INTRUDERS 

BY DOUG KENNEDY 
"The program Is fantastic . . . the 
graphics are excellent." 80-U.S. Journal 
Those crafty Invaders are back with 
a vengeance and Adventure Interna- 
tional has 'em! SPACE INTRUDERS has 
been praised by major microcomputing 
publications from 80-U.S. to Creative 
Computing as "fantastic," "excellent," 
"top of the line," and, well, you get the 
idea! SPACE INTRUDERS faithfully 
reproduces the hit Deluxe arcade 
machine in all of its frustratingly en- 
joyable glory. An absolute must for any 
serious game collection! 
SPACE INTRUDERS comes ready 
for battle with two player option, 
sounds, Joystick compatibility and Ar- 
cade Action Graphics(tm) that'll knock 
your socks off. 






INIRUDERS 
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16K Tape Model 1 and 3 
010-0116 $24.95 

32K Disk Model 1 and 3 
0120116 $24:95 



BOX 3435, LONGWOOD, FL 32750 

(305) 830-8194 (QUESTIONS) 
end lor our free catalog of 180 proqra 



TECHNIQUE 



Salvation for accidentally hitting Break. 



Partially Disabled Break 



Stephen Mills 
315-K Bargate Drive 
Cary,NC 27511 



The TRS-80's Break key is a 
swift executioner. Its pri- 
mary purpose is to put an end to 
a running program and return 
the computer to the command 
mode. That is a powerful feature 
when you need it, but some- 
times this executioner is too 
easy to invoke unintentionally. 
Since the Break key is located 



dangerously near the back- 
space and dash keys, a careless 
finger could accidentally termi- 
nate a program during input. 
Even though you can continue 
the program with the CONT 
command, you cannot recover a 
carefully formatted video dis- 
play destroyed by the break. 

For this reason, many pol- 
ished and well-designed pro- 
grams can benefit from having 
the Break key disabled. This is 
possible because whenever that 
key is pressed, the ROM inter- 
preter momentarily sends pro- 
gram control to an address in 
random-access memory. That 
address, for Model I Level II Ba- 
sic, is 16396. 

If you instruct the computer 
to PRINT PEEK (16396) when the 
computer has been initialized 



10 


POKE 16397,45:POKE 16398,1 


20 


ON ERROR GOTO 1000 


30 


REM • MENU OF 5 ITEMS IS HERE 


40 


PRINT "SELECTION #1" 


50 


PRINT "SELECTION #2" 


80 


INPUT "SELECT 1-5";S 


90 


POKE 16396,195 


10C 


ON S GOTO 200,300,400,500,600 


1000 IF ERR = 44 THEN RESUME 30 


1010 POKE 16397,201:ON ERROR GOTO 




Program Listing 1 



normally, you will find the value 
201, which in machine language 
is an instruction to return to 
ROM. This sends program con- 
trol back to where it started. If 
you PEEK at the next two ad- 
dresses, you will find zeroes. 

The statement POKE 16396,7 
disables the Break key. When 
the Break key is hit after that, 
the instruction is no longer a 
return, but one which changes 
the information in the CPU's ac- 
cumulator register. Program ex- 
ecution then passes through the 
zeroes in the next two bytes (do- 
nothing values), and then finds 
another return instruction at 
16399. The result is that the 
computer "forgets" the Break 
key has been pressed, and so 
hitting the key does not inter- 
rupt your program. The state- 
ment POKE 16396,201 puts 
things back to normal. 

POKEing a 7 (or several other 
serviceable values which affect 
the accumulator) is the best 
known way of disabling the 
Break key. This technique does 
not allow you to break out of a 
program even if you want to. 
You can press the reset button, 
but you cannot continue unless 
you know where to reenter the 
program. This technique also 
gives you a dead key on a key- 
board which is already some- 
what deficient in control keys. A 

better way to disable Break is to 
bring it under program control 



like the rest of the keyboard. 

Set up a program which will 
use a controlled Break key with 
the following series of POKEs: 

POKE 16396,195:P0KE 16397,45: 
POKE 16398,1 

This reroutes program execu- 
tion in ROM to a routine which 
sets up an L3 or Disk Basic Only 
error code. This works even if 
you are running Level II Basic 
under a disk system because 
the ROM routine assumes that 
the error has been correctly 
evaluated. Now if you press 
Break, you will get an L3 ER- 
ROR? message on the screen. 

To use this modification crea- 
tively, you must write an appro- 
priate error-trapping routine into 
the Basic program. Do this after 
the program is well along in de- 
velopment and thoroughly de- 
bugged; otherwise a real L3 er- 
ror could foul things up. Set the 
On Error GOTO statement early 
in the program to direct control 
to the error-trap routine. There, 
in addition to any other error- 
handling statements needed, 
evaluate the ERR code for an L3 
error. If ERR = 44, it means that 
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16K RAM 

Cassette or Disk Basic 
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YORK lO 

BASF-DPS 

WORLD STANDARD TAPE 




PREMIUMS-SCREW 

SHELL FITS ALL 

STANDARD RECORDERS 



COMPUTER GRADE 
BLANK CASSETTES 



DATA TRAC / C-05, C-10, C-20 



CASSETTE STORAGE CADDY 

ORGANIZE <^| 
YOUR TAPES! «4S^»w 

$2 95 EACH 





FINEST QUAUTY 
PHILIPS (NORELCO) 
TYPE HARD BOXES 



TRACTOR FEED 

DIE-CUT BLANK 

CASSETTE LABELS 



I 



INTRODUCTORY OFFER! 

ORDER 2 DOZ. CASSETTES, ORDER 1 CADDY 

GET 1 CADDY FREE! SMITHS"" 



4 



e lyon 






***»"£!?* ~«SR3& 



«lfs nice 



time to 



no 



^sgrsssi 



the tape 

adop' 

Beaverton 

^^ Call: 213/710-1430 



gg-sss* 



TomParKinso" 



Madison, 



OH 




"YOU'VE TRIED THE REST, 
NOW BUY THE BEST" 



for IMMEDIATE SHIPMENT 
on Credit Card Orders. 



ORDER NOW . . . VORK lO Computer ware^ 7 

156 MAIL TOl 24573 Kittridge St.. #80N. Canoga Park, CA 91307 

— — — ■- — — ORDER FORM - — — — — — — , 



ITEM 1 DOZEN 2 DOZEN 


TOTAL 


C-05 Q 7.50 [J 13.50 




C-10 Q 8.00 □ 14.40 




C-20 □ 10.00 □ 18.00 




Hard Box "_, 2 50 □ 4.00 




Storage Caoay (a> $2 95 ea Quantity 
FREE: Quantity 




Blank labels Q 4.00/100 ~ 30 00/1000 




SUB TOTAL 




Calif, residents add 6% sales tax 




Snipping/handling 1 doz $2. 2 doz. $3.50. 
3 doz. $4.50; each additional doz $ 50 




For Parcel Post instead of UPS ADD $1 




Outside Continental USA. ADD $2 




TOTAL 




Check or M.O. Charge to 

enclosed j Credit Card: □ VISA □ MASTERCARD 

D PLEASE SEND QUANTITY DISCOUNTS 



Each cassette 
includes two YORK 
10 labels only 
Boxes are sold 
separately. Ship- 
ments are by 
UPS unless 
Parcel Post re- 
quested Boxes, 
caddies, and blank 
labels are tree ot 
shipping charges 
when ordered with 
cassettes When 
ordered without 
cassettes, shipping 
charges; Boxes— 
$i.00/doz . 
Caddies $1.00 
each. MINIMUM 
SHIPPING/ 
HANOLING ON 
ANY ORDER - 
$2.00 



Card No. 



Exp. 



Name 



Address 



City 



State/Zip 



Signature 



Computer make & model 



.Disk?(y/n) 



the Break key has been pressed, 
and you can handle it as your 
program requires. The ERL func- 
tion is available to tell you the 
program line under execution 
when the Break key was hit, so 
the break-handling routine can 
perform different operations for 
different parts of the program. 

One useful application of this 
technique is to return you to the 
beginning of a program, or to a 
menu of options. You may have 
made an incorrect menu selec- 
tion, or realize you have entered 
bad data, and want to restart 
your procedure. Coding these 
operator conveniences is cum- 
bersome, and usually over- 
looked. By using this method, 
you can get out of an operation 
at any point, and redirect the 
program to a more desirable re- 
start position. 

The program skeleton in List- 
ing 1 shows how this might be 
done. Line 10 sets up most of 
the disabling code, but leaves 
the first critical byte (16397) in- 
tact. Execution can still be 
broken normally through the 
menu selection. Line 20 defines 



the error-trap routine. Lines 
30-80 display the menu and soli- 
cit input. After that, the POKE in 
line 90 takes over the Break key, 
so that any subsequent break 
will be interpreted as an L3 error 
and cause a jump to the error- 
handling routine at line 1000. 

If the test there indicates that 
the Break key has been pressed, 
the program resumes at the 
menu again. If all the error traps 
fall through, line 1010 restores 
the normal status of the Break 
key vector by POKEing the 
return instruction back into 
16397. Then the On Error GOTO 
turns off the error trap and 
ends the program. 

The Break key can be toggled 
on and off as you wish in a pro- 
gram. For instance, if you replace 
line 30 by POKE 16397,201, it 
allows you to quit the program 
during menu selection. But at 
any other point in the program, 
after line 90, Break would first 
return control to the menu.B 

Technical note: All disk I/O 
will return an L3 or Disk Basic 
Only error message. 



m B m DAISY WHEEL 

uUt*J New Smjth corona TP-1 

True letter quality printer for less than the cost of an 
office typewriter! Priced $500 less than other popular 
daisy wheel printers! 

SALE PRICE: 
$599.00 




FEATURES: 

if Friction feed 

-*- 15 cps, 120 wpm 

if Changeable daisy wheels 

if Parallel or serial interface 

* Compatible with R/S, Apple, etc. 

Rgi SUNLOCK SYSTEMS 
■^ 4217 Carolina Ave. 

Richmond, Va. 23222 

AVV1U0NAL PRINTER SPECIALS 



0\bidata 



Epton UKSO $449 
80ET $529 
MX100 $699 
WE WILL MEET OR BEAT ANY AVVERTISEV PRICE 



ML80 $349 
ML82A $449 
MLS3A $7/9 



TO ORDER CALL TOLL FREE 800-368-9191 

In Virginia call 804-321-9191 
We accept MasterCard, Visa and CODs 



^456 



198 • 80 Micro, January 1983 



MASTER ELECTRONICS, INC. 

*TRS-80 is a trademark of Tandy 

CAN SET YOU UP IN A 



TRS-80 



STATE-OF-THE-ART-COMPUTER 



STARTING AT 15% DISCOUNT! 




FULLY STOCKED 

IN: Model ll's 

Model Ill's 

ALL- PRINTERS 

AND — MORE!! 

* PLUS * 
THE ALL NEW: 



Model 16 and the 8.5 meg. Hard Drive! 



CALLUS NOW!!! 



Toll FREE: 1-800-531 -7323 



TEXAS CALL COLLECT 512/689-5536 






MASTER ELECTRONICS, INC. 

154 NORTH 5th 

RAYMONDVILLE, TX 78580 



vrsr 



MICRO 

MOONUGHTER 

NEWSLETTER 

The ONLY publication devoted exclusive- 
ly to helping you create, build, and main- 
tain a home-based business using your 
micro-system. SUBSCRIBE NOW to what 
may be the most important publication in 
YOUR FUTURE! 

1 Year (12 issues) only $25 U.S., $29 
Canada, $35 World Wide 

J. Norman Goode, Publisher 
Micro Moonlighter Newsletter 

21 15-D Bernard Avenue • Nashville, TN 37212 
Visa and Mastercard welcome. Send account 
number and expiration date. 615-297-5106. 

D Visa Acct # Exp 



□ M/C Acct # 

Name 



Exp. 



Address . 
City 



St. 



Zip 



-270 



compu*sette 

TAPES & DISKS 



100% ERROR-FREE 
FULLY GUARANTEED 




The Micro-Trac™ Generation 

Used by Software Firms & Computer Hobbyists 
Choice of School Districts Nationwide 



MINI STANDARD 
12-PAK 24-PAK 



CASSETTES 12-PAK 24-1 



C-05 $ .79 $ 

C-10 $. 89 $ 

C-20 $ .99 $ 

C-30 $1.29 $1 

Custom Cases $ .26 $ 

Cases recommended to protect sensitive cassettes. 



5'/4 M DISKETTES 



Soft Sector 

Single Sided 

S/D Density 



MINI STANDARD 
5-PAK 10-PAK' 



$14.95 $26.95 



*10 PAK w/cuslom library case, add $3.00 

— UPSSHIPPING — 

(No. P.O. Boxes please) 

$3.00 per pack 

— Canadian shipping multiply by 2 — 

No. 1 Magnetic Media in the USA! 

— Write for volume prices — 



TOLL-FREE 

(orders only) 

[ 1-800-528-6050 / 

ext. 3005 i 

In Arizona State 

1-800-352-0458 

ext. 3005 

MICRO-80™||\IC 

E. 2665 Busby Road 
Oak Harbor, WA 98277 

1(206)675-6143 




^See List of Advertisers on Page 435 
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UTILITY 
LOAD 80 



Enhance Hinrichs' word processor. 



New Tricks for an Old Dog 



Duane R. Hope 
Avenida de Pedralbes 
14-B, 72., 2*- 
Barcelona, Spain 34 



I will never forget the day the May 1980 is- 
sue of 80 Micro arrived. I had purchased a 
Line Printer II and was considering Michael 
Shrayer Software's Electric Pencil or Radio 
Shack's Scripsit. Instead I found Delmer D. 
Hinrichs' "Basic Word Processor" on page 50. 
The Basic Word Processor was written 
for a 16K Model I TRS-80 with cassette file 



The Key Box 

Model I 
Disk Basic 
32K RAM 
One disk drive 
Line Printer II 



text storage and a Comprint 912 printer us- 
ing roll paper. I have a 32K Model I TRS-80, 
one disk drive, and the Line Printer II. I modi- 
fied the program to take advantage of my 
system's expanded capabilities. 

I added two commands to allow disk stor- 
age of text files and a command to allow 
form-letter printing. I expanded the Print 
command to allow continuous printing of 
linked text files, automatic paging for 9 1/2 
by 11 fan-fold paper, and single-sheet print- 
ing for specialized 8 1/2 by 11 letterheads. 

New Commands 

When the Basic word processor displays 
Command?, enter the following additional, 
single-letter commands: 

G Get Get a text file from disk. 

W Write Write a text file to disk. 

N Notice Continuously print text file as a form letter. 
Names and addresses are obtained from disk- 
based PIMs files. 

Get, similar to Load, loads a previously 
written text file from disk. You are directed 
to enter the file name and extension. You 
have time to switch disks if your text file is 
on a different one. After the text file is 
loaded you return to the command mode. 

Write, similar to Save, puts the present 
text file onto your disk. You will be directed 
to enter the file name and extension. You 



70 A = ASC(A$) - 64:IFA<0ONAGOTO90,480,510,760,790,1220,1990,1320,1350, 
1 390, 1 51 0, 1 520, 1 580,80,80, 1 640,80, 1 750, 1 770,80,80, 1 830,2080, 1 970 

1330 PRINT "A ADD", "B BLANK", "C COMPILE", "D DELETE", "E EDIT", 
"F FORMAT", "G GET", "H HELP", "I INSERT", "J JUSTIFY", "K KILL", 
"L LOAD", "M MOVE", "P PRINT", "R REPLACE", "S SAVE", "V VIDEO", 
"W WRITE", "X EXIT" 

Figure 1 



have time to switch disks if you want to 
save the text file on a disk other than the 
one you have loaded. After the text file is 
written to disk you return to the command 
mode. 

If you have converted SCELBI Publica- 
tions' Personal Information Management 
System to use disk files (80 Micro, February 
1980, page 80, "Floppy PIMS," by Morris Her- 
man), Notice enables you to produce form let- 
ters. Enter the file name and extension of your 
label file. You have time to switch disks if your 
PIMS file is located on a different disk. As 
the computer reads each label record, the 
inside address and greeting are printed. A 
call to the Print routine prints the letter in the 
text buffer. The next label record is read and 
the process repeats until a form letter is pro- 
duced for each label record on the PIMS file. 
After all letters are printed, you will return to 
the command mode. 

Expanded Print Command 

When a text file contains more than 125 
lines of text response time slows to an in- 
tolerable rate. If you need more lines for 
your manuscript write the current text file to 
disk and start a new one keeping the format 
parameters constant. Repeat this pro- 
cedure until your manuscript is finished. 



MT$ Multiple text file indicator (Y/N). 

NA$ Disk text file name and extension. 

SS$ Single-sheet forms feed indicator (Y/N). 

AP Number of lines already printed. 

EF End of PIMS file indicator. 

EP End of page. 

G Physical number of lines per page. 

PR PIMS record number. 

TL Current text line number for Print command. 



Table 1. New Program Variables 
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LAiiauACE scnits 



ADVANCED DEVELOPMENT 
PACKAGE l *"ot, Aoe 




SPECIALLY TARGETED. Works in harmony 
with your TRS80 Model I or III. No more 
floppy shuffle. Fast one pass compiler that 
doesn't generate unnecessary intermediate 
files which require further assembly. 
Compatible with TRSDOS, LDOS, DOSPLUS, 
NEWDOS. 

PROFESSIONALLY DESIGNED. Crafted by a 
project team with over 15 years of Pascal 
programming experience. A powerful Pascal 
that includes all the features necessary for 
professional program development including 
random files and dynamic strings. 

INCREDIBLE SPEED. Resultant stand alone 
programs execute 10-20 times faster than the 
equivalent Basic or up to 4-1/2 times faster 
than U.C.S.D. programs. 

POWERFUL TEXT EDITOR. Has full screen 
capability for easy program or document 
preparation. 



EXCEPTIONAL DOCUMENTATION. Includes 
250 page documentation pkg. that guides you 
step by step. 

OPTIONAL ADVANCED DEVELOPMENT 
PKG. Includes Optimizer and Native Code 
Generator for even faster executing 
programs. ADP: $125 + shipping. 

ALCOR PASCAL: A new standard of 
excellence from the professionals at Alcor 
Systems. 

CALL OR WRITE for a free 20 page technical 
brochure with all the facts. 214-226-4476. 
Pascal System: $199 + shipping. 

Alcor Systems 

800 W. Garland Ave. 

Garland, Texas 75040 

• 75 




SYSTEMS 



TRS»0 
UCSD 
Alcor Pud 



TRADEMARK 
Tand> Corporation 
Univtralt, Calif. San Dwjo 
Alcor Syil.m. 



Dealer Inquiries Invited 



f 



Krell's College Board 

SAT* 

Preparation Series 

NEW FOR 83 



% 



A COMPREHENSIVE PREPARATION 
PACKAGE / MORE THAN 40 PROGRAMS / $299.95 

1 . Diagnostic analysis 

2. Prescription of individual study plans 

3. Coverage of all SAT* skills 

4. Unlimited drill and practice 

5. SAT* Exam Question simulator 

6. All questions in SAT* format and 
at SAT* difficulty level 

7. Instantaneous answers, explanations 
and scoring for problems 

8. Worksheet generation and performance 
monitoring - (optional) 

9. A complete record management system - 
(optional) 

10. Systematic instruction in pertinent math, 
verbal and test taking skills - (optional) 
Krell's unique logical design provides 
personalized instruction for each student 
according to individual needs. 



Shelby ^^ 
Lyman I A 
Chess ^"" 

Shelby's Socrates Chess Tutorial Series uses the latest 
Al techniques to customize each lesson for you. 
Construction modules cover every aspect of the game. 
For all micro's. Call or write for details. 

Amazing Ben 

The Royal Road to 

Artificial Intelligence. 

$79.95 

Connections 

A complete game system. Learn the 
principles of scientific reasoning in your 
choice of game formats. Expand minds 
at all ages. Subject areas include: 
Geography, Biology, Everyday Objects, 
etc. 

Game System $99.95 

Data Base, $24.95 per subject, 
3 for $50 

Isaac Newton + F.G. Newton 

Perhaps the most fascinating and valuable educational 
game ever devised - ISAAC NEWTON challenges the 
players to assemble evidence and discern the underlying 
"Laws of Nature". FULL GRAPHICS NEWTON - 
prasents all data in graphic form. This game is suitable 
for children. Players may select difficulty levels 
challenging to the most skilled adults. 
Both Games $49.95 



ALSO AVAILABLE 

Time Traveler / Odyssey in Time 

Competency Proficiency Series 

Pythagoras and the Dragon 

Botticelli / Micro Oeutsch 

Super Star Baseball / Sword of Zedek 

War of the Samurai 
CALL FOR DETAILS AND PRICES 



\ 



KREli 

SOFTWARE CORR " 

Fte turn af Mt tn m iducieontt compuong 

'120 Stony Sroo* ftoad ' Siori, 8roc* NY 11710 

T.l.oho". 514 '51 ill! 

••ell So»»jr« Cwo mi no oilicui no ••IH in* Coiiefc 

fnlltncr inminjiun 8o*a a , M tauCilKKUl l«liA| Stunt 

Hul l u nowm i higpMi ol wooucn lo ir* I IS 

■■J5* Its .rs.OJ.iii *W W« i » I A^j 

■■■■ Pricw Slightly Hlglwr Outsidt U.S. i»» ' 
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When you are ready to print the entire man- 
uscript, Get the first text file and request 
the Print command. 

The computer will display MULTIPLE 
TEXT Fl LES(Y/N)?; enter Y. After the file cur- 
rently in memory finishes printing enter the 



Structure Definition 


Example 


1 : NAME.A 




Mr. John Q. Doe 


2: ADD1.A 




123 House Lane 


3 : ADD2.A 




Somewhere, ST 99999 


4 : ADD3.A 






5 : ADD4.A 






6 : DEAR.A 




John 


7 : S0RT.A 




Doe, JQ 




Figure 2 



file name and extension of the next text file. 
You have time to switch disks if your next 
file is on a different one. When you are 
ready to continue, press Enter and the pro- 
cedure will repeat. After the last text file, 
enter End in response to the file name 
prompt to return to the command mode. 

In addition to linked text files, the Print 
command automatically skips to the begin- 
ning of the next page after printing the 
specified number of lines per page at an 
end-of-page character (ASCI1 17). Line 1740 
uses the LPRINT " " statement for automa- 
tic paging. Paging is dependent on your 
response to the page size parameter. The 
default value is 66, the number of lines on a 
page of 9 1/2 by 11 fan-fold paper. 

Finally, the Print command permits print- 



Program Listing 1 

]]§e§§5 CMD"T" ■ DISABLE TIMER FOR CASETTE I/O 

10 CLS:PRINTTAB( 20) "BASIC WORD PROCESSOR" 

20 ' (C) BY D.D.HINRICHS 1979 

30 DEFINTA-ZxCLEAR10000:NL=200:DIMA${NL) ,X$(3) ,S(20) ,T(20) 

40 B$=CHR$(30) :C$=CHR$(143) :P$="### ":N$="Y":PN$="N" :P1$="Y":SS$ 

="N":G=66 

50 S$=" ":H$=S$:LA=-l:P=l:FP=l:PL=15:LL=60:LM=10:U=32:OUT254,i 

60 L=LA:IT=0:R=0:A$="":PRINT:INPUT"COMMAND";A$:IFA$=""GOTO80 

70 A=ASC(A$) -64: IFA>0ONAGOTO90 , 480 ,510, 760 ,790, 1220, 1990, 1320 ,13 

50,1390,1510,1520,1580,2190,80,1640,80,1750,1770,80,80,1830,2080 

,1970 

80 PRINT"** ENTRY ERROR **":GOTO60 

90 CLS:D=0:N$="Y":IFLA<0THENL=0:GOTO130 • ADD 

100 IFNL=LA+1THEN210ELSEIFL>FL+12THENB=L-12ELSEB=FL 

110 FORI=BTOL:X=LEN(A$(I) ) :D=D+INT( (X+4)/64-.01) 

120 GOSUB1910:NEXTI:L=L+1 

130 C=(L-FL+D)*64:IFC>896PRINT:PRINT:C=896 

140 PRINT@C,USINGF$;L;:PRINTAS(L);:P=LEN(A$(L))+l:C=C+P+3:K=L-rl 

150 PRINT@C,C$;:A$=INKEY$:PRINT@C,S$;:IFA$=""GOTO150 

160 GOSUB290:ONA-7GOTO360,410,310 

170 IFA=13THENA$=S$:GOTO210ELSEIFA=24THEN380ELSEIFA=31GOTO460 

180 IFA=25THEN430ELSEIFA=26THEN330 

190 IFA=96IFLA<LTHENLA=L:GOTO60ELSE60 

200 PRINT@C,A$;:A$(L)=A$(L)+AS:IFP<=LLTHENP=P+1:C=C+1:GOTO150 

210 IFRGOTO60ELSEIFNL<=KPRINT:PRINT"FILE FULL" :LA=NL-1:GOTO60 

220 IFLEN(A$(K) )THENL=K:GOSUB1360 

230 IFK>LATHENLA=K 

240 IFA$=S$GOTO280 

250 F0RM=LL+1T02STEP-1:A$=MID$(A$(L) ,M,1) : IFA$OS$NEXTM:GOTO280 

260 A$(K)=RIGHT$(A$(L) ,LL-M+1) : A$(L) =LEFT$(A$ (L) ,M-1) 

270 PRINT@C-LL+M-1,B$;:L=K:GOTO130 

280 A$(L)=LEFT$(A$(L) ,LL) :L=K:GOTO130 

290 A=ASC(A$) :IFA>64ANDA<91THENA=A+UELSEIFA>96ANDA<123THENA=A-U 

300 A$=CHR$( A): RETURN 

310 IFP>LLGOTO210 » D 

320 PRINT@C,CHR?(92);:A$(L)=A$(L)+CHR$(17) :A$=S$:GOTO210 

330 IFP>LLGOTO210 ' S-D 

340 C=(L-FL+D)*64+4:IFO900THENC=900 

350 GOSUB1180:P=1:A$=S$:GOTO210 

360 IFP=1GOTO150 • L 

370 C=C-1:PRINT§C,B$;:P=P-1:A$(L)=LEFT$(A$(L) ,P-1) :GOTO150 

380 IFP=1GOTO150 ' S-L 

390 A$(L)="":P=1:C=(L-FL+D)*64+4:IFC>900THENC=900 

400 PRINT§C,B$;:GOTO150 

410 IFP>LL-6GOTO150 ' R 

420 A$(L)=A$(L)+STRING$(5,S$) :C=C+5:P=P+5:GOTO150 

430 IFP>LLGOTO210 ' S-R 

440 C=(L-FL+D)*64+4:IFO900THENC=900 

450 GOSUB1200:P=1:A$=S$:GOTO210 

460 IFP>LLGOTO210 • CL 

470 PRINT@C,CHR$(93) ; :A$(L) =A$(L) +CHR$(20) :A$=S$:GOTO210 

480 CLS: PRINT "DELETING BLANK LINES" :FORJ=LATO0STEP-1 • BLANK 

490 IFA$(J)=""F0RI=JT0LA:A$(I)=A$(I+1) :NEXTI:A$(LA) -"■ :LA=LA-1 

500 NEXTJ:IFRTHENRETURNELSE1830 

510 INPUT"FIRST LINE TO COMPILE" ;F:IFF<0THENF=0 ' COMPILE 

520 INPUT"LAST LINE TO COMPILE"; Z :IFZ>LATHENZ=LA 

530 IFF>=ZTHEN80ELSECLS:PRINT"COMPILING":FORL=FTOZ-1:K=L+1 

540 X=LEN(A$(L)) :X$="":IFX<2THEN620ELSEIFX<=LLGOTO600 

550 F0RI=XT01STEP-1:A$=MID$(A$(L) ,1,1) 

560 IFA$<>SSTHENX$=A$+X$:NEXTI:GOTO600ELSEIFX$=""NEXTI 

Listing 1 continues 




Save more money (and data) with our hard disk drive 

Introducing the new, low-priced Winchester hard disk drive 
from A.M. Electronics. Designed to put the power of hard 
disk data storage within reach of more system owners than 
ever before. 

More megabytes per buck 

Our drive features an unformatted data capacity of 6.7 
megabytes, with an average access time of 75 milliseconds. 
Up to four drives can be daisy-chain connected for even 
greater capacity. 

Ready to run with TRS-80 

Each drive comes complete with controller board, ST-506 
interface, and a DOS Plus 4.0i for complete plug compati- 
bility with your TRS-80 system. 

Quality you can count on 

Manufactured from the finest components, the A.M. 
Electronics hard disk drive has an expected life rating of 
five years when used 50% of the time. 

Power consumption is unusually low: typically one amp 
less than other Winchester systems. 

™TRS-60 is a trademark of Tandy Corp. 



The disk and read/write heads are fully enclosed in a 
module using an integral air recirculation system with an 
absolute filter. You can depend on stable operation and high 
reliability in any office environment. 

Think of the possibilities 

Word processing, large mailing lists, database management, 
financial planning and forecasting . . . demanding applica- 
tions like these and many more are now possible — and 
affordable — with the new A.M. Electronics hard disk drive. 

For more information, or to find the location of your 
nearest dealer, please contact: A.M. Electronics, Inc., 3446 
Washtenaw Ave., Ann Arbor, Ml 48104, 313/973-2075, 
Telex: 220821 HPC. In Europe, contact A.M. Electronics, 
Ltd., 10 Barley Mow, Barley Mow Passage, Chiswick, 
London W4 4PH, England, Tel. (01)994-6477, Telex: 
8811418. 

F01A.M. ELECTRONICS 

f m M I THE POWER BEHIND THE DRIVES™ 
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You'll think you've made the 
DOS strike of the decade 
when you turn your micro 
on to LDOS. You'll find a 
bonanza of features like 
full keyboard type-ahead; 
a true background spooler; 
file backup by date, class, 
and between different drive 
types; hard disk support; 
data transportability 
between Model I and III; 
and a complete communi- 
cations utility including 
disk file send and receive. 
Support for Radio Shack's 
Doubler and selected 
others is also provided. 

With our Job Control Lang- 
uage, you get true "hands 
off' running of your appli- 
cation programs — give a 
single command and then 
walk away. The 400 page 
manual includes examples 
of all commands and utili- 
ties. The Operator's Guide 
gives you step by step 
instructions on how to use 
LDOS with your applica- 
tions. Stop running with 
only "half a computer! Let 
LDOS provide the missing 
features to speed up and 
simplify your TRS-80 com- 
puter system! Visit a dealer 
or contact LSI for more 
information on the most 
popular sophisticated 
operating system for your 
TRS-80. 

LDOS is available world- 
wide through thousands of 
dealers for just $129. 



The BASIC Answer 



The BASIC Answer is a 
BASIC text processing util- 
ity. It is designed to allow 
the BASIC programmer to 
build code in a structured 
manner. "Source" code is 
written with a word proces- 
sor or text editor which 
allows the user to exploit 
the powerful editing and 
movement features charac- 
teristic to those types of 
editors. Source code can 
even be created by your 
own BASIC interpreter. 
The BASIC Answer is then 
used to process these files 
into normal interpretive 
BASIC code. 



Free Yourself from 
Line Numbers 

The BASIC Answer allows 
substitution of labels for 
line numbers! This means 
that your BASIC code now 
can read like a novel. 
Instead of the typically 
undescriptive "GOSUB 
1000", a label such as 
"GOSUB @Search.Name" 
is used. Imagine yourself 
reading code filled with 
such descriptive branches 
and understanding it at a 
glance, even years later. 
This feature even allows 
totally relocatable BASIC 
routines without the renum- 
bering problems. 



TRS-80 is a trademark of Tandy 
Corporation. LDOS is available for 
the TRS-80 Model-I and Model-Ill. 
Prices and specifications subject to 
change without notice. LDOS and 
The BASIC ANSWER are products of 
Logical Systems, Inc. 
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A New Concept in 
Variable Usage 

The BASIC Answer allows 
variable names to be as 
long as 1 4 characters and 
ALL 14 are significant. 
Imagine reading: 

"IF ACCNT.OVERDUE #> 

THEN GOSUB 

©PRINT.DUN" 

rather than 

"IFAO#>0THEN 
GOSUB52130" 

Which would you rather 
read? It also introduces 
to BASIC the concept of 
Global and Local variables. 
This feature circumvents 
the tedious problem of var- 
iable tracking because a 
Local variable is only viable 
in its own subroutine! 



NOW AVAILABLE 

LDOS 5.1 Quick 

Reference Card 

$5.95. 



End the Multiple 
Machine Hassle 

The BASIC Answer intro- 
duces the concept of 
"Conditional Translation." 

This feature allows the 
programmer to place differ- 
ent "machine dependent" 
code simultaneously into 
the same Source Code. 
The BASIC Answer can 
be "switched" when pro- 
cessing to ignore the 
unwanted or include extra 
code! No more multiple 
master programs to con- 
fuse maintenance. All the 
masters could now be 
rolled into the same pro- 
gram. Modify the one 
master and you've modi- 
fied them all. Process the 
same code with different 
switches set, and get two 
or more versions from the 
same source. 

The BASIC Answer com- 
bines the self-documenting 
power of COBOL with the 
relative ease of BASIC 
together with the power of 
a word processor. 

The BASIC Answer is 
available for just $69.00. 



LOGICAL 
'SYSTEMS 
flNC. 

00£=7>c= 

1 1520 N. Port Washington Rd. 

Mequon, Wl 53092 

(414)241-3066 
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630 
640 

650 



840 

850 



880 
890 
900 



Listing 1 continued 

570 A-ASC(RIGHT$(X$,1)) :IFA-330RA«460RA«580RA=63THENX$»X$+" " 

580 A$(L)=LEFT$(A$(L) ,1-1) :IFLEN(A$(K) ) -0THENA$(K) «X$:GOTO540 

590 A$(K)-X$+S$+A$(K) :GOTO540 

600 X«LEN(A$(L)) :IFX<2THEN620ELSEFORI«XTO2STEP-1 

610 IFRIGHT$(A$(L) , 1) =S$THENA$(L) »LEFT$(A$(L) ,1-1) iNEXTI 

620 NEXTL:F0RL-FT0Z-1:K«L+1 

X-LEN(A$(L)) :Y«LEN(A$(K)) :X$-"" :IFX-0ORY-0GOTO750 

A«ASC(RIGHT$(A$(L) ,1) ) 

IFA»330RA=460RA-580RA=63THENA$(L)-A$(L)+" "iX=X+2 
660 F0RI=1T0Y:A$«MID$(A$(K) ,1,1) 
670 IFA$OS$THENX$-X$+A$:NEXTIELSEIFX$«" "NEXTI 
680 IFLL-X<IGOTO710 
690 Y=Y-IiIFY<0THENY»0 

700 A$(L)«A$(L)+S$+X$:A$(K)-RIGHT$(A$(K) ,Y) :GOTO630 
710 X-LEN(A$(L) ) :IFX<2THEN730ELSEFORI=XTO2STEP-1 
720 IFRIGHT$(A$(L) ,1) =S$THENA$(L) -LEFT$(A$(L) ,1-1) :NEXTI 
730 IFY<2THEN750ELSEFORI»YTO2STEP-1 

740 IFLEFT$(A$(K) ,1) «S$THENA$(K) -RIGHT$(A$(K) ,1-1) :NEXTI 
750 NEXTL:X-LEN(A$(Z)) :GOTO900 

760 INPUT"FIRST LINE TO DELETE";F:IFF<0THENF=0 • DELETE 
770 INPUT" LAST LINE TO DELETE"; Z:IFZ>LATHENZ«LA 
780 IFF>ZTHEN80ELSEFORI«FTOZ:A$(I)-"":NEXTI:GOTO1830 
790 INPUT"EDIT LINE";L: IFL<0ORL>LAORA$(L) =""GOTO80 » EDIT 
800 C=4:P«1:X$(0)»A$(L) «N$«"Y" 
810 CLS:I»LiGOSUB1910:N-l:Q$-"" 

820 GOSUB910»IFA>47ANDA<58THENQ$=Q$+A$:N=VAL(Q$) :GOTO820 
830 M-0 : IFA=8THENY=-1 »GOSUB940ELSEIFA=9ORA=UTHENY«=1 :GOSUB940 

IFA-97THENA$(L)«X$(0) :GOTO800 ' A 

IFLEN(A$(L) ) >»LLGOTO870 
860 IFA«25GOSUB1200ELSEIFA=26GOSUB1180 
870 IFA>98ONA-98GOSUB960 ,1000 ,1960 ,1960 ,1960 ,1020 ,103 

IFA=115GOSUB1120ELSEIFA=120GOSUB1170ELSEIFA=108GOTO800 

IFM»1THENN-1»Q$-"":GOTO820ELSEIFRPRINT@320,;ELSE810 

IFLL<XPRINT"LINE";L; "HAS" ;X; "CHARACTERS" :GOTO60ELSE60 
910 X$-MID$(A$(L) ,P,1) 

920 PRINTgC,C$;iA$-INKEY$:PRINT@C,X$;:IFA$=""GOTO920 
930 GOSUB290:X-LEN(A$(L) ) :IFA=130RA=96THENR=ltRETURNELSERETURN 
940 M-l : FORI-1TON t P-P+Y : IFP>XTHENP=X : RETURN 
950 IFP<1THENP=1 1 RETURNELSEC-C+Y i NEXTI : RETURN 

960 Q=P:D-CtFORI»lTON:GOSUB910:IFRORA«27THENP=Q:C=D:RETURN • C 
970 PRINT§C,A$; tGOSUB1100:P=P+l:GOSUB1110:A$(L) =L$+A$+R$ 
980 A«U:C»C+1:IFP<-XNEXTI 
990 P«Q:C-D: RETURN 
1000 IFP+N-1>XTHENN»X-P+1 » D 

1010 GOSUB1100:Q-P:P-P+N:GOSUB1110:A${L)=L$+R$:P=Q:RETURN 
1020 GOSUB1100:A$(L)-L$+S$:PRINT@C,B$ • H 
1030 GOSUB910:IFRORA=27RETURN • I 
1040 IFA-10THENA$(L)-A$(L)+CHR$(17) sR-ls RETURN 
1050 IFA-31THENA$(L)«A$(L)+CHR$(20) :R-1: RETURN 
1060 PRINTeC,A$; »IFA=8THENY«-ltGOSUB940 JGOTO1030 
1070 IFA»9THENY=1 JGOSUB940 :GOTO1030ELSEIFP>XTHENX=P 
1080 GOSUBll00»GOSUBlll0:A$(L)-L$+A$+R$jPRINT8C,B$;A$+R$ 
1090 C»C+1:P»P+1:GOTO1030 

1100 L$-""»IFP<2RETURNELSEL$=LEFT$(A$(L) ,P-1) jRETURN 
1110 R$-"":IFP>XRETURNELSER$»RIGHT$(A$(L) ,X-P+1) jRETURN 
1120 GOSUB910:Q-P:D»C • S 
1130 FORI-1TON i F-0 : FORJ-Q+1TOX : D-D+l 
1140 IFMID$(A$(L) ,J,1)=A$THENF=1:Q=J:J=X 
1150 NEXTJ: NEXTI jIFFTHENP-QjC-D 
1160 A-U j RETURN 

1170 A$(L)-A$(L)+S$:P=X+1:C»P+3:GOTO1030 ' X 
1180 A$(L)-STRING$((LL-LEN(A$(L)))/2,32)+A$(L)+CHR$(20) 
1190 PRINT§C,B$;A$(L) ;CHR$(93) ; iRETURN 
1200 A$(L)»STRING$(LL-LEN(A$(L)) ,32)+A$(L) ' 
1210 PRINTgC,B$;A$(L);:RETURN 
1220 CLS:PRINT"LINE LENGTH =";LL, :INPUT"NEW 
1230 PRINTLINE SPACES »";S, :INPUT"NEW »";S 
1240 PRINT"LINE NOS. ■ '";N$;" ' ", :INPUT"NEW (Y/N)"»N$ 
1250 PRINT "FIRST LINE » "|FL, »INPUT"NEW »"|FL 
1260 PRINT'LEFT MARGIN »";LM, «INPUT"NEW »";LM 
1270 PRINT"PAGE LENGTH »"|PL, :INPUT"NEW »";PL 
1280 PRINT"PAGE NOS. « ' ";PN$»" '", tINPUT"NEW (Y/N)";PN$ 
1290 PRINT"FIRST PAGE - ";FP, :INPUT"NEW »">FP 
1300 PRINT'PAGE 1 NO. =* ' ";P1$; " ' " , :INPUT"NEW (Y/N)";P1$ 
1310 PRINT"HEADING - '"^i"' ",:INPUT"NEW =";H$ 
1315 PRINT'SINGLE SHEET FEED ■ , ";SS$|"' " , :INPUT"NEW=";SS$ 
1317 PRINT"PAGE SIZE ■ ";G;" ",:INPUT"NEW «";G:GOTO60 
1320 CLS: PRINT "LEGAL COMMANDS ARE:" ■ HELP 

1330 PRINT"A ADD","B BLANK", "C COMPILE", "D DELETE", "E EDIT" 

,"F FORMAT", "G GET","H HELP", "I INSERT", "J JUSTIFY", "K 

KILL","L LOAD","M MOVE","N NOTICE", "P PRINT", "R REPLACE", 

"S SAVE","V VIDEO", "W WRITE", "X EXIT" 

1340 PRINT"KEY 'SHIFT-@» TWICE TO RETURN FROM A,E,I,R TO COMMAND 

MODE"«GOTO60 
1350 INPUT"INSERT AT LINE";LsIFL<0ORL>LAGOTO80 ■ INSERT 
1360 IFNL»LA+1PRINT"FILE FULL" jGOTO60ELSEIFRGOTO60 
1370 FORI«LATOLSTEP-l:A$(I+l)=A$(I) jNEXTI 
1380 A$(L)»"":LA=LA+1:L=L-1:IFITRETURNELSEIT«1:GOTO90 

Listing 1 continues 
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ing single sheets of typing paper or letter- 
heads. When the Print command encoun- 
ters an end-of-page you can remove the 
sheet just printed, load and align the next 
sheet, and hit Enter to continue printing. 

Disk Storage 

Disk Storage of text files brings speed 
and reliability to your word processing ac- 
tivities. To install the disk storage changes, 
alter lines 70 and 1330 as in Fig. 1. 

Add line 5, lines 1990-2180, and change 
line 1780 (see Program Listing 1). 

Load each of your cassette text files and 
write them to disk. If you also wish to keep a 
copy on tape, resave each file at this time. 

Change line 30 and line 1530 as shown in 
Program Listing 1. 

Notice Command 

The Notice command enables you to 
send short form letters to any list for which 
you have PIMS records for printing labels. 
To install the Notice changes alter line 70 
and line 1330, and add lines 2190-2370 as 
shown in Program Listing 1. 

Follow the instructions for installing the 
Expanded Print command (see below). The 
form letter (Notice) command depends on 
these changes. 

Create a PIMS file with the structure defi- 
nition in Fig. 2. 

Notice requires the first five fields of a 
PIMS record for the name and address. Any 
blank lines will not be printed. The sixth 
field contains the name to appear in the 
greeting. The seventh field is optional, and 
only suggested if you wish to produce 
sorted label files from PIMS. The inside ad- 
dress produced from the label record above 
is as follows: 

Mr. John Q. Doe 
123 House Lane 
Somewhere, ST 99999 

Dear John: 

If you have a PIMS label file without the 
sixth field as shown, use the first line of the 
name and address in the greeting. Make the 
following change to line 2320: 

2320 J=J + (S + 1): LPRINTTAB(LM) "DEAR ";B$(l-5);":": 
IFSLPRINT STRING$(S,138) 

Expanded Print Command 

The Expanded Print command enables 
you to print form letters, multiple text files 
and single sheets of typing paper. To take 
advantage of the Expanded Print com- 
mand, change line 40, line 1310 and add 
lines 1315-1317. Replace lines 1640-1740 
with lines 1640-1748 (see Listing 1). 

For Cassette Files 

If you have more than 16K memory, but 
no disk storage capabilities, make the fol- 
lowing changes to install the Notice and Ex- 
panded Print commands. 
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Listing 1 continued 

1390 CLS:PRINT"JUSTIFYING":FORL=0TOLA:X=LEN(A$(L) ) 'JUSTIFY 

1400 IFX<2GOTO1500ELSEFORI=XTO2STEP-1:A=ASC(RIGHT$ (A$(L) f l) ) 

1410 IFA=UTHENA$(L)=LEFT$(A$(L) ,1-1) :X=X-1:NEXTI 

1420 IFX>=LLORA=17ORA=20THEN1500ELSE J=0 : K=l : F0RI=1T0X 

1430 IFMID$(A$(L) , I ,1) <>S$THENK=0ELSEIFK=0THENK=1:S( J) =1 : J=J+1 

1440 NEXTI:IFJ=0GOTO1500 

1450 K=RND(J)-1:IFINT(J/2)=J/20RJ=1THENN=1ELSEN=2 

1460 F0RI=1T0LL-X:T(K)=T(K)+1:K=K+N:IFK>J-1THENK=K-J 

1470 NEXTI:FORI=J-1TO0STEP-1:A$=STRING$(T(I) ,S$) iT{I) =0 

1480 A$(L) =LEFT$(A$(L) ,S(I) ) +A$+RIGHT$ (A$(L) ,LEN(A$(L) )-S(I) ) 

1490 NEXTI 

1500 NEXTL:GOTO1830 

1510 CLS:INPUT"REALLY KILL (Y/N) " ; A$: IFA$="Y"THENRUNELSE60 'KILL 

1520 GOSUB1820:CLS:PRINT"LOADING" ' LOAD 

1530 INPUT#-1,LA,LL,S,N$,FL,LM,PL,PN$,FP,P1$,H$,SS$,G 

1540 FORI=0TOLASTEP4 

1545 INPUT#-1,X$(0) ,X$(1) ,X$(2) ,X$(3) 

1550 FORJ=0TO3:L=I+J:X=LEN(X$(J)) :A$(L) ="" :IFX<1GOTO1570 

1560 FORK=lTOX:A$(L)=A$(L)+CHR$(ASC(MID$(X$(J) ,K,1) ) -128) :NEXTK 

1570 NEXTJ: NEXTI :GOTO60 

1580 INPUT"FIRST LINE TO MOVE";F: IFF<0THENF=0 ' MOVE 

1590 INPUT"LAST LINE TO MOVE"; Z : IFZ>LATHENZ=LA 

1600 IFF>ZTHEN80ELSEINPUT"FIRST NEW LINE" ;N:FORI=FTOZ 

1610 IFLEN(A$(N) ) PRINTLINE" ;N; "NOT EMPTY" :GOTO60 

1620 A$(N)=A$(I) :A$(I)="":N=N+1:IFN>LATHENLA=N 

1630 NEXTI :GOT01 830 

1640 IFR=2THEN1647ELSEIFPEEK(14312)=>128THENINPUT"PRINTER NOT RE 

ADY. ABORT (Y/N) ";A$:IFA$="Y"THEN60ELSE1640 ' PRINT 

1645 R=1:MT$="":INPUT"MULTIPLE TEXT FILES (Y/N) ";MT$jIFMT$<>"Y"AN 

DMT$O"N"G0T01645 

1647 EP=PL*(S+1) 

1650 GOSUB480:CLS:PRINT"PRINTING" 

1660 X=FP:TL=FL:IFRO2THENAP=0 

1670 IFAPO0GOTO1700 

1680 IFPN$O"Y"0R(Pl$="N"ANDX=l)THENLPRINT" "ELSELPRINTTAB(LM) H$ 

;STRING$(LL-LEN(H$)-7," ") ; "Page";USING"###" ;X 

16 90 LPRINT" ":AP=AP+2 

1700 LPRINTTAB(LM) ; : IFN$="Y"THENLPRINTUSINGF$;TL; 

1705 LPRINTA$(TL) 

1710 IFSLPRINTSTRING$(S,138) 

1720 AP=AP+(S+1) :TL=TL+1 

Listing 1 continues 



Change line 70, line 1330, lines 2170- 
2180, lines 2195-2220 and lines 2230-2390 
as in Program Listing 2. 

Create a PIMS file as in Fig. 2. Change 
line 40, lines 1640-1748, line 1780, and lines 
1310-1317 as in Program Listing 2. 

Load and resave all of your Basic Word 
Processor cassette text files. If this step is 
omitted the modified Load command will 
not work properly. 

Change lines 1520, 1530, and 1570 of the 
Load command and add line 1525 as in Pro- 
gram Listing 2. 

To re-emphasize a point made by Mr. 
Hinrichs in his original article, "Speed is the 
most noticeable problem, but is inherent in 
Basic strings." You will find speed less of a 
problem in the Expanded Print command. 
By splitting your manuscript into smaller 
segments you are less affected by the 
pauses associated with Basic string reas- 
signment. You can still print it as one con- 
tinuous manuscript. Disk storage and re- 
trieval of text files will greatly reduce the 
time required for your word processing 
needs. 

Mr. Hinrichs warns that added program 
features will cause you to exceed 16K 
memory. My system has 32K memory; your 
system should also exceed 16K memory to 
add the above modifications. ■ 

Duane and his family have recently moved 
to Spain. Since then, he is unable to use his 
disk drive or cassette recorder because the 
power is 220V, 50 Hz. 
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FRICTION FEED FOR YOUR EPSON 

MX-70-MX-80 

• MX-70 and MX-80 are Trademarks of EPSON, Inc. 



Converts your printer for friction 
feed of SINGLE SHEETS or ROLL 
PAPER. 

SIMPLE Installation (all you need 
is a screwdriver, no soldering). 

Tractor feed remains 
undisturbed. 



■ Only S 39 95 

(add $2.00 for shipping) 




SATISFACTION GUARANTEED OR YOUR MONEY BACK 

MICRO-GRIP, Ltd. 

3164 Dumbarton Ave. 

San Bernardino, CA 92404 

CALIFORNIA RESIDENT ADD 6% STATE SALES TAX 




VISA & Master Card Accepted 



(714) 864-6643 
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Listing 1 continued 

1730 IFAP<=EPANDASC(RIGHT$(A$(TL-1) ,1) ) O17G0T01744 

1740 F0RI=1T0(G-AP) :LPRINT" " :NEXT:X=X+1: AP=0 

1742 IFSS$="Y"THENINPUT"FEED NEXT SHEET, HIT ENTER" ;A$ 

1744 IFTL<=LAGOTO1670 

17 46 IFMT$="Y"GOSUB1990:IFLEFT$(NA$,3) <>"END"THENTL=FL:GOTO1670: 

ELSEMT$="N" 

1747 IFAPO0THEN1740 

17 48 IFR=2THENRETURNELSER=0:GOTO60 

1750 INPUT"REPLACE LINE" ;L: IFL<0ORL>LAGOTO80 ' REPLACE 

1760 R=1:A$(L)="":L=L-1:GOTO90 

1770 GOSUB1820:CLS:PRINT"SAVING" ' SAVE 

1780 PRINT#-1,LA,LL,S,CHR$(34)+N$+CHR$(34) ,FL,LM,PL,CHR$ (34) +PN$ 

+CHR$(34) ,FP,CHR$(34)+P1$+CHR$(34) ,CHR$ (34) +H$+CHR$ (34) ,CHR$(34) 

+SS$+CHR$(34) ,G:FORL=0TOLASTEP4 

1790 FORJ=0TO3:I=L+J:X=LEN(A$(I)) :X$ ( J) ="" :IFX<1GOTO1810 

1800 F0RK=1T0X:X$(J)=X$(J)+CHR$(ASC(MID$(A$(I) ,K,1))+128) :NEXTK 

1810 NEXTJ:PRINT#-1,X$(0) ,X$(1) ,X$(2) ,X$(3) :NEXTL:GOTO60 

1820 INPUT"READY CASSETTE, THEN PRESS ENTER" ;A$: RETURN 

1830 CLS:X=FP-1:F0RM=FLT0LASTEPPL:X=X+1 ' VIDEO 

1840 IFP1$="N"ANDX=1GOTO1860 

1850 IFPNS="Y"PRINTH$;TAB(LL-7) "Page" ;USING"###" ;X :PRINT 

1860 FORI=MTOM+PL-1:IFI>LAGOTO1890 

1870 IFSPRINTSTRING$(S-1,10) 

1880 GOSUB1910 

1890 NEXTI:A$="" :IFK=LAINPUT"PRESS ENTER" ;A$: IFA$<>""M=LA 

1900 NEXTM:L=LA:GOTO60 

1910 Y=LEN(A$(I) ) :IFYTHENA=ASC(RIGHT$(A$(I) ,1) ) ELSEA=0 

1920 IFN$="Y"PRINTUSINGF$;I; 

1930 PRINTA$(I) ; :IFA=17PRINTCHR$(92) ; 

1940 IFA=20PRINTCHR$(93) ;ELSEIFA=UPRINTCHR$(95) ; 

1950 IFN$O"Y"ORYO60PRINT 

1960 RETURN 

1970 CLS: INPUT "REALLY EXIT (Y/N) " ; A$: IFA$O"Y"GOTO60 ' EXIT 

1980 CLS:CLEAR50:OUT254,0:END 

1990 GOSUB2170:GOSUB2180:PRINT"GETTING TEXT FROM DISK" • GET 

1995 IFLEFT$(NA$,3) ="END"THENRETURN 

2000 OPEN"I",l,NA$ 

2010 INPUT#1,LA,LL,S,N$,FL,LM,PL,PN$,FP,P1$,H$,SS$,G 

2020 FORI=0TOLA 

2025 IF EOF(1)THEN2060 

2030 LINE INPUT#1,A$(I) 

Listing 1 continues 


The 

Lawyer's 

Microcomputer™ 


A Newsletter for Lawyers 
Using the TRS-80* 


• Articles for Lawyers 

I • Law Office Applications 

\ • Lawyer Information 

'• Exchange 

i • Software Reviews 

I • Hardware Reviews 

1 • Advertisements Directed 
to Lawyer Users 

[ • Technical Tips j 

• Letters and Suggestions j 

• And Much More | 

j A New Monthly Newsletter 
For Lawyers 

\ Send $28 For A 

One Year Subscription 

The Lawyer's Microcomputer™ 

Post Office Box 1046A 
Lexington, S.C. 29072 

\-_ <^191 *TM fanciy Cora 



sfe* 



ctmrtm ml&xv 



A new super hi-res space game. 
Wave after wave of alien attackers, 
each one a different and unique challenge 
to your skills. 
CASSETTE (16K) . . $24.95 
DISC (32K) . S29.95 




MARK DATA PRODUCTS 23802 BARQUILLA, MISSION VIEJO, CA 92691 • (714) 768-1551 



We pay shipping on all orders in the continental U.S. and Canada. Overseas add $3.00. California residents 
please add 6% sales tax. We are always looking for quality machine language programs. Contact us for details. 



MASTER CHARGE 
OR VISA ACCEPTED 



HH 



y'See List of Advertisers on Page 435 
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SPIKE-SPIKERS™ 

Protect-Control-Organize 

Computers & sensitive electronic equipment. 

Helps prevent software "glitches", unexplained 

memory loss, and equipment damage 

PROTECTS with transient 

absorber* dual five-stage 

filter. Absorbs power line 

transients fk filters out RFI 

"hash." 




CONTROLS with 8 individ- 
ually switched 120 vac 
grounded outlets. Main on- 
off switch, fuse* indicator 
light. 
Deluxe Power Console ORGANIZE your computer 
$79 95 * other equip, power cords. 

No more overloaded octopus 
cube taps. 
2-Socket Plug-In Models 

MINI-I 

Transient absorber only 

$34.95 
MINI-II 

Transient absorber plus 
3-stageRFI"Hash" filter 

$44.95 

4-Socket Plug-In Model with Light 

QUAD-I 

Transient absorber only 

$49.95 
QUAD-II 

Transient absorber plus 
dual 3-stage RFI "Hash" filter 





$59.95 



Electronics Co. Inc. 
Colony Drive lnd. Park 
6584 Ruch Rd., Dept. 80 
.Bethlehem, PA 18017 



Order Factory Direct 
215-865-0006 
Out of State Order Toll Free 
H^ 800-523-9685 

VISA 

^» PA Res. add 6% 
COD Add 3.00 + Shipping 
Dealers Invited 



PACKER: Machine language program that edits all or part 

01 your Basic program to run faster, save memory, or 
ease editing. The 5 options include UNPACK— unpacks 
multiple statement lines into single statements 
maintaining logic, inserts spaces and renumbers lines. 
SHORT— deletes unnecessary words, spaces, and REM 
statements. PACK— -packs lines into maximum multiple 
statement lines, including all branches. MOVE— moves 
line or blocks of lines to any new location on program. On 

2 cassettes for 16K, 32K. & 48K 

For TRS-80 Mod I or III Level II or Disk Basic . . . $29.95 
SYSTEM TAPE DUPLICATOR: Copy your SYSTEM format 
tapes. Includes verify routines. The Model III version 
allows use of both 500 and 1500 baud cassettes speeds. 

For TRS-80 Model I or III Level II $15.95 

CASSETTE LABEL MAKER: A mini word processor to print 
cassette labels on a line printer. Includes 50 peel - and - 
stick labels on tractor feed paper. 

For TR-80 Model I of III Level II & Printer $17.95 

PRINT TO LPRINT TO PRINT: Edits your Basic program in 
seconds to change all Prints to LPrints (except Print® or 
Print#) or LPrints to Prints. Save edited version. 

For TR-80 Modei I or III Level I! $12.95 

FAST SORT ROUTINES: for use with Radio Shack's 
Accounts Receivable. Inventory Control I. and Disk 
Mailing List Systems for Model I Level II Sorts in 
SECONDS! You'll be amazed at the time they can save. 
Supplied on data diskette with complete instructions. 

FAST SORT for Accounts Receivable $19.95 

FAST SORT for Inventory Control I $19.95 

FAST SORT for Disk Mailing List (specify data diskette of 

cassette for 1 drive system) $14.95 

ALL THREE ROUTINES $44.95 

Prices subject to change without notice. Call or write for a 
complete catalog. Dealer inquiries invited. VISA and 
Mastercharge accepted. Foreign order in US currency 
only Kansas residents add 3% sales tax. 
On-line catalog in Wichita FORUM-80: 316-682-2113 
Or call our 24 hour phone (316) 683-4811 or write 
COTTAGE SOFTWARE , 1R7 
614 N.HARDING ^ 
WICHITA. KANSAS 67208 
TRS-80™is a trademark of Tandy Corporation 



Listing 1 continued 

2060 NEXTI 

2070 CLOSE 1:IFRTHENRETURNELSEGOTO60 

2080 GOSUB2170:GOSUB2180:PRINT"WRITING TEXT TO DISK" ' WRITE 

2090 OPEN"0",l f NA$ 

2100 PRINT#1,LA;LL;S;CHR$(34) ;N$;CHR$(34) ;FL;LM/PL;CHR$(34) ;PN$; 

CHR$(34) ;FP;CHR$(34) ;P1$;CHR$(34) ;CHR$(34) ;H$;CHR$(34) >CHR$(34) ; 

SS$jCHR$(34) ;G 

2110 PORI=0TOLA 

2120 X=LEN(A$(I)) :IFX<1GOTO2150 

2140 PRINT#1,A$(I) 

2150 NEXTI 

2160 CLOSE 1:GOTO60 

2170 CLS: INPUT" ENTER FILE NAME ">NA$: RETURN 

2180 INPUT"READY DISK, THEN PRESS ENTER" ;A$: RETURN 

2190 IFPEEK ( 14312) =»>128THENINPUT"PRINTER NOT READY. ABORT(Y/N)"; 

A$:IFA$="Y"THEN60ELSE2190 ' NOTICE 

2195 GOSUB2170:GOSUB2180:PRINT"READING PIMS FILE" j OPEN" I" ,2,NA$ 

2200 PR=-1:EF=0 

2210 IFEFTHEN2340ELSEPR=PR+l:LINEINPUT#2 f T$ 

2220 IFE0F(2)THENEF=1 

2230 IFPRO0THEN2240ELSE2210 

2240 T1$=CHR$(126) :GOSUB2350 

2250 J=0 

2255 LPRINT" ": LPRINT" ":J=J+2 

2260 F0RI=1T05 

2270 IFLEFT$(B$(I) ,1)<>" "ANDLEFT$(B$(I) ,1) <>""THENLPRINTTAB(LH) 

B$(I) :J=J+(S+1) :IFSLPRINTSTRING$(S,138) 

2300 NEXTI 

2310 J=J+(S+1) : LPRINT" " :IFSLPRINTSTRING$(S,138) 

2320 J=J+(S+1) :LPRINTTAB(LH) "Dear " ;B$(I) ; ": " :IFSLPRINTSTRING$(S 

,138) 

2325 J=J+(S+1) : LPRINT" " :IFSLPRINTSTRING$(S,138) 

2330 AP=J:R=2:GOSUB1640:GOTO2210 

2340 CLOSE2:R=0:GOTO60 

2350 J=-l ' UNPARSE LABELS 

2360 I=INSTR(T$,T1$) :IFI=0THENRETURN 

2370 J=J+1:B$(J)=LEFT$(T$,I-1) :T$=MID$(T$,I+1) :GOTO2360 



Program Listing 2 

10 CLS :PRINTTAB( 20) "BASIC WORD PROCESSOR" 

20 ' (C) BY D.D.HINRICHS 1979 

30 DEFINTA-Z:CLEAR10000:NL=200:DIMA$(NL) ,X$(3) ,S(20) ,T(20) 

40 B$=CHR$(30) :C$=CHR$(143) :F$="### " :N$="Y" :PN$="N" :Pl$="Y":SS$ 

="N":G-66 

50 S$=" "»H$=S$:LA=-1:P=1:FP=1:PL=15:LL=«60:LM=10:U=32:OUT254,1 

60 L=LAi IT-0 :R=0 : A$="" :PRINT: INPUT"COMMAND" ; A$: IFA$=""GOTO80 

70 A=ASC(A$) -64: IFA>0ONAGOTO90 ,480 ,510,760 ,790 ,1220 ,80 ,1320 ,1350 

,1390,1510,1520,1580,2190,80,1640,80,1750,1770,80,80,1830,80,197 



80 PRINT"** ENTRY ERROR **":GOTO60 

90 CLS:D=0:N$="Y":IFLA<0THENL=0:GOTO130 * ADD 

100 IFNL»LA+1THEN210ELSEIFL>FL+12THENB=L-12ELSEB=FL 

110 FORI=BTOL»X=LEN(A$(I)) :D=D+INT((X+4)/64-.01) 

120 GOSUB1 910: NEXTI :L=L+1 

130 C=(L-FL+D)*64:IFC>896PRINT:PRINT:C=896 

140 PRINT@C,USINGF$|L;:PRINTA$(L) ; :P=LEN(A$(L) ) +1:C=C+P+3:K=L+1 

150 PRINTeC,C$; :A$=INKEY$:PRINT@C,S$; : IFA$=""GOTO150 

160 GOSUB290:ONA-7GOTO360,410,310 

170 IFA=13THENA$=S$:GOTO210ELSEIFA=24THEN380ELSEIFA=31GOTO460 

180 IFA=25THEN430ELSEIFA=26THEN330 

190 IFA=96IFLA<LTHENLA=L:GOTO60ELSE60 

200 PRINT§C,A$; : A$ (L) =A$ (L) +A$: IFP<=LLTHENP=P+1 :C=C+1 :GOTO150 

210 IFRGOTO60ELSEIFNL<=KPRINT:PRINT"FILE FULL" :LA=NL-1:GOTO60 

220 IFLEN ( A$ (K) ) THENL=K :GOSUB1360 

230 IFK>LATHENLA=K 

240 IFA$=S$GOTO280 

250 F0RM=LL+1T02STEP-1:A$=MID$(A$(L) ,M,1) :IFA$OS$NEXTM:GOTO280 

260 A$(K)=RIGHT$(A$(L) ,LL-M+1) :A$(L) =LEFT$(A$(L) ,M-1) 

270 PRINT@C-LL+M-1,B$;:L=K:GOTO130 

280 A$(L)=LEFT$(A$(L) ,LL) :L=K:GOTO130 

290 A=ASC(A$) :IFA>64ANDA<91THENA=A+UELSEIFA>96ANDA<123THENA=A-U 

300 A$=CBR$ (A) : RETURN 

310 IFP>LLGOTO210 ' D 

320 PRINT§C,CHR$(92);:A$(L)=A$(L)+CHR$(17) :A$=S$:GOTO210 

330 IFP>LLGOTO210 ' S-D 

340 C=(L-FL+D)*64+4:IFO900THENC=900 

350 GOSUB1180:P=1:A$=S$:GOTO210 

360 IFP=1GOTO150 • L 

370 C=C-1:PRINT@C,B$;:P=P-1:A$(L)=LEFT$(A$(L) ,P-1) :GOTO150 

380 IFP=1GOTO150 ' S-L 

390 A$(L)=""tP=l:C=(L-FL+D)*64+4:IFO900THENC=900 

Listing 2 continues 
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TRS/CLK 

The clock that's turned on... even when you're not! 
Never again enter the time or date with the 
TRS/CLK from 

• Time/ Date always functional . . . even during power 
failures 

• 12/24 hours, minutes, seconds, day, month, year 

* Diskette software included 

* Dates disk automatically 

• Fully software controlled 

* Easy hookup— plugs into any TRS-80' computer 

• Full 2 year warranty 

* lil. listed adaptor 



Dealer inquiries invited. 
Price: with display $199.95 
without display~$"n3 
Unconditional money-back 
guarantee 

Call today 800-631=211 
for fast service. 
Or fill out the convenient 
Order Form below and ma 

• TRS-80 is a registered trademark of 
Tandy Corporation. 



f is-sa-HB 



Kessler-Ellis Products 
ny 

120 First Avenue 

Atlantic Highlands NJ 07716 




Ww^M^MM*: 



wmmmmmmmmmmmm 



M i 

□ COD 



TO ORDER: Specify model, DOS type and version. No charge for 

postage in continental U.S. 

Personal checks require two weeks clearance. 

D Please send me TRS CLK model(s) indicated. 

No. 



-168 



with display $199.95 $. 

without display $129.95 $. 
NJ and Cal. add sales tax 

Total $. 



D Check 
Card* 



□ MasterCard 



□ Visa 



. Exp. . 



Authorized Signature. 

Name 

Company 

Address 

City 

Phone 



State. 



.Zip. 



Kessler-Ellis Products Company 120 First Avenue Atlantic Highlands NJ 07716 800-631-2165 



# 



7.0M Bytes 1395.00 

Introductory 
^ Offer 



Prometheus 5 



That's Right! Now you can have over 5M bytes of 
formatted data storage by simply plugging the 
Prometheus 5 into the I/O connector on your TRS-80C S 
Model III. 

Developed by Computex in conjunction with leading 
engineers in the aerospace industry, the Prometheus 5 
offers quality and reliability using the latest advance- 
ments in technology. For example: the Winchester 
drive used in the system is from Ampex, the leader in 
Winchester hard disk drives. The Winchester controller 
provides CRC generation, error checking and code 
correction. The fully regulated power supply has 
current and overvoltage protection circuits and the line 
input power is EMI filtered with transient suppression 
circuitry added. 

The Prometheus 5 is operated by DOSPLUS 4.0, the 
leading Winchester disk operating system. 

So. if you're considering mass storage for your Model 
III. consider the Prometheus 5 for quality, compatibilty 
and reliability. 

Prometheus 10 10M Byte. . .$1595.00 

Prometheus 15 15M Byte. . .$1795.00 

Prometheus 20 20M Byte.. .$1995.00 

Call or Write for Brochure and Details 



trodu 

CompuCuard 



Introducing 



A leading computer engineer has designed a cover to 
protect the front of your TRS-80® keyboard from 
excessive use and wear. The guard fits securely to the 
keyboard without interference to keyboard input. Made 
of high quality PVC. 

CompuGuard $15.95 

V\w Basic and Assembly 
Language Courses 

Comprehensive courses on two popular programming 
languages, Basic and Z80, have been recorded for the 
self-learner. The courses were designed to help the 
newcomer, novice, or the advanced beginner on 
programming language. Actual classes were recorded 
along with student comments and questions. 

Z80 Assembly Language Course $150.00 

(includes manuals and class handouts) 

Basic Language Course $130.00 

(includes manuals and class handouts) 

CERTIFICATES OF COMPLETION AVAILABLE 
CALL OR WRITE FOR OUR FREE BROCHURE 



Model III Disk Controller Kits 

Everything you need to install disk drives in your Model 
III except the disk drives. 

•Winchester Host Adaptor Option-Gold Plated Edge 
Card Connectors»Silkscreened and Soldermasked 
PCB«Assembly and Installation Manual»Detailed Test 
and Troubleshooting lnstructions»Switching Power 
Supply»Mounting BracketsHnterface Cables* 
Disk Controller Kits $279.95 



5-25-inch Floppy Disk Drives 

Tandon's TM-100 family 
of mini-floppies offer the 
absolute highest storage 
capabilities of any 5.25 
inch high-speed, random 
access disk drive. Avail- 
ble in two double head 
and two single head mo- 
dels, all double density, 
with the capability to 
provides up to 720K bytes 
of formatted storage- 



TM100-1 $219.95 TM100-3 $299.95 

(single sided 40 track) (single sided 80 track) 

TM100-2 $299.95 TM100-4 S399.95 

(double sided 40 track) (double sided 80 track) 

Power Supply and Case $49.95 

NOTE: May Require Special Interface - Please Ask 




Our qualified technicians are availble for technical 
questions at (713) 488-8022 Monday thru Friday from 
4:00 to 5:00 PM CST. 




OMPL/TEX 



A subsidiary ol Worldwide Data Systems. Inc. 



17321 El Camino Real 

Houston, Texas 77058 

(713)488-8022 

VISA, MASTERCARD AND AMERICAN EXPRESS 
NET 30 TERMS AVAILABLE 

• Prices are subject to change without notice* 

• Prices do not include shipping* 

• Dealer inquiries invited* 
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Customized TRS-80 Model Ill's 
Dual Drive 48K $1795. 




•Your Choice of Green or Amber Anti-Glare Display* 

•DOSPLUS 3.4- 

•Winchester Expansion Capabilities* 

•Tandon Disk Drives* 

• Floppy Controller with P.L.L. Data Separation* 



A Computex customized system starts out as a basic Model 
III with 16K RAM, modified to 48K RAM capacity. Add to 
this our Model III drive controller with the Winchester 
expansion option and the disk drive of your choice, a Tandon 
or an MPI flexible disk drive. The system is then tested for 48 
hours to assure you of peak performance when it arrives. All 
customized Model III systems from Computex now include at 
no extra charge DOSPLUS 3.4. 



TRS-80® Model III Drive Kits 




The Computex Model III disk drive kits include the 
Computex drive controller with the capabilities of 
Winchester drive expansion. Virtually everything you 
will need to install disk drives in your Model III is 
included. We even include one of the most popular disk 
operating systems available, DOSPLUS 3.4. 



M3DK-0 $495.00 

Drive Kit with 1 Single Sided 40 Track Drive 
M3DK-1 $699.00 

Drive Kit with 2 Single Sided 40 Track Drives 
M3DK-2 $995.00 

Drive Kit with 2 Double Sided 40 Track Drives 




Model III Internal 
Communications Board 

The M3CB1 communications board comes complete with 
RS232 and a direct connect modem. The kit can be supplied 
in either total kit form or as a partially assembled unit. The 
partially assembled unit only requires installation of the 
integrated circuits. All other components have been installed 
and tested. The M3CB1 mounts in the same location as the 
Radio Shack RS232 board and installs easily in less than one 
hour. 

FEATURES 

•300 to 9600 Baud RS232* 

•300 Baud Full Duplex Operation" 

•Uses FSK Modulation Techniques* 

Supports Originate or Answer Modes* 

•Will Operate DTE or DCE Equipment* 

M3CB1-1 ... P.C.B. and Manual $34.95 

M3CB1-2... Assembled and Tested RS232 $69.95 

M3CB1-3... Complete Kit with RS232and Modem . . $129.95 
M3CB1-4 ... Partially Assembled Kit $169.95 



Micro-Design 
Interface Expansion Boards 

Specials 
MDX-3 For Your Model III 



• Floppy Disk Controller • Phone Modem • 
• RS232 Port • Silkscreened and Soldermasked PCB • 

Complete Kit S219.95 

• Printed Circuit Board $74.95 

• Disk Controller Kit $89.95 

• Serial Interface Kit $79.95 

• Phone Modem Kit $39.95 



MDX-2 For Your Model I 

Complete Kit S249.95 

• MDX-2 PCB $74.95 

•Onboard Direct Connect Phone Modem Kit . . . .$39.95 
•2K/4K Eprom Kit $11.95 

• RS232 mA Serial Interface $24.95 

• Real-time Clock Kit $17.95 

•32K RAM Expansion Kit (less RAM) $17.95 

•Floppy Disk Controller Kit $31 .95 

•Cassette Port $4.95 

•Analog Power Supply $29.95 

•Hardware and Socket Kit $29.95 

• Centronic Line Printer Port $11.95 
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PRICE BREAKTHRU- 




IT'S A MIRACLE!! 



TRS-80 Mod 1 and III hardware 


16K RAM upgrade 


$13.50 


External Disk Drives inc 


p.s. 


& enclosure** 




40tk 1 side 


S215.00 


40tk 2 sides 


S295.00 


80tk 2 sides 


$425.00 


Signal extender cable 




for ext. drive 


$12.50 


2 drive expansion cable 




(Mod I or III) 


$20.00 


4 drive expansion cable 




(Mod I) 


$25.00 


Bare Drives — 




40tk 1 side 


$180.00 


40tk 2 sides 


$245.00 


Drive Service Manuals 


$25.00 


Single drive p.s. 




& enclosure 


$49.95 


Hard Disk (Winchester) for 


Mod 1, LNW— Includes 




DOSPLUS 4.0 




6.3 meg 


$1649.00 


9.6 meg 


$1849.00 


19 meg 


$2449.00 


2 x 6.3 meg 


$2449.00 


2 x 9.6 meg 


$2849.00 


2x19 meg 


$3949.00 


Hard Disk 6.3 + 40tk 




floppy combination 


$1995.00 


Percom Doubler— 


$149.00 


Data Separator— 


$27.00 


LNW products 




TRS-80 Mod III 




16K L III Basic 


$899.00 


16K upgrade 


$13.50 


48K— 1 disk 


$1349.00 


48K— 2 disk 


$1549.00 


2 sided disk upgrade 


$70.00 ea 


VR RS232C— upgrade 


$70.00 


Direct Connect 300 




baud modem upgrade 


$275.00 


Hard Disk for Mod III— IBM-PC 


6.3 meg 


$1599.00 


9.6 meg 


$1799.00 


19.0 meg 


$2399.00 


2x6.3 


$2399.00 


2x9.6 


$2799.00 


2 x 19.0 


$3899.00 



Coming Soon— Internal 
Hard Disk for Mod III 
Floppy Disk III kits for Mod III 
include p.s. controller & cables 

40tk— 1 side $440.00 

40tk— 2 side $510.00 

2nd— 40tk 1 side $190.00 

2nd— 40tk 2 side $250.00 



"We use VR Data hardware upgrades 


exclusively. They are 


the best 


around!. 




Printers— 




C.ltoh F-10 40CPS 




letter quality 


$1399.00 


C.ltoh F-10 55CPS 




letter quality 


$1699.00 


C.ltoh tractor for 




F10-40 


$200.00 


F10-55 


$225.00 


Ribbons for above 




printers 


$4.50 ea 


Sheet feeder 


$1300.00 


C.ltoh Pro-writer 




parallel 


$475.00 


serial 


$575.00 


Okidata 80 


$375.00 


82A 


$479.00 



83A 
Okigraph 

NEC— 7710 RS232 
55CPS 

NEC— 7730 parallel 
NEC— 7720 KSR 
Vertical Tractors 
BiDirectional Tractors 
Sheet Feeder 
Twin Feeder 
Smith Corona— TP1 pitch 
10/12 pitch— Serial/ 
parallel interface 

Super Deal 

Standard Cable 
Tabletop Printer stand— 
12" (holds up to 50 lbs.) 
Tabletop Printer stand— 
16" (holds up to 50 lbs.) 
Diskettes— 10 per box 
Verbatim— 

5'/4"SSDD 

614* DSDD 
Maxell— 5 V*" 

Elephant by Leading Edge 
Disk head cleaners — 

VRData(5V4") 

Verbatim S'/T or 8" 
5V4" plastic library case 
8" plastic library case 
Paper & Labels 
9% x 11 Fanfold— 
2700 ct. 

14'/, x 11 Fanfold— 2700 ct. 
3% x % labels— 5M 
Modems 
Hayes 

Smartmodem 

Micromodem II 

Micromodem 100 
Novation 

Auto cat 

D Cat 

Cat 

4202B— 1200 baud 

half duplex 

Apple Cat II 
Lexicon 

Lex— II 
Monitors — 

BMC 12" Mean Green 

BMC 13" Composite 

Color 

Mod I /III software* 

DOSPLUS 3.4 Mod I 
DOSPLUS 3.4 Mod III 
LDOS 5.1 Mod I, III 
Micro Term (Best yet) 
Super utility (Best yet) 



$749.00 
$65.00 

$2495.00 
$2495.00 
$2895.00 
$229.00 
$325.00 
$1175.00 
$1595.00 



$595.00 

$25.00 

$17.95 
$24.95 



$23.95 
$39.95 
$34.95 
$22.95 

$14.95 
$29.95 



$27.50 
$35.00 
$15.00 



$229.00 
$278.00 
$305.00 

$229.00 
$165.00 
$155.00 

$475.00 
$339.00 

$124.00 

$89.00 

$325.00 

$87.50 
$87.50 
$117.50 
$75.00 
$45.00 



Terms— COD or Prepaid Only 
F.O.B. Shipping Point 
(215) 461-5437 
Prices Subject to Change 
Without Notice. 

TRS-80 Trademark of Tandy Corp. 

DISK SUPPLY CO. 

Suite 439 

111 S. Olive St. 

Media, PA 19063 



FREE 

business software 
directory 

• Radio Shack's Model I, II, III. 

• Heath's MBASICand HDOS 

• CPM: Xerox, Alto... 

• IBM Personal Computer 



"IDM2 is GREAT !" 



-publisher of 80-US 



" (GL) superior to either the Osborne (SBSG & Taranto) 
or Radio Shack... MAI L-X has a greater capacity... 
more flexible than (R.S.)" 

-columnist of 80-microcomputing 

"imperceptively fast .. .(DBMS) is a good and reliable 
workhorse" -publisher of Interface Age 



Data base manager, integrated accounting package 
(AR, AP, GL & Payroll), inventory, word proces- 
sing, and mailing list. Compare and be selective ! 



a^ 



Micro Architect, Inc. 

96 Dothan St., Arlington, MA 02174 



Tried and Proven: 




THE ELECTRONIC NOTEBOOK 
PROGRAM BY KSoft 



One year old and a proven success! LOG (or the TRS-80 (R) is still the only program on 
the market that addresses one very obvious problem: Despite data-base managers, word 
processors, and a dozen brands of spreadsheets, the (act is that most of the information 
people handle on a day-to-day basis just won't fit into fields, files, and codes. 

LOG, on the other hand, is a program that thinks' like you do! LOG turns your video screen 
into a one page of a large notebook. Thumb slowly or search like lightning through your 
previous entries; modify, update, or erase as you desire with the built-in text editor. Ap- 
pend new pages with a single keystroke, up to 170 individual pages on a Model III diskette! 
Keep a separate LOG notebook on any diskette in any drive. 

Yes! LOG supports hardcopy to your lineprinter. 

Yes! All commands are single keystroke (no modes to remember). 

Yes! You can access LOG while BASIC is running. 

Yes! It really works! 

People are using LOG to store address lists, programming notes, diaries, personnel files, 
recipes, record collections, and a hundred other uses. Think up your own applications. 
You'll probably use it every day. 



Model I 
Model III 



48K 
48K 



$49.95 
S49.95 



(upper case only) 
(upper/lower case) 



Minimum system: 48K, 2 disk drives, DOS 2.3 (I) or 1.3 (III) required. Ask about other 
Operating Systems or hardware configurations. 



Write or Call for further information: 

KSoft 

318 Lakeside Drive 
Brandon, MS 39042 



(601) 992-2239 

Master Card and Visa Accepted. 
MS Residents pay 5% sales tax. 
We pay shipping and handling in USA. 



(TRS-80 is a trademark of Tandy Corporation) 
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Listing 2 continued 

400 PRINT@C,B$;:GOTO150 

410 IFP>LL-6GOTO150 ' R 

420 A$(L)»A$(L)+STRING$(5,S$) :C=C+5:P=P+5:GOTO150 

430 IFP>LLGOTO210 ' S-R 

440 C=(L-FL+D)*64+4:IFO900THENC=900 

450 GOSUB1200:P=1:A$=S$:GOTO210 

460 IFP>LLGOTO210 ' CL 

470 PRINT§C,CHR$(93) ; : A$(L) =A$(L) +CHR$ (20) :A$=S$:GOTO210 

480 CLS t PRINT "DELETING BLANK LINES" :FORJ=LATO0STEP-1 ' BLANK 

490 IFA$(J)=""F0RI=JT0LAjA$(I)=A$(I+1) :NEXTI jA$(LA) ="" :LA=LA-1 

500 NEXTJtIFRTHENRETURNELSE1830 

510 INPUT"FIRST LINE TO COMPILE" ;F:IFF<0THENF=0 ' COMPILE 

520 INPUT'LAST LINE TO COMPILE" ; Z : IFZ>LATHENZ=LA 

530 IFF>-ZTHEN80ELSECLS : PRINT"COMPILING" :FORL=FTOZ-1 : K=L+1 

540 X«LEN(A$(L)) :X$="":IFX<2THEN620ELSEIFX<=LLGOTO600 

550 FORI=XT01STEP-l:A$=MID$(A$(L) ,1,1) 

560 IFA$OS$THENX$=A$+X$:NEXTI:GOTO600ELSEIFX$=""NEXTI 

570 A=ASC(RIGUT$(X$,1)) :IFA=330RA=460RA=580RA=63THENX$=X$+" " 

580 A$(L)=LEFT$(A$(L) ,1-1) : IFLEN(A$ (K) ) =0THENA$(K) =X$:GOTO540 

590 A$(K)=X$+S$+A$(K):GOTO540 

600 X=LEN(A$(L)) :IFX<2THEN620ELSEFORI=XTO2STEP-1 

610 IFRIGHT$(A$(L) ,1) =S$THENA$(L) =LEFT$ (A$(L) ,1-1) :NEXTI 

620 NEXTL:FORL=FTOZ-l:K=L+l 

630 X=LEN(A$(L)):Y=LEN(A$(K)):X$="":IFX=0ORy=0GOTO750 

640 A=ASC(RIGHT$(A$(L) ,1) ) 

650 IFA=330RA=460RA=580RA=63THENA$(L)=A$(L)+" ":X=X+2 

660 FORI=lTOY:A$=MID$(A$(K) ,1,1) 

670 IFA$OS$THENX$=X$+A$:NEXTIELSEIFX$=""NEXTI 

680 IFLL-X<IGOTO710 

690 Y=Y-I:IFY<0THENY=0 

700 A$(L)=A$(L)+S$+X$:A$(K)=RIGHT$(A$(K) ,Y) :GOTO630 

710 X=LEN(A$(L)) :IFX<2THEN730ELSEFORI=XTO2STEP-1 

720 IFRIGHT$(A$(L) ,1) =S$THENA$(L) =LEFT$(A$(L) ,1-1) :NEXTI 

730 IFY<2THEN750ELSEFORI=YTO2STEP-1 

740 IFLEFT$(A$(K) ,1) =S$THENA$(K) =RIGHT$(A$(K) ,1-1) :NEXTI 

750 NEXTL:X=LEN(A$(Z)) :GOTO900 

760 INPUT"FIRST LINE TO DELETE";F: IFF<0THENF=0 ■ DELETE 

770 INPUT"LAST LINE TO DELETE"; Z: IFZ>LATHENZ=LA 

780 IFF>ZTHEN80ELSEFORI=FTOZ:A$(I)="":NEXTI:GOTO1830 

790 INPUT"EDIT LINE";L: IFL<0ORL>LAORA$(L) =""GOTO80 » EDIT 

800 C=4:P=1:X$(0)=A$(L) :N$="Y" 

810 CLS:I=L:GOSUB1910:N=1:Q$="" 

820 GOSUB910:IFA>47ANDA<58THENQ$=Q$+A$:N=VAL(Q$) :GOTO820 

830 M=0:IFA=8THENY=-1:GOSUB940ELSEIFA=9ORA=UTHENY=1:GOSUB940 

840 IFA=97THENA$(L)=X$(0) :GOTO800 ' A 

850 IFLEN(A$(L) ) >=LLGOTO870 

860 IFA=25GOSUB1200ELSEIFA=26GOSUB1180 

870 IFA>98ONA-98GOSUB960, 1000, 1960, 1960, 1960, 1020, 1030 

880 IFA=115GOSUB1120ELSEIFA=120GOSUB1170ELSEIFA=108GOTO800 

890 IFM=1THENN=1 :Q$="" :GOTO820ELSEIFRPRINT@320 , ; ELSE810 

900 IFLL<XPRINT"LINE" ;L; "HAS" ;X; "CHARACTERS" :GOTO60ELSE60 

910 X$=MID$(A$(L) ,P,1) 

920 PRINT@C,C$;:A$=INKEY$:PRINT@C,X$;:IFA$=""GOTO920 

930 GOSUB290:X=LEN(A$(L)) : IFA=130RA=96THENR=1:RETURNELSERETURN 

940 M=l:FORI=lTON:P=P+Y:IFP>XTHENP=X: RETURN 

950 IFP<1THENP=1 : RETURNELSEC=C+Y : NEXTI : RETURN 

960 Q=P:D=C:FORI=1TON:GOSUB910:IFRORA=27THENP=Q:C=D:RETURN ' C 

970 PRINT@C,A$;:GOSUB1100:P=P+lsGOSUB1110:A$(L)=L$+A$+R$ 

980 A=U:C=C+1:IFP<=XNEXTI 

990 P=Q:C=D: RETURN 

1000 IFP+N-1>XTHENN=X-P+1 • D 

1010 GOSUB1100:Q=P:P=P+N:GOSUB1110:A$(L)=L$+R$:P=Q:RETURN 

1020 GOSUB1100:A$(L)=L$+S$:PRINT§C,B$ » H 

1030 GOSUB910:IFRORA=27RETURN ' I 

1040 IFA=10THENA$(L)=A$(L)+CHR$(17) :R=1: RETURN 

1050 IFA=31THENA$(L)=A$(L)+CHR$(20) :R«li RETURN 

1060 PRINT§C,A$;:IFA=8THENY=-1:GOSUB940:GOTO1030 

1070 IFA=9THENY=1:GOSUB940:GOTO1030ELSEIFP>XTHENX=P 

1080 GOSUB1100:GOSUB1110:A$(L)=L$+A$+R$:PRINT@C,B$;A$+R$ 

1090 C=C+1:P=P+1:GOTO1030 

1100 L$="":IFP<2RETURNELSEL$=LEFT$(A$(L) ,P-1) tRETURN 

1110 R$="":IFP>XRETURNELSER$=RIGHT$(A$(L) ,X-P+1) :RETURN 

1120 GOSUB910:Q=P:D=C ' S 

1130 FORI=lTON : F=0 : FORJ=Q+lTOX : D=D+1 

1140 IFMID$(A$(L) ,J,1)=A$THENF=1:Q=J:J=X 

1150 NEXTJ: NEXTI :IFFTHENP=Q:C=D 

1160 A=U: RETURN 

1170 A$(L)=A$(L)+S$:P=X+1:C=P+3:GOTO1030 ' X 

1180 A$(L)=STRING$((LL-LEN(A$(L)))/2,32)+A$(L)+CHR$(20) ' S-D 

1190 PRINT@C,B$;A$(L) ;CHR$(93) ; tRETURN 

1200 A$(L)=STRING$(LL-LEN(A$(L) ) ,32)+A$(L) ' S-R 

1210 PRINT@C,B$;A$(L) ;:RETURN 

1220 CLS:PRINT"LINE LENGTH =" ;LL, :INPUT"NEW =";LL ' FORMAT 

1230 PRINTLINE SPACES =" ;S, : INPUT"NEW =";S 

1240 PRINT"LINE NOS. = ' ";N$; " ■ " , : INPUT"NEW (Y/N)";N$ 

1250 PRINT"FIRST LINE = " jFL, : INPUT"NEW =";FL 

1260 PRINT"LEFT MARGIN =" ;LM, : INPUT"NEW =";LM 



Listing 2 continues 



DC/CMD 

DISK CATALOGUE 



Finally, after more than nine 
months, of development, a 
universal diskette management 
system. A software package 
designed to keep track of all of 
your diskettes and programs. 



Contains... 

• Quick sort routine for sorting by 
program name, or program ex- 
tension, or disk number, or a 
combination of inter-woven sorts. 

• 255 Disk/510side storage capac- 
ity per data file. 

• Virtually unlimited printing and 
data access parameters. 

• Pays for itself the first week. 

(TRS MODELS I & III Only) 




P & P CORPORATION 

PO Box 362 • HADDONFIELD. N.J 08033 

^.^800-257-6170 

m New Jersey 609-428-3900 



Coordinated 
Business Software 

D.B. Software Co. announces a new 
line of coordinated business software 
designed for the Model III TRS-80. 
The BASE system consists of a Gen- 
eral Ledger System with Accounts 
Receivable and Accounts Payable. 
Other modules can be purchased 
and added as needed. 

BASE System (GL-AR-AP) $200.00 

Coordinated Modules: 

Payroll $ 75.00 

Order Entry $125.00 

Inventory $129.95 

Purchase Order Entry $1 25.00 
Inventory (special for 

Auto Parts Suppliers) $1 29.95 

Also available: 

Job Costing with GL and AP 

(Payroll optional) $500.00 

Mailing Lister $100.00 

Coming soon: 

Apartment Management System, 
Fixed Assets System, Manufacturing 
Inventory Management System 
Send S.A.S.E. for more information 
D.B. Software Co. 

1 1840 NE Brazee, Portland, OR 97220 

Phone (503) 255-7735 

DEALER INQUIRIES INVITED 



TRS-80 is a trademark of Tandy Corp. 
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First in 

Its Class 

and 

Looking 

for 

Work. 



TRS-80 Model I, II, III 

Five multiple regression procedures 
(including stepwise, backward elimination, all 
subset, and ridge), 24 transformations, com- 
prehensive data base manager (with search 
and sort), descriptive statistics, hypothesis 
testing (7 tests), time series analysis (7 
models), random variate generation, discrete 
probability distributions, sampling distribu- 
tions, nonparametrics (5 tests), and com- 
plete documentation. 

Complete package with manual — $125 

To order, send payment plus $2.00 shipping 
and handling to: 

Quant Systems 

P.O. Box 628 

Charleston, S.C. 29402 

803-571-2825 

S.C. residents add 4% sales tax 

Overseas orders add $7 for shipping 
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WILD 



TRSDOS Enhancement 
Use "wild - card" 
file names with your DOS com- 
mands (APPEND, COPY, DIR, KILL, 
LIST, etc.)* Select files based 
on character strings, position, 
type, ...» Non scrolling display 
• "All except" switch* (Yes, No, 
Quit, Go) processing controls* 
Example: Delete all files except 
those with a 2nd letter of "D", 
WILD KILL -iD*:l 

Model 3 disk $25 

CCCrpTC Sound & Graphics 
[.flLl/IO Effects Editor 
Add high speed graphics & sounds 
to BASIC programs* Create/Edit 
effects & save them in RAM or on 
disk* Screen portions saved and 
recalled to any location* 3 re- 
call modes (replace, add, and 
erase)* Text & special character 
support* Sounds generated with 
cassette port* User specified 
tones and durations* Screen for- 
matted input routines provided* 
Demo programs and a two player 
game included* 8K+ machine code 
editor with 2K run time module* 
32K and 48K version on same disk 

Manual $5, with Model 3 disk $39 

Send SASE for more information 
Else check or money order to: 

^350 

Ledford Computer Services 
23007 La Pierre Drive 
Mountlake Terrace, WA 98043 
"TRSDOS is a TANDY Corp. Trademark 



Listing 2 continued 

1270 PRINT"PAGE LENGTH =" jPL, :INPUT"NEW =";PL 
1280 PRINT"PAGE NOS. = ' " ;PN$; " ' " , :INPUT"NEW (Y/N)";PN$ 
1290 PRINT"FIRST PAGE = ";FP, : INPUT"NEW =";PP 
1300 PRINT"PAGE 1 NO. = ' " ;Pl$; " ' " , : INPUT"NEW (Y/N)";Pl$ 
1310 PRINT-HEADING = '";H$;"' ",:INPUT"NEW =";H$ 
1315 PRINT "SINGLE SHEET FEED = '";SS$;"' " , : INPUT"NEW=" ;SS$ 
1317 PRINT-PAGE SIZE = ";G;" ",:INPUT"NEW =";G:GOTO60 
1320 CLS: PRINT-LEGAL COMMANDS ARE:" ' HELP 

1330 PRINT-A ADD","B BLANK", "C COMPILE", "D DELETE", "E EDIT" 
,"F FORMAT", "H HELP"," I INSERT", "J JUSTIFY", "K KILL",". 
L LOAD","M MOVE","N NOTICE", "P PRINT", "R REPLACE", "S SAVE" 
,"V VIDEO", "X EXIT" 
1340 PRINT-KEY 'SHIFT-@* TWICE TO RETURN FROM A,E,I,R TO COMMAND 

MODE":GOTO60 
1350 INPUT-INSERT AT LINE";L: IFL<0ORL>LAGOTO80 ' INSERT 
1360 IFNL=LA+1PRINT"FILE FULL" :GOTO60ELSEIFRGOTO60 
1370 FORI=LATOLSTEP-l:A$(I+l)=A$(I) :NEXTI 
1380 A$(L)="":LA=LA+1:L=L-1:IFITRETURNELSEIT=1:GOTO90 
1390 CLS : PRINT" JUSTIFYING" :FORL=0TOLA:X=LEN(A$(L) ) 'JUSTIFY 
1400 IFX<2GOTO1500ELSEFORI=XTO2STEP-1:A=ASC(RIGHT$(A$(L) ,1)) 
1410 IFA=UTHENA$(L)=LEFT$(A$(L) ,1-1) :X=X-1:NEXTI 
1420 IFX>=LLORA=17ORA=20THEN1500ELSEJ=0:K=1:FORI=1TOX 
1430 IFMID$(A$(L) ,1 ,1) <>S$THENK=0ELSEIFK=0THENK=1:S( J) =1: J=J+1 
1440 NEXTI:IFJ=0GOTO1500 

1450 K=RND ( J) -1 : IFINT ( J/2) =J/20RJ=1THENN=1ELSEN=2 
1460 FORI=lTOLL-X:T(K)=T(K)+l:K=K+N:IFK>J-lTHENK=K-J 
1470 NEXTI: FORI =J-1TO0STEP-1:A$=STRING$(T( I) ,S$) :T(I)=0 
1480 A$(L)=LEFT$(A$(L) ,S(I) ) +A$+RIGHT$(A$ (L) ,LEN(A$(L) ) -S(I) ) 
1490 NEXTI 
1500 NEXTL:GOTO1830 

1510 CLS: INPUT "REALLY KILL (Y/N) " ; A$: IFA$="Y"THENRUNELSE60 'KILL 
1520 NA$="":IFMT$="Y"THENINPUT"IF ALL TEXT FILES READ, ENTER 'EN 
D', ELSE HIT ENTER" ;NA$ ' LOAD 
1525 IFLEFT$<NA$,3)="END"THENRETURNELSEGOSUB1820:CLS:PRINT"LOADI 

NG" 

1530 INPUT#-1,LA,LL,S,N$,FL,LM,PL,PN$,FP,P1$,H$,SS$,G 

1540 FORI=0TOLASTEP4 

1545 INPUT#-1,X$(0) ,X$(1) ,X$(2) ,X$(3) 

1550 FORJ=0TO3:L=I+J:X=LEN(X$(J)) :A$(L) ="" : IFX<1GOTO1570 

1560 FORK=lTOX:A$(L)=A$(L)+CHR$(ASC(MID$(X$(J) ,K,1))-128) :NEXTK 

1570 NEXT J : NEXTI : IFRTHENRETURNELSEGOT06 

1580 INPUT"FIRST LINE TO MOVE" ;F:IFF<0THENF=0 ' MOVE 

1590 INPUT-LAST LINE TO MOVE" ; Z : IFZ>LATHENZ=LA 

1600 IFF>ZTHEN80ELSEINPUT"FIRST NEW LINE" ;N:FORI=FTOZ 

1610 IFLEN(A$(N) ) PRINTLINE" ;N; "NOT EMPTY "; GOT06 

1620 A$(N)=A$(I) :A$(I)="":N=N+1:IFN>LATHENLA=N 

1630 NEXTI :GOT01 830 

1640 IFR=2THEN1647ELSEIFPEEK(14312)=>128THENINPUT"PRINTER NOT RE 

ADY. ABORT(Y/N) ";A$:IFA$="Y"THEN60ELSE1640 * PRINT 

1645 R=1:MT$="":INPUT"MULTIPLE TEXT FILES (Y/N) ";MT$:IFMT$<>"Y"AN 

DMT$<>"N"G0TO1645 

1647 EP=PL*(S+1) 

1650 GOSUB480:CLS:PRINT"PRINTING" 

1660 X=FP:TL=FL:IFRO2THENAP=0 

1670 IFAPO0GOTO1700 

1680 IFPN$O"Y"0R(Pl$="N"ANDX=l)THENLPRINT" "ELSELPRINTTAB(LM) H$ 

;STRING$(LL-LEN(H$)-7," ") ; "Page";USING"###";X 

1690 LPRINT" ":AP=AP+2 

1700 LPRINTTAB(LM) ; : IFN$="Y"THENLPRINTUSINGF$;TL; 

1705 LPRINTAS(TL) 

1710 IFSLPRINTSTRING$(S,138) 

1720 AP=AP+(S+1) :TL=TL+1 

1730 IFAP<=EPANDASC(RIGHT$(A$(TL-1) ,1) ) O17G0T01744 

1740 FORI=lTO(G-AP) iLPRINT" " :NEXT:X=X+1:AP=0 

1742 IFSS$="Y"THENINPUT"FEED NEXT SHEET, HIT ENTER" ;A$ 

1744 IFTL<=LAGOTO1670 

1746 IFMT$="Y"THENPR=X:GOSUB1520:X=PR:IFLEFT$(NA$,3)O"END"THENT 
L=FL:GOTO1670:ELSEMT$="N" 

1747 IFAPO0THEN1740 

1748 IFR=2THENRETURNELSER=0:GOTO60 

1750 INPUT"REPLACE LINE" ;L: IFL<0ORL>LAGOTO80 ' REPLACE 

1760 R=1:A$(L)="":L=L-1:GOTO90 

1770 GOSUB1'820:CLS:PRINT"SAVING" ' SAVE 

1780 PRINT#-1,LA,LL,S,N$,FL,LM,PL,PN$,FP,P1$,H$,SS$,G:FORL=0TOLA 

STEP 4 

1790 FORJ=0TO3:I=L+J:X=LEN(A$(I)) :X$(J) ="" :IFX<1GOTO1810 

1800 FORK=lTOX:X$(J)=X$(J)+CHR$(ASC(MID$(A$(I) ,K,1))+128) tNEXTK 

1810 NEXTJ:PRINT#-1,X$(0) ,X$(1) ,X$(2) ,X$(3) :NEXTL:GOTO60 

1820 INPUT"READY CASSETTE, THEN PRESS ENTER" ;A$: RETURN 

1830 CLS:X=FP-l:FORM=FLTOLASTEPPL:X=X+l ' VIDEO 

1840 IFP1$="N"ANDX=1GOTO1860 

1850 IFPN$="Y"PRINTH$;TAB(LL-7) "Page";USING"###" ;X:PRINT 

1860 FORI=MTOM+PL-1:IFI>LAGOTO1890 

1870 IFSPRINTSTRING$(S-1,10) 

1880 GOSUB1910 

1890 NEXTI :A$="":IFK=LAINPUT"PRESS ENTER" ;A$:IFA$<>""M=LA 

1900 NEXTM:L=LA:GOTO60 

Listing 2 continues 



214 • 80 Micro, January 1983 



Listing 2 continue? 

1910 Y=LEN(A$(I)) :IFYTHENA=ASC (RIGHTS (A$( I) ,1))ELSEA=0 

1920 IFN$="Y"PRINTUSINGF$;I> 

1930 PRINTA$(I) ;:IPA=17PRINTCHR$(92) ; 

1940 IFA=20PRINTCHR$ ( 93) ; ELSEIFA=UPRINTCHR$ ( 95) ; 

1950 IFN$<>"Y"ORYO60PRINT 

1960 RETURN 

1970 CLS: INPUT "REALLY EXIT (Y/N) ";A$:IFA$O"Y"GOTO60 ' EXIT 

1980 CLS:CLEAR50:OUT254 f 0:END 

2170 CLS:INPUT"ENTER FILE NAME ";NA$: RETURN 

2180 INPUT"READY CASSETTE, HIT ENTER" ;A$: RETURN 

2190 IFPEEK ( 14312) =>128THENINPUT"PRINTER NOT READY. ABORT(Y/N)"; 

A$:IFA$="Y"THEN60ELSE2190 ' NOTICE 

2195 GOSUB2170 :GOSUB2180 : INPUT#-1 ,T$ 

2196 IFT$=NA$THEN2200 

2197 PRINT'FOUND FILE: " ;T$:INPUT"CONTINUE SEARCH (Y/N) ";T$:IFT$ 
="N"THEN60 

2198 INPUT#-l,T$:IFT$O"E0F"THEN2198ELSE2196 
2200 PR=-1 

2210 PR=PR+1:INPUT#-1,T$ 

2220 IFT$="EOF"THEN2340 

2230 IFPRO0THEN2240ELSE2210 

2240 T1$=CHR$(126) :GOSUB2350 

2250 J=0 

2255 LPRINT" ":LPRINT" ":J=J+2 

2260 F0RI=1T05 

2270 IFLEFT$(B$(I) f 1) <>" "ANDLEFT$(B$(I) , 1) <>""THENLPRINTTAB(LM) 

B$(I) :J=J+(S+1) :IFSLPRINTSTRING$(S f 138) 

2300 NEXTI 

2310 J=J+(S+1) : LPRINT" " :IFSLPRINTSTRING$(S f 138) 

2320 J=J+(S+1) :LPRINTTAB(LM) "Dear ";B$(I) ; " : " :IFSLPRINTSTRING$(S 

,138) 

2325 J=J+(S+1) : LPRINT" " : IFSLPRINTSTRING$(S,138) 

2330 AP=J:R=2:GOSUB1640:GOTO2210 

2340 R=0:GOTO60 

2350 J=-l » UNPARSE LABELS 

2360 FORI=lTOLEN(T$)-LEN(Tl$)+l 

2370 IFT1$=MID$ (T$ , I , LEN (Tl $) ) THEN23 90 

2380 NEXTI: 1=0: RETURN 

2390 J=J+1:B$(J)=LEFT$(T$,I-1) :T$=MID$ (T$,I+1) :GOTO2360 



MODEL 3* 
CHARACTERS 

for Model 1* and LNW-80** 

Kit includes character genera- 
tor with Model 3 like char- 
acters and lower case letters 
with true descenders, software 
allows access to special char- 
acters in a manner identical 
to Model 3 from BASIC. 
Two alternate character sets 
that are software selectable in 
LNW and hardware selectable 
in MODEL 1. 



KT-1 for LNW-80 69.95 

KT-1 A for Model 1 69.95 

Assembled & tested add 15.00 

RS232 Board provides switches and 
Baud Rate Generator for LNW-80 

BD-3 12.95 

Complex Sound Generator Board for 

any 80 

BD-5 15.95 



THE MAINE SOFTWARE LIBRARY 

P.O. BOX 197 

STANDISH, ME 04084 „196 



'Model I and Model 3 are products of Radio Shack 
"'LNW-80 is a product of LNW Research 




• See List ol Advertisers on Page 435 
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GAME 



LOAD 80 



Breaking through brick by brick. 



Outbreak 



Tom Hanson 

2120 Birchmont Drive 

Bern id ji, MN 56601 

One of my favorite arcade 
games is Breakout. I could 
spend hours playing the game if 
I had enough money. When I got 
my micro last fall, the first thing I 
did was write my own version of 
the game. I call mine Outbreak. 
The rules of play are similar to 
the arcade game. In Outbreak, 
the paddle moves vertically on 
the left side of the screen and is 
controlled by the up and down 
arrows. The object is to knock 
out the blocks at the right side 
of the screen by hitting a ball 
with the paddle. 

The Program 

Although the program is writ- 
ten in Basic, the action is fairly 
quick. The highlight of the 
game's programming is the 
bouncing ball routine. A random 
starting point for the ball is de- 
termined in line 120. Ball speed 



The Key Box 

Basic Level II 
Model I or III 
16K RAM 
Optional amplifier 



and random direction are estab- 
lished in line 140. A loop to 
follow the ball's progress begins 
at line 170. Lines 190 and 200 
check to keep the ball in 



bounds. If the ball hits the wall it 
bounces off in an opposite di- 
rection angle and continues on 
toward the blocks. 

Line 220 checks to see if a 



block has been hit. If one has it 
executes a subroutine at line 
460. After hitting the blocks the 
ball is bounced back toward the 
paddle. If the ball is success- 



180 DEFINT A-Y:CLS:GOSUB550 

110 CLS:AS-CHRS(191) :BS»CHR$(128) 

120 X=RND(15)+10:Y«RND(10)+10:G-323:Z=G:M=1:N>=1 

130 L-15427:PO-0 

140 A-RND ( 5) -3 : B»RND ( 5) -3 : IFA-0ORB=0THEN140 

150 GOSUB410 

160 GOS=9:GOSUB500:GOS=0 

170 X-X+A:Y-Y+B 

180 GOSUB 280 

190 IF Y<3 OR Y>44 THEN B=-B:GOTO170 

200 IF X>126 THEN A=-A:GOTO 170 

210 IF X<0THEN A=-A:GOTO170 

220 IF X>15 AND POINT (X,Y)»- 1THEN 460 

230 IF X<10 AND POINT (X,Y) =-lTHENA=-A:GOTO170 

240 IF X<3 AND POINT (X,Y)<>-1THEN 350 

250 RESET(M,N) :SET(X,Y) :H-X:N»Y 

260 GOTO170 

280 R=PEEK(14420) 

290 IFR=0RETURN 

300 G=L 

310 IF R»8 THEN L=L-64:IF L<15427 L=L+64:JK=1 

320 IF R-16 L-L+64:IF L>16319 L=L-64:JK=1 

330 POKE L,191:IF JK=1THEN JK=0:RETURN 

340 POKEG,32:RETURN 

350 PO-PO+l:IF PO>5 THEN 400 

360 X=RND(10)+25:Y=RND(10)+25 

370 FOR YO=1TO1000:NEXT 

380 PRINT@251,PO+l; 

390 A»RND(2)-3:B»RND(2)-3:IFA=0ORB=0THEN390ELSE 170 

400 PRINT:PRINT" OUT OF BALLS ":END 

410 FOR 0=1 TO 14: FOR T=30 TO 50 STEP 2 

420 POKE (0*64+T) +15360, 191 :NEXT T,0 

430 FOR R=1T0127:SET(R,45) :SET(R,2) :NEXT 

440 FOR F=2 TO 45:SET(127 ,F) :NEXT 

450 RETURN 

460 A— A 

470 P=INT(X/2)+INT(Y/3)*64 

480 PRINT§P,B$> 

490 LO-LO+l 

495 IF LO=154 THENCLS: PRINT" YOU HAVE SUCCESIVLY CLEARED THE BOARD" : PRINT "C 

ONGRADULATIONS l":END 

500 PRINT@48, "BLOCKS OUT"; 

510 PRINT@187,"BALL#"; 

520 PRINT@251,PO+lj 

530 PRINT@119,LO; 

540 IF GOS-9THEN RETURN ELSE 170 

550 PRINTCHR$(23) 

560 PRINT" BREAKOUT BY TOM HANSON" 

570 FORZX-1 TO 1000: NEXT: RETURN 

580 REM TON HANSON 

590 REM 2120 BIRCHMONT DR. 

600 REM BEMIDJI MN, 56601 



Program Listing 1 
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fully hit by the paddle, line 230 
reverses the ball's direction 
back toward the blocks. If you 
miss the ball, line 250 serves a 
new one. 

The status of the paddles is 
checked by lines 280-340. Lines 
350-400 count how many balls 
you have been served and loop 
back if you have more serves 
left. The playing field is drawn at 



lines 410-450, the score is kept 
by lines 460-540 and lines 540- 
570 display the title. 

To add sound to the game 
type in the lines in Program 
Listing 2. ■ 

Tom Hanson is an 11th 
grade student who enjoys com- 
puter programming, skiing and 
biking. 



105 


GOSUB 700 


190 


IF Y<3 OR Y>44 THEN 




B = - B:JJ = USR(12):GOTO 170 


200 


IFX>126THEN 




A= - A:JJ = USR(12): 




GOTO 170 


210 


IF X<0 THEN 




A= -A:JJ=USR(12): 




GOTO 170 


230 


IFX<10ANDPOINT(X.Y)= -1 




THEN A = -A: 




JJ = USR(12):GOTO 170 


480 


PRINT @P, B$;:JJ= USR(12) 


700 


Z1 = 127:POKE 16526,235: POKE 




1652721 Z = 256*Z1 + 235 


710 


READ B:IF B>0 POKE Z.B:Z = Z+ 1: 




GOTO 710 


720 


DATA 205,127,10,62.5,21 1,255,69,16, 




254,62,4.211,255,69,16.254,37,20 




239,201,-1 


730 


RETURN 


Program Listing 2. Sound Modification 
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AT NEW PROGRAMS FROM 

ngle SOURCE Solution- 



— — — — — — RIMS — Rental Inventory Management System 1795.00 

RIMS, a Rental Inventory Management System, is a fully automated system de- 
signed to meet the needs of the typical Time Rental Business. RIMS will save the 
average business ovei $4,000 per year RIMS tracks each item in your lime rental 
inventory, as well as maintaining performance and income records. RIMS can be 
used to operate the computer as a cash register RIMS has extensive error checking 
capabilities RIMS automatically calculates deposits, timeout, pnnts rental receipt 
on rental and return, allows instant inquiry into current status of an item, reports 
daily, monthly, yearly income, expenses, cashflow, produces statements for cust- 
omers with term rentals, produces inventory labels and rolidex cards, uses a warn- 
ing horn to alert you to potential problems and much more Model III. 

■ FPSSTM FINANCIAL PACKAGE FOR SERVICE STATION ONLY S 349. 50 
FPSSTM is a complete financial and bookkeeping package for Retail Petroleum 
Service Stations. FPSS is written in Microsoft Baalc' for the TRS-80 Model III. 
FPSSTM, which includes a 90 page detailed User's Manual, offers specialized ac- 
counting modules lailormade for the retail petroleum industry FPSSTM | S menu 
driven, keeps track of each sale, purchase, charge and collection of a service stat- 
ion, with daily, weekly, monthly oi annual reports at the user's command. Inven- 
tory control is especially detailed, allowing for determining gasoline leakage. Com- 
missions to employees can be tracked . will) two commission rates setup. 

- FORMGEN™ 2.7 ONLY $249.95 



FonrjgenTM 2.7 is a sophisticated screen and form generator which in three sep- 
arately callable modules gives users the ability to create their own forms or set up easy 
menu driven inputs for standardized forms. Complicated calculations may be in- 
cluded as part of the form output, based on the input data. Screen layout, variable 
array lengths, field sizes, prompt messages, form printing positions and variables 
used may all be modified without breaking the program Users save lime and very 
little memory is used because most things are done as part of subroutines Form- 
genTM 2.7 has been used In over 100 Bela test sites in very powerful applications 
with impressive results 

CCMS ESTIMATING SYSTEM S499.95 



The CCMS Estimating System is a comprehensive construction cost estimat- 
ing system written by a contractor/progiammer for contractors CCMS "talks" the 
contractor's language with several menu driven files The key is the systems cost 
code, which references the unit pnees established earlier and organizes the estimate 
into divisions modeled aftet the uniform system adopted by the A1A. AGCA and 
CSII. Models I and II and Compiler Basic 

•TRSFLOWTM \.\ ONLY $149.50 



Looking for a Spelling Checker? 
Get more than just a spelling checker — get 

HeXSPOLL z 

the EVERYTHING checker 



ftf«: a' Lt«M V»D tftl KTUtt HORO IS) SKIF- WOK) 

10$ i„ ehuKtj niv&*t 



IMs is ar. e: a"ple of a U*~l rei«9 checked to 
HExSiEll. the te.-l scrolls •.* trie screer. is it is checked, 
iter, p, errcr is ij?tecle<5, •£>.• have three choices. 

li ftfiatt the incorrect word. Ihe replacenerit uord 
:? InSIawTlt K-CKO'EO for correctness, ther. inserted in the 
te t. 

2> the word is correct, leave it as it is. 

31 Tell rttSftll to \XU3l this mri for fotvre 
-efererce, with jWt or* »pjslrc*e. 

He^srell rewires j-.-sl or* step to cheer 3rd 
correct a te t, i"i learr, r«w m0"1s. tow dOCvMAt is ready to 
pr:r. t as soor. as te:si>ell is fir.ishe'l. ft noM that is ir, error 
e.l.|rissl*e|.is hiqhliijhteC ir, the te.;l for easy Correction, 



Hexagon Systems is proud lo announce another first In text checking - an everylhing 
checker. Hexspell 2 checks not only dictionary words, bul learns and checks codes, for- 
mulae and numbers which are so essential in many commercial and technical documents 
With Hexspell 2 you delme what characters make up a word, then leach Hexspell the new 
"words'' n needs to check your text. This advanced system builds on Ihe unique features ol 
Ihe original Hexspell (the lirsl TRS-80 spelling checker) Hexspell 2 leatures a one-step in- 
teractive process, a word list thai adapts itself to your word usage, a 25.000 word initial 
word list and more than three years ol research and experience 

Hextpell 2 upgrade for registered owners of Hexspell Vers. 1 — 

S35 Irom Hexagon Systems or your nearest dealer. 

Hexspell requires a TRS-80 Mod i or Mod in with 2 drives and 48K US $99 



L__ 



HeXAGON 



P.O. Box 397, Station A 
Vancouver, B.C. Canada V6C 2N2 
Telephone (604) 682-7646 
Mlcronet 70235,1376 

^46 



TRSFlow"" 1.1 is a hydraulic model based upon ihe popular Hardy-Cross 
method of pipe network analysis. By telling the program certain system parameters 
such as the length, diameter and type of pipes. TRSFIowTM calculates head values 
up lo 150 pope junctions and the Hows through 150 system elements. Within the 
150 system elements, TRSFIowTM can handle 10 pumps and 10 fixed head condi- 
tions. TRSFIowTM allows the system designated to accurately determine pump and 
pipe sizes in any desired network TRSFIowTM. works with level II Baalc on 
TRSDOS. 

• BUSINESS MULTI-PACK *99.95 



' 



8 



BUSINESS MULTI-PACK blends four important business functions: sales fore- 
casting (arithmetic avg. regression analysis, expotential smoothing, futures 
analysis), determines the economic order quantity. UFO or FIFO inventory 
analysis, and a cache of general business untitles. These utilities include Pricing Mer- 
chandise to achieve a desired profit margain. a perpetual calendar, future value of a 
present sum. picsenl value of a future sum. an amortization schedule Model III. 
48Kbytcs . one disk . TM 

«rr PERSONAL ACCOUNTER ' M 2.4 ONLY »59.95 

Personal Accounter 2.4 is an easy lo use program for keeping track of one 
oi mine separate accounts and enables the user lo sec the current balance, search 
for check entries by specific dates, months or year, call up total monthly expendi- 
tures, or check when a certain account was paid A printed copy of all checking ac- 
count reports may be ordered Personal AccounterTM 2.4 is very easy to use 
and comes with a reference manual 

— . BISPLAN $69.96 

BISPIanTM i S a program for making business plans and projections With 
BISPIanTM you are led through screen prompts lo enter data concerning your 
business plans You can enter estimates of a business proposal that you are consid- 
enng and produce projections of potential earnings BISPIanTM will help you 
assess financing requirements, loan payoff rates, length of lime before return on in- 
vestment, and profit potential Estimates can be projected up lo five years, and 
dumped from screen to line printer BISPIanTM is menu driven and includes a 
manual Available In 16K lot the Model I with a more extensive version in Models II 
and III 

DISMON - An Interactive Dlaaeaembler $49.95 



! 



Now you can control the entire disassembling process through DISMON. an in- 
teractive disassembler. Code resides in middle memory and can be used to disas- 
semble programs in either high or low memory Models I or III. 16Kbytes with 
cassette. 48 Kbytes with disk 

• 458 



Dear Single SOURCE Solution ■ 

Please enter my order tot the following programs ai your special lOVo discount rate ._ ,. 



through 1982 

Circle program(s) ordered: 

NAME 



ADDRESS 

CITY 

PHONE (. 



8 9 



STATE 



.ZIP. 



I 

L 



Make check or money order payable to Single SOURCE Solution 

(California residents add 6%) Postage and Handling add $2 00. C D add Si 50 

TOTAL AMOUNT ENCLOSED S 



Satisfaction Guaranteed or Your Money Back in 10 Days • Dealer Inquiries Invited 
Mail today to: Single SOURCE Solution 

2699 Clayton Rd . Concord. CA 94519 or call (4 15) 6800202 



• See List ol Advertisers on Page 435 
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ANNOUNCING THE NEW 

ACCESS UNLIMITED 








FREE! DOSPLUS 3.4** 
"'' operating system 
y Percom or 
Unlimited Drive 
irthe Model III* 



SAVE $50.00 on fully-tested PERCOM Disk 

Drive for Model III* 

Reg. $499.00. Now $449.00 

Percom's internal ly-mounted drives, with their widely-acclaimed disk 
controllers, are completely pre-tested with a 48 hour Burn-in. So, you know 
it works right when you get it. Choose single or double-density storage 
capacity. 

A First-Drive System includes the four-drive disk controller, your choice 
of one or two drives, power supplies, cables and a fully-illustrated, easy-to- 
understand owner's manual. 

OVER $500,000 IN NEW COMPUTERS, 
PERIPHERALS AND SUPPLIES. NEW 
PRINTERS "CENTRONICS"— "CITOH"— 
"OKIDATA"— "STAR"— "TALLY". 
VALUES TO $3500.00, NOW $325.00 to 
$1695.00. Call for latest price. 

Make sure it's done right. Let us install 
your First-Drive System. 

Purchase your Model III* Drives from us and for $39.95 plus shipping, you 
can have our experienced professionals perform a 48-hour bum-in of your 
Model III* computer, install the drive system, and check out your expanded 
system to make sure everything works correctly. Call for pricing of complete 
Model III* system with 2 to 4 Access Unlimited or Percom drives. 

Get the best! Our own fully-tested drives* 
for as low as $275.00 *»«*« 

Every Access Unlimited Floppy and Flippy Disk Drive is electrically and 
mechanically tested, then burned-in for 48 hours under operating conditions. 
The signed test list in your shipping carton is proof of that. 

Our floppy disk drives offer you either single or double density. With 
double-density, it stores up to 364 Kbytes, depending on the format. And you 
can use both sides of the diskette on our flippy drives. 

SATISFACTION GUARANTEED! If you're not completely 
satisfied with your Disk Drive, return it within 15 days for a 
full refund. All our drives have a comprehensive 90-day 
limited warranty. 



We have just added approximately $100,000.00 
worth of brand new business and game software. 

Call or write for our new FREE catalog. 
Save $$ on our most popular items! 

Percom Data Separator (reg. $29.95) now $23.95 
Screens for Models I", ir.lll Green, Lt. Blue, Dark blue, 

and Amber. Bronze for color video (reg. $24.95) now S13.95 

Head Cleaning Kit (reg. $29.95) " now $19.95 

Drive Numbering Tabs, pkg. 0-3 (reg. $4.50) now $3.95 

Flip-N-File 5'/." (reg. $39.95) now $18.95 

Flip-N-File 8" (reg. $54.95) now $23.95 

AFD 100-40-track single-density drives $275.00 
^W Soft Sector Diskettes W/Hub Ring 

'BASF 5 1 /4" Lifetime Warranty Reg. $44.95 



ATHANA 1 yr Warranty 



X.WJ SSDD Box of 10 
$19.90 SSSD Box Of 10 



Anti-Glare Masks— Now $12.95 
8" Diskettes from $22.75 
Other Diskettes at Equal Savings 

Flip 'N File Boxes— Holds 50 Diskettes 
5'/." Reg. $34.95 Sale: $19.95 8" Reg. $49.95 Sale: $29.95 

LIBRARY CASES -Holds 10 Diskettes saie$2.95 ea. 

Bare Drives for "IBM PC"— Internal or 
External — $269.95 ea. 

Percom TFD 100 Mod. 1 Drive 
Reg. $439.00 Ea. Now $278.00 ea. 
OR Two for $540.00. Only 100 left. 

DOS + 3.4 Reg. $159.00. SALE. 

FREE DOS + 3.4 with any Percom or AU 

Drive for the Mod. I* or III-* 

Model III* Drive Reg. $499 Now $449. 

Add Ons $344 Single and $628 Double 

Anti -Static MatS —Colors: Russett, Blue & Gold, Natural 
Brown, & Golden Brown. 

3' x 5'— Reg. $75.60 Sale: $57.00 

4' x 6'— Reg. $120.90 Sale: $91.00 

4' x 8' — Reg. $161 .30 Sale: $122.00 

Typing Easles— $14.95 

• LIMITED TIME OFFER/LIMITED QUANTITIES • 

Prices subject to change without notice. 



MICRO SHOPPING CENTER 



&??<* 




SAVE $$ 3 WAYS! 
now $184.95! 



Upgrade your 
Model I* to 
Double Density 

Percom's proven Doubler II with 
DOSPLUS 3.4**— a $309.95 value, 
now $155.00! 

The completely assembled and fully-tested Percom DOUBLER II'" is ready to 
go to work when you get it. All you have to do is plug it in. It can store over 4 
times more on one side of a diskette than a standard Tandy Model 1* drive. It 
reads, writes, and formats either single or double-density. Comes with a 
DOSPLUS 3.4** disk-operation system. Runs TRSDOS", NEWDOS**, 
Percom OS-80"\ and other single-density software. (You can change to 
double-density at any time.) Uses Move 1-2-3 utility ($29.95) or other 
appropriate software to read Model III* programs on your Model I*. Has 
on-card high performance data separation and write precompensation 

ClrCUi,ry Doubler II- $159.95 

■ DOSPLUS 3.4D" 150.00 



Total Value 
Now only 
You SAVE 




$309.95 
$155.00 
$154.95 

From $1,995(5MB) 

TRS-80,"IBM-PC", 
ATARI 
Check out the benefits 
of Access Unlimited Hard Disk Drives 

y — can be used for Model II* Model III* computers. 
W5, 10 Megabyte and larger drive units, 
^-lets controller handle up to 4 drives. 
Vworks along with existing floppy disk drives. 
1 'includes host system support software. 
K15-day FREE trial period. 

SAVE on an Arrick Quick Switch]: 

Changes a TRS-80* printer port or a peripheral between computers 
instantly and easily. Available for RS-232 and Centronics. Plugs included. 

Now from $99.95. Cables from $31.95. 
LAST MINUTE CLOSE-OUT 

TFD 100 40 track floppy disk drives-only 200 left reg. 439.00-now 
278.90 or 2 for $540.00. 

"PAGEMATE"— $15.95 

" "Reg. Trademarks 

The above prices do not include state taxes. 



Enjoy 1-stop shopping and BIG savings 

Order your disks, software, supplies, and accessories from Access Unlimited. 
We offer low prices on automatic Datamarc"* Sheet and Envelope Feeders 
lor Radio Shack'. QUME, Ricoh. Diablo Daisywheel. and Dot Matrix Printers. 
And the more you buy at one time, the more you can save. 

For more information, call (214) 340-5366 Monday through Friday: (214) 
690-0207 after 5 p.m. and Saturdays. 

To order or for FREE literature, call TOLL-FREE 



1-800-527-3475M 



Ordering Information 

Order by phone or by mail. We accept Visa, MasterCard, cashier's checks, 
certified checks, and money orders. With personal checks, allow additional 
time for bank clearance. Your bankcard will not be charged until your order is 
shipped. On orders over $1,000. we pay freight (surface only) and insurance: 
please add $3.00 shipping and handling under 50 lbs. Over 50 lbs., add 
$5.00 for orders under $1,000.00. Texas residents add 5% sales tax. Allow 2 
to 4 weeks for delivery. 

EXPLANATION 



Tradamark of Tandy Radb Snack Corp 
riF <;v "nm s 1 1 Trademark ol Apparai Cofpwaioi 
5 ULi TM Trademark o! Access Unwed 



• * Trademark ol Mem-Systems Software. Ire 
t Trademafk ol Ajrtck Products Company 
•••Trademark of Datamarc, Inc 



T Trademark ol Percom Data Company. Inc x Trademark ol Dgria! Research 

□ Please send me a FREE catalog. I'm not ready to order at this time. 

□ YES, I'm taking advantage of your Sales prices. 

Name 

Company Name 

Address 

City 



State. 



.Zip 



Phone Number ! 
Quantity 



Item 



Unit Price 



Subtotal 



Subtotal 

State Sales Tax (Texas residents only) 

handling charge 

Check one: Total 

D payment enclosed □ Visa □ MasterCard* 



"If MasterCard, numbers above name: 
Expiration Date: I I I ~~ I I 



Authorized signature, if charged 




DEPT. B/401 N. Central Expwy. #600/Richardson, Texas 75080 

Tel. 1-800/527-3475 214/340-5366 

214/690-0207— Sat. and Evenings Only 
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LOW PRICES 

JORDAN COMPUTERS 



Okidata 


SPEED/cps 


PARALLEL 


SERIAL 


PRICE 


82A 


120 


STD. 


STD. 


$494.00 


83A 


120 


STD. 


STD. 


$765.00 


84 


200 


$1 169.00 


$1295.00 


- 


2350 


350 


S2405.00 


$2765.00 


— 



NEC Spinwriters 










3510-1 RO 


33 


— 


STD. 


$2195.00 


3515-1 RO 


33 


— 


STD. 


$2195.00 


3530-1 RO 


33 


STD. 


— 


$2195.00 



SPECIALS OF THE MONTH 

▲ Okidata 82 a $474.00 9.5" width 

▲ EpSOn MX-80 F/T $525.00 9.5" Width 
A EpSOn MX-100 $699.00 15" Width 

▲ NEC PC-8023 $538.00 9.5" width 



NEC 




7710-1 RO 


55 


7715-1 RO 


55 


7720-1 KSR 


55 


7725-1 KSR 


55 


7730-1 RO 


55 



STD. 
STD. 
STD. 
STD. 



STD. 



$2625.00 
$2675.00 
$3050.00 
$3125.00 
$2625.00 



Mannesmann/Tally 








MT-1605 200 


— 


STD. 


$1549.00 


MT-1602 200 


STD. 


— 


$1549.00 


MT-1805 200/50 


— 


STD. 


$1820.00 


MT-1802 200/50 


STD. 


— 


$1820.00 



Manufacturer's warranty included on all equipment. 

Free use of Master Card, VISA and American Express. 
Cashier's checks, certified check, money order or C.O.D.'s 
accepted. California residents add 6% sales tax. 
Please allow 2 weeks clearance for personal checks. 

Call Toll Free (outside California): 800-772-9091 
California, Alaska, Hawaii: 714-974-8310 

Hours: 8:30 am — 5:00 pm Monday-Friday (PST) 

10:00 am — 5:00 pm Saturday & Sunday (PST) 

Prices subject to change without notice. 

Jordan Computers, Ltd. 

PRINTER DIVISION 



202 W. LINCOLN, SUITE E • ORANGE, CA 92665 
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HOME/HOBBY 



LOAD 80 



Use your micro to wave the checkered flag. 



Judge 80 



Stuart A. Cole 

Rt. 5 #7 Five Oaks Drive 

Gulf port, MS 39503 



Every Cub Scout considers the Pine- 
wood Derby as exciting as the Super- 
bowl or World Series. Small cars carved 
from blocks of pine race on the table top 
track for the prize. 

On the night of my son Jim's first Pine- 
wood Derby, I crossed both fingers and 
prayed he would win. 

Boy— was I ever disappointed! Jim didn't 
even make the finals. The judges on two 
separate heats had misjudged his car. I re- 
alized what a difficult task the judges had. It 
was next to impossible to distinguish 
among the cars. Consider trying to deter- 
mine the position of four cars all crossing 
the finish line a split second apart. 

I knew my TRS-80 could do the job better. 



For the next several weeks I set about 
designing an interface circuit. Here are the 
results of my effort. 

Interface Circuit 

The interface circuit connects directly to 
the expansion edge connector on the key- 
board or to the screen printer port on the ex- 
pansion interface. (Do not use the RS-232C 
port on the expansion interface, as it is 
keyed differently.) 

Photo 1 shows the interface unit itself. 
The cabinet is an experimenter's box (Radio 
Shack #220-224). The schematic diagram is 
shown in Fig. 1 . Figure 2 is the schematic of 
the power supply. 

Under static conditions the ambient light 
striking the photo resistors (PR-1 through 
PR-4) reduces their resistance to about 100 
ohms. This causes one leg of each AND 
gate (IC-3) to go low. Address lines A1-A4 
hold the other leg of each gate high. 

The low on each photo resistor is applied 
to the input of IC1 and IC2. When the TRS-80 
inputs data from the data bus these lows 



are applied to data lines D1-D4. Data lines 
DO and D5-D7 are not used. Therefore, they 
are held low by permanent grounds on the 
inputs to IC1 and IC2. The low signals on 
the data lines represent static conditions 
(decimal 0). 

Let's assume a car crosses over the 
photo resistor in lane 1. The car prevents 
light from striking the photo resistor, caus- 
ing the resistance of the photo resistor to 
increase immediately to several thousand 
ohms. This increase in resistance replaces 
the low signal on IC1 pin 1 with a high sig- 
nal. Pin 2 is already high, so the high on pin 
1 is passed by IC3 to IC1 pin 14. 

When the program directs the TRS-80 to 



The Key Box 

Model I 
16K, 32K RAM 
Cassette or Disk Basic 
Electronic components 




Photo 1. Closeup of interface board. Wiring is not critical. 



Photo 2. Bottom of the race track showing wiring of the photo 
resistors. J2 is mounted on the side of the track. 

80 Micro, January 1983 • 221 



input data from the expansion port the (IN) 
signal line (pin 19 of the edge connector) 
goes low enabling IC1 and IC2 (74LS367s). 
IC1 applies the high from pin 14 to the 
TRS-80 data bus line D1. 

Construction 

Photo 1 shows the circuit board and 
power-supply components. Photo 2 shows 
the photo resistor installation in the end of 
the track. (I used Radio Shack #276-116 
resistors.) 

One word of caution here: The resistors 
come in two case styles. The black plastic 
case makes installation easier— just drill a 
hole in the center of each lane of the track 
and glue the resistors in with epoxy or white 
glue. The other case style is metal with a lip 
around the lower rim. This lip must be 
ground off so the resistor will fit snug in the 
hole. You must be extremely careful when 
grinding or the resistor will be damaged. J1 
and J2 (Fig. 1) are Radio Shack DIN connec- 
tors (#274-005). P1 and P2 are the matching 
plugs (#274-003). 

Software 

The Basic program is shown in the Listing. 
Line 260 checks to see if the interface 
power is turned on. Lines 270 and 280 allow 
four inputs, one for each lane of the track. 

Lines 290-370, the heart of the program, 
determine the position in which each car 
finishes. For example, line 290 looks at port 
1 for input, and assigns any non-zero value 
to variable E1. (An input of zero represents 
static conditions; therefore, the TRS-80 
continues to look at port 1 until it sees a 
non-zero value.) 

Line 300 prints a non-zero value on the 
screen. (Printing the value of E1 normally 
has no use since during a race the values of 
all four tracks are printed and erased by the 
print routine of line 410 before you can read 
them. I put this feature into the program to 
be sure I wired the cable between the inter- 
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OPTION 
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HANDLES CALLS, PUTS, SPREADS, IN 
AND OUT; COMMISSIONS, RISK, COST 
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face and track correctly.) 

Line 310 checks to be sure the interface 
power is on. 

Once a car has been detected, line 320 
looks to the expansion port for an input, 
but instead of looking at port 1 it looks at 
a port whose value is determined by the 
value of E1. 

Let's continue with our assumption that 
a car had crossed in lane 1. Data line D1 is 
high as a result of the increase in the re- 
sistance of the photo resistor (PR1). A 
high on data line D2 represents a decimal 
value of two to the TRS-80; therefore, if E1 
equals two line 310 looks at port 2 for its 
input. As a result, address line A1 goes 
high to address port 2. 



Address/Data line 


Decimal value 


A7/D7 


128 


A6/D6 


64 


A5/D5 


32 


A4/D4 


16 


A3/D3 


8 


A2/D2 


4 


A1/D1 


2 


A0/D0 


1 


Table 1. Decimal 


values seen by the 


computer can be determined by add- 


ing the decimal values of any lines with 


highs on them. 





When A1 goes high the high is applied to 
the input of an inverter (IC4). The low from 
the inverter is applied to one leg of IC3, 
blocking any further input from lane 1. 

The purpose is to prevent the computer 
from printing erroneous race results. For 
example, suppose the car in lane 1 leads a 
car in lane 3 by only a quarter of an inch. If 
the input is not turned off as soon as the 
computer detects it, the computer would 
see both cars at the same time. By remov- 
ing the input from lane 1 as soon as the 
computer sees car 1, the computer only 
sees car 3 when it crosses. 

When car 3 crosses, the signal flow 
from the photo resistor is the same as 
previously discussed for lane 1 except 
data line D3 is now high. A high on D3 
represents decimal eight, so variable E2 is 
assigned the value eight. 

Table 1 shows how to calculate the deci- 
mal value from a high on an address or data 
line. Line 330 prints the eight on the screen, 
adds E1 to E2 (two plus eight), and assigns 
the total (10) to E5. Line 330 also checks to 
see if all four lanes have been blocked (all 
cars in). If so, control jumps to line 410, the 
print routine. 

Line 340 looks at the expansion port 
again, using the value of E5 (decimal 10) to 
determine the port number. Referring to Ta- 
ble 1 we can see that address lines A1 and 
A3 must be high to enable port 10. As be- 
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Fig. 1. Schematic Diagram of Interface Unit 
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Fig. 2. Schematic Diagram of Power Supply 
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fore, these lines are inverted by IC4 block- 
ing any further input from lanes 1 and 3. 

Let's now assume that the last two cars 
tie for third. A high on lanes 2 and 4 sends 
data lines D2 and D4 high. The TRS-80 sees 
a decimal 20 (4 plus 16), and assigns this 
value to E3. Line 350 prints the value (20) on 
the screen and assigns E6 the total value of 
E3 plus E5 (10 plus 20). Since 30 represents 
all cars, control jumps to the video print rou- 
tine starting in line 410. 

The video print routine is contained in 



lines 410-880, and the line-printer routine in 
lines 950-1390. 

Lines 1400-1460 draw a line of equal 
signs after each fourth heat to separate the 
races. Each car runs in a different lane in 
each heat, giving each car an equal oppor- 
tunity. 

Conclusion 

My TRS-80 has performed perfectly in 
two races. It is accurate in even the clos- 
est finish! ■ 



Program Listing 



10 CLEAR100 
20 B$=" 

30 CLS:POKE16553,255:FORI=0TO63:POKEl5360+I,191:POKE16320+I,191: 

NEXTI 

40 FORI=0TO15:POKE(15360+I*64) ,191:POKE(15423+I*64) . 191 i NEXTI 
50 GOSUB180:GOSUB140:GOSUB100 



1979"; 
U A R T 



A. 



COLE 



B Y 



PRINT@856 , "FEBURARY 
70 PRINT@207, "B Y ST 
80 GOSUB170:GOSUB170 
90 CLS:GOTO220 
100 READA$:PRINT@401,A$ 
110 READA$:PRINT@535,A$ 
120 READA$:PRINT@728,A$ 
130 RETURN 
140 PRINT@386,B$; 
150 PRINT@514,B$; 
160 RETURN 

170 FORI=1TO1000: NEXTI: RETURN 
180 FORI=1TO250: NEXTI: RETURN 
190 DATA"P INEWOOD DER 
200 DATA"J U D G E 8 0" 
210 DATA"16K LEVEL II" 
220 CLS:H=1 

230 INPUT"ENTER TODAYS DATE (FEB/26/1 97 9 )" ;D$ 
240 CLS:N=1 

250 PRINT"HEAT # n ;H:PRINT 

260 E=INP(0):IF E=255 THEN PRINT"TURN INTERFACE POWER ON" 
270 PRINT H ENTER CAR# FOR LANE" ;N; : INPUTA(N) 
280 N=N+1:IFN<5THEN270 
290 E1=INP(1):IF E1=0 THEN 290 
300 PRINT E1:IF El=30 THEN410 
310 IF El=255 THEN 380 
320 E2=INP(E1) :IF E2=0 THEN 320 
330 PRINT E2:E5=E1+E2:IFE5=30THEN410 
340 E3=INP(E5) :IFE3=0THEN340 
350 PRINTE3 : E6=E5+E3 : IFE6=30THEN410 
360 E4=INP(E6) :IF E4=0 THEN 360 
370 PRINT E4:GOTO410 

380 CLS:FOR IE=lTO 10:PRINT@460, "T URN INTERFACE P 
W E R ON !":FOR K=1TO100:NEXT K 

390 PRINT@460," ". 

FOR K=l TO 100:NEXTK,IE 

400 E=INP(0):IF E=255 THEN 380 ELSE 290 

410 CLS:PRINT@79,"THE OFFICIAL PACK 304 PINEWOOD DERBY HEAT RESU 
LTS" 

420 PRINT@143,"FOR HEAT #" ;H;TAB ( 54) ;D$ 

430 A$="CAR #":B$="TIE BETWEEN CARS" :C$="TIE BETWEEN ALL CARS FO 
R FIRST" 

440 Pl$="FIRST":P2$="SECOND":P3$="THIRD":P4$="FOURTH" 
450 IFE1=16PRINT@256,A$;A(4) ;P1$:GOTO490 
460 IFE2=16PRINT@384,A$;A(4) ;P2$:GOTO490 
470 IFE3=16PRINT@512,A$;A(4) ;P3$:GOTO490 
480 IFE4=16PRINT@640,A$;A(4) ;P4$ 

IFE1=8PRINT@256,A$;A(3) ;P1$:GOTO530 

IFE2=8PRINT@384,A$;A(3) ;P2$:GOTO530 

IFE3=8PRINT@512,A$;A(3) ;P3$:GOTO530 
520 IFE4=8PRINT@640,A$;A(3) ;P4$ 
530 IFE1=4PRINT@256,A$;A(2);P1$:GOTO570 

IFE2=4PRINT@384,A$;A(2) ;P2$:GOTO570 

IFE3=4PRINT@512,A$;A(2);P3$:GOTO570 

IFE4=4PRINT@640,A$;A(2) ;P4$ 
570 IFE1=2PRINT@256,A$;A(1) ;P1$:GOTO610 
580 IFE2=2PRINT@384,A$;A(1) ;P2$:GOTO610 

IFE3=2PRINT@512,A$;A(1) ;P3$:GOTO610 

IFE4=2PRINT@640,A$;A(1) ;P4$ 

IFE1=6PRINT@256,B$;A(1) ;"AND";A(2) ; "FOR " ; P1$:GOTO640 
620 IFE2=6PRINT@384,B$;A(1);"AND";A(2) ; "FOR " ;P2$:GOTO640 
630 IFE3=6PRINT@512,B$;A(1) ;"AND";A(2) ; "FOR ";P3$ 

Listing continues 



490 
500 
510 



540 
550 
560 



590 
600 
610 



ss 



1983 

SOFTWARE 
FOR 
MODEL l/lll 






CONSUMER SOFTWARE 



WHOLESALE PRICES 



. . . OVER two years of research 
and development have gone into 
these sophisticated software 
selections." 



MICRO SCRIPT™, the professional word processor at an' 
affordable price! For novice and speed typists alike. Bells 
& whistles? You bet! A serious masterpiece which fills the 
void in any program library S24.95 

MANAGEMENT SYSTEM II™- the full blown files & labels 
program with "Lightning Sort" is here! Files can be 
created, added, updated, listed, deleted or saved to tape or 
printer. Includes Merge, search total and label printing 
S24.95 

GENERATIONS™, the Genealogy Program. Trace your 
roots in the format recognized by genealogists worldwide. 
Create your family tree and compile information for all 
descendents on file 519.95 



Circle 



sSee List of Advertisers on Page 435 



MICRO SHORT™. Enjoy the convenience of programming 
shorthand. 27 statements and 9 commands at the stroke 
of a single key. A must for any programmer J 14.95 

MICRO MATH ™, an educator endorsed program now 
available to the general public. Four basic math functions, 
hone skills of all ages. Unique graphics, full dimensional 
sound. Report card & wrong answer retrieval. Printer 
routines included $16.95 

SUPERLOG™, the ultimate logkeeping system for 
amateur radio operators. Features column headings found 
in conventional radio logs, nothing is left out! FREE 
callsign duplicating program included $19.95 

AMATEUR RADIO THEORY REVIEWS™. Upgrade sue 
cessfully! Pass the FCC Exam. Over 85% of our customers 
have passed! Experience an approach to learning even 
textbooks cannot provide. Specify License Class . $24.95 

-MANY MORE- 



IVIICR0-801NC. 

E. 2665 Busby Road 
Oak Harbor, WA 98277 
1 2066756143 " 132 
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>NC 5 M FTLUflRElNC:r:> x 



Mooel III y^^-. COMMPACisthename 

terminal COMMunicalion PACkage is the game 

II you would like to be able to use your modem tor business 0' pleasure in a simple and 
etticient manner without a lot ol tuss and three weeks training out ot the manual then read 
on . . . NC SOFTWARE has something tor you. 

The COMMunications part is the smart terminal Software to compliment the HAYES 
SMARTMODEM in ease of use and overall efficiency. A thorough and easy to use MENU 
enables veritication ot all program features without being unclear or contusing as to the 
intent. A quickscan MINI-MANUAL is always available (on the screen) lor further refer- 
ence or clarification. An AUTO-DIAL/LOGON feature allows the kind ol use the SMART- 
MODEM was meant tor. There is also a 38 K CAPTURE BUFFER and DOS commands 
and a FILE EDITOR feature. SPECIAL characters can be generated from the keyboard 
as well as full control of the transmitting speed rate. A zero ELAPSED TIME clock will 
keep you informed as will the VIEW STATUS feature and the quickscan of a HELP file, 
Printer. RS-232 and ECHO toggles plus a WARM RESTART will keep you in control of all 
the capabilities COMMPAC is currently running under TRSDOS, NEWDOS-80 and 
DOSPLUS commands, and together with the SMARTMODEM makes an unbeatable 
combination. 

The PACkage comes with a SMARTMODEM auto-dial and auto-answer modem. This 
unit not only offers simple phone hookups, pulse dialing or touch-tone, programming con- 
trol Ivia ASCII strings!, audio monitoring, variable dialing parameters and visual signal 
LED indicators but a name, reputation, and quality in the industry that is unquestioned. 



Modem & Software $310.00 Commpac Software $59.95 

CommpacS Sources! 10.00 

Allow 2 extra weeks for personal checks. 

S2.50/C.O.D. « ADD » S3.50 Sfip/Hndl. 

MINNESOTA RESIDENTS - ADD 5% 



621-533-8862-Voice 



612-533-1957-Moden 



NC SOFTWARE INC. 

7216 Boone Avenue 

Minneapolis, Minnesota 55428 



^539 



JONELL SYSTEMS 

TRS 80* MOD I 



SEABATTLE: In assembler - fast, live-action, graphics oriented 
game. Play against another opponent or against computer. 
Hours ol Fun, Req. Min 16K Level II $15.95 

BIORYTHM GENERATOR: Generate anyone's biorylhm chart 
for 6 mos. W/16K, 1 yr. W/32K. Video or L/P output with 
simultaneous graphic sine-wave presentation of all 3 functions. 
Flags critical days and much more. Req. min. 16K Level ll$19.95 
JOB ACCOUNTING: Run your system like the big guys! Menu 
driven program records and files start and stop run times from 
svstem clock, elapsed time, dollar value of time, user code, 
date, and job name. Prints user account statements, credits 
payments and more. In disk basic for 32K system $14.95 

CMD 2 TAPE: Make level II basic system tapes from CMD Disk 
Files. Shows load and entry addresses. Req. 32K disk 
system. $14.95 

TAPE 2 CMD: Make disk CMD files from level II system tapes. 
Shows load and entry addresses. Identifies non-system tapes. 
Much simpler than tapedisk utility. Req. 32K Disk 
System $14.95 

All programs supplied on tape. Add $5.00 to price lor disk. 
Printed instructions furnished lor each program. Give system 
configuration when ordering. 

JONELL SYSTEMS 

130 4th Street Altizer 
Huntington, WV 25705 
* Trademark of Tandy Corporation >--347 



96K MODEL 1 

BIGMEM* replaces the 16K keyboard 
RAM with 64 K chips. A custom mem- 
ory controller mounts inside the 
keyboard case to give you 

• 48K keyboard memory on power-up 
t plus access to 32K E/I memory. 

• 2.7K RAM above ROM is available. 

• Optionally overlay ROM with RAM. 

• BIGMEM works with TRS-80** DOS or 

• remaps kybd/video for 64K CP/M*** 

..$180 post paid with check or money 
order. COD add $3. NYS residents 
add sales tax. BIGMEM incl. 64K RAM 
chips, A&T controller board, internal 
cable, wire, solder and instructions. 

MICR0HATCH 
P0 Box 501 

DeWItt, NY 13214 " 419 
(315)446-8031 after 6PM 

Trademarks of *Microhatch, **Tandy 
Corp. and ***Digital Research. 



Listing continued 



640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
810 
800 
810 
830 
820 
830 
850 
840 
850 
87 
860 
870 



IFEl=10PRINT@256 ,B$;A(1) ; n AND";A(3) 
IFE2=10PRINT@384,B$;A(1) ; "AND";A(3) 
IFE3=10PRINT@512,B$;A(1) ; "AND" ; A(3) 
IFEl=18PRINT@256,B$;A(l) ;"AND";A(4 
IFE2=18PRINT@384,B$;A(1) ;"AND";A(4 
IFE3=18PRINT@512,B$;A(1) ; "AND 
IFE1=12PRINT@256,B$;A(2) ; "AND 
IFE2=12PRINT@384,B$;A(2) ; "AND 
IFE3=12PRINT@512,B$;A(2) ; 
IFEl=20PRINT@256,B$;A(2) ; 
IFE2=20PRINT@384,B$;A(2) ; 
IFE3=20PRINT@512,B$;A(2) ; 
IFE1=24PRINT@256 ,B$;A(3) ; 
IFE2=24PRINT@384,B$;A(3) ; 
IFE3=24PRINT@512,B$;A(3) ; 
IFE1=14PRINT@256,B$;A(1) ; 



'AND' 
'AND* 
'AND' 
'AND' 
'AND' 
'AND' 
"AND" 



;A(4) 

;A(3) 

;A(3) 
;A(3) 
;A(4) 
;A(4) 
;A(4) 
;A(4) 
;A(4) 
;A(4) 



;A(2) ;"AND";A 



"FOR ";P1$:GOTO670 

"FOR ";P2$:GOTO670 

"FOR ";P3$ 

"FOR ";P1$:GOTO700 

"FOR ";P2$:GOTO700 

"FOR ";P3$ 

"FOR ";P1$:GOTO7 30 

"FOR ";P2$:GOTO730 

"FOR ";P3$ 

"FOR ";P1$:GOTO760 

"FOR ";P2$:GOTO760 

"FOR ";P3$ 

"FOR ";P1$:GOTO7 90 

"FOR ";P2$:GOTO7 90 

"FOR ";P3$ 

3) ;"FOR ";Pl$:GOTO 



IFE2=14PRINT@384,B$;A(1) ; ' 
IFE1 = 28PRINT@256,B$;A(2) ; ' 

IFE2=28PRINT@384,B$;A(2) ; 
IFEl=22PRINT@256,B$;A(l) ; 

IFE2=22PRINT@384,B$;A(1) ; 
IFEl=26PRINT@256,B$;A(l) ; 



';A 
';A 



;A(3); 
;A(2); 

;A(2); 
';A(3) 



'AND 
'AND 



'AND 
'AND 



■;A(3) 
';A(4) 

';A(4) 
';A(4) 



"AND";A(4) 
"AND"; A (4) 



"FOR 
"FOR 



'FOR 
'FOR 



'FOR 
'FOR 



;P2$ 
';Pl$:GOTO 

';P2$ 
';Pl$:GOTO 

';P2$ 
';Pl$:GOTO 



';A(3) ;"AND";A(4) ; "FOR ";P2$ 



IFE2=26PRINT@384,B$;A(1) ; 
IFE1=30PRINT@256 ,C$ 

880 PRINT@768,"DO YOU WANT A HARD COPY?" 

890 I$=INKEY$:IFI$=""THEN890 

900 IFI$="N"THEN930 

910 IFI$O"Y"THEN930 

920 IFPEEK(14312)<128GOSUB950 ELSE880 

930 PRINT@768, "PRESS ENTER WHEN READY FOR NEXT HEAT" 

940 INPUTR:CLS:H=H+1:GOTO240 

950 IFH=1LPRINTCHR$(15)CHR$(14) "THE OFFICIAL PACK 304 

ERBY HEAT RESULTS" :LPRINTCHR$ (18) :LPRINTTAB( 29) ;D$ 

960 IFH=1LPRINT:LPRINT 

LPRINTTAB(30) ; "HEAT #";H 
LPRINT:LPRINT 
IFE1=30LPRINTC$:GOTO143 
IFE1=16LPRINTA$;A(4) ;P1$:GOTO1130 
IFE1=8LPRINTA$;A(3) ; Pl$:GOTOll30 
IFE1=4LPRINTA$;A(2) ; Pl$:GOTOll30 
IFE1=2LPRINTA$ ; A ( 1 ) ; Pi $ : GOTOl 13 
IFE1=6LPRINTB$;A(1) ;"AND";A(2) ; "FOR 
IFE1=10LPRINTB$;A(1) ;"AND";A(3) ; "FOR 
IFE1=18LPRINTB$;A(1) ;"AND";A(4) ; "FOR 
IFE1=12LPRINTB$;A(2) ;"AND";A(3) ; "FOR 
IFE1=20LPRINTB$;A(2) ; "AND" ; A( 4) ; "FOR 
IFE1=24LPRINTB$;A(3) ;"AND";A(4) ; "FOR 
IFE1=14LPRINTB$;A(1) ", "A(2) "AND"A(3) 
IFE1=28LPRINTB$;A(2) ","A(3) "AND"A(4) 
IFE1=26LPRINTB$;A(1) ","A(3) "AND"A(4) 
IFE2=16LPRINTA$;A(4) ;P2$:GOTO126 
IFE2=8LPRINTA$;A(3) ; P2$: GOTOl 260 
IFE2=4LPRINTA$;A(2) ;P2$: GOTOl 260 
IFE2=2LPRINTA$;A(1) ;P2$: GOTOl 260 
IFE2=6LPRINTB$;A(1) ;"AND";A(2) ; "FOR 
IFE2=10LPRINTB$;A(1) ; "AND";A(3) ; "FOR 



04 PINEWOOD D 



97 

980 

990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 

1440 



;P1$:GOTO1130 

P1$:GOTO1130 

P1$:GOTO1130 

P1$:GOTO1130 

P1$:GOTO1130 

P1$:GOTO1130 
"FOR ";P1$:GOTO1130 
"FOR ";P1$:GOTO1130 
"FOR ";P1$ 



;A(4) ;"FOR " 
;A(3) ;"FOR " 
;A(4) ;"FOR " 
;A(4) ;"FOR " 
,";A(2) n AND"A(3) 
,";A(3) "AND"A(4) 



'AND 
'AND 
'AND 
'AND 



'FOR 



', "A(3) "AND"A(4) "FOR 



IFE2=18LPRINTB$;A(1) ; 

IFE2=12LPRINTB$;A(2) ; 

IFE2=20LPRINTB$;A(2) ; 

IFE2=24LPRINTB$;A(3) ; 

IFE2=14LPRINTB$;A(1) ; 

IFE2=28LPRINTB$;A(2) ; 

IFE2=26LPRINTB$;A(1) ; 

IFE3=16LPRINTA$;A(4) ; P3$:GOTO1360 

IFE3=8LPRINTA$;A(3) ; P3$:GOTO1360 

IFE3=4LPRINTA$;A(2) ; P3$:GOTO1360 

IFE3=2LPRINTA$;A(1) ;P3$:GOTO1360 

IFE3=6LPRINTB$;A(1) ;"AND";A(2) 

IFE3=10LPRINTB$;A(1) ;"AND";A(3) 

IFE3=18LPRINTB$;A(1) 

IFE3=12LPRINTB$;A(2) 

IFE3=20LPRINTB$;A(2) 

IFE3=24LPRINTB$;A(3) 

IFE4=16LPRINTA$;A(4) ;P4$:GOTO140 

IFE4=8LPRINTA$;A(3) ; P4$:GOTO1400 

IFE4=4LPRINTA$;A(2) ; P4$:GOTO1400 

IFE4=2LPRINTA$ ; A ( 1 ) ; P4 $ : GOTO140 

FORX=4TO100STEP4 

IFX=HLPRINT : LPRINTSTRING$ ( 64," = ") : GOT0143 

NEXTX 

LPRINTCHR$(27) "C"CHR$(10) ; 

LPRINTCHR$(27) "B"CHR$ (133) CHR$ (128) ; 
1450 LPRINTCHR$(139) 
1460 RETURN 



P2$:GOTO1260 
P2$: GOTOl 260 
P2$: GOTOl 260 
P2$: GOTOl 260 
P2$: GOTOl 260 
P2$: GOTOl 260 
FOR ";P2$: GOTOl 260 

";P2$: GOTOl 26 

;P2$ 



"AND";A(4) ; 
"AND";A(3) j 
"AND";A(4) ; 
"AND"; A (4) ; 



FOR ' 
"FOR 
"FOR 
"FOR 
"FOR 
"FOR 



;P3$:GOTO1360 
P3$:GOTO1360 
P3$:GOTO1360 
P3$:GOTO1360 
P3$:GOTO1360 
P3$ 
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Quality Computer Services Presents ... 







20 Megabytes for 






nder $3500! 



Our Systems Are Compatible 
with Your 

TRS-80® Model 1,11,111, XVI 




and Others 



Now you can expand the capability of 
your microcomputer with cost-effective 
mass storage from QuCS Our inte- 
grated family of 6-, 1 2-, 20-, and 
40-million-byte systems lets you operate 
your micro with the speed, convenience, 
and proven reliability of systems costing 
thousands of dollars morel And as your 
needs grow, Q U GS mass storage can 
grow too. You can start with an entry- 
level 6-million-byte system and expand 
80 million bytes ... without scrapping 
your existing programs or operating 
system. 

The completely assembled and 
tested system includes: 

■ Switching power supply 

■ Winchester drive 

■ Host adapter card 

■ Sealed case 



■ Expansion (enclosure, controller, and 
power supply designed for future 
backup hardware or increased storage) 

■ Software 

■ Auto-attach CP/M 

■ Hard disk utilities 

■ Realtime clock 

■ Formatting program (assigns 
alternates for any weak sectors 
detected during formatting — assuring 
the lowest possible error rate] 

■ Warranty (a full one-year warranty 
on all parts and workmanship) 

Also available: 

■ Attach program for TRSDOS 
and OASIS 

■ New CP/M dynamic generator: 

configured software; menu-driven for 
6-, 1 2-, 20-, 40-, 80-megabyte drives 



The following systems 
software can be utilized: 

TRS I, III— attach software for DOS 4.0,* 

LDOS 

TRS II, XVI— CP/M Racet for TRSDOS,* 

Turbo DOS, OASIS 

TRS Models II and XVI use 6 Meg for 

CP/M and 6 Meg for TRSDOS 

Apple— CP/M and DOS 3.3 

NEC— CP/M 

S- 100— CP/M 

Heath/Zenith— CP/M 

IBM— PC DOS, USCD, etc. 

• Available at an additional cost. 
See your local dealer or call: 



ViCi^*e Jinc 



Quality 

Computer 

Services 



^48 

1 78 Mam Street. Meiuchen, New Jersey 08840 
Telephone: 20 1/548-;* 1 35 

Quantity discounts available Distributor, 
Dealer and OEM inquiries invited. 




And guess who stars as the 
movie monster. You! As any of six 
different monsters. More if you 
have the disk version. 

You can terrorize and destroy 
four of the world's largest and 
most densely populated cities in 
over 100 possible scenarios. 
From Tokyo to the Golden Gate, 
you are the deadliest creature in 
the air, on the land, or in the sea. 

You can be the deadly am- 
phibian , who simultaneously 
smashes street cars, lunches on 
helpless humans and radiates a 
ray of death. 

If you were a giant winged 
creature, think of the aerial 
attacks you could make on the 
terrified but tasty tidbits beneath 
you. 

But as in all the best monster 
movies, you're up against every- 
thing the human race can throw 
at you— even nuclear warheads 
and a strange concoction devel- 
oped by a team of mad scientists. 

For only S29.95 you get 6 stu- 
pendous monsters, each with its. 
own monstrous summary card, 
4 teeming metropoli displayed in 
graphic detail on your computer 
display and mapped in the 
accompanying 48-page illustrat- 
ed book, the awesome sounds of 
monsterly mayhem, and spine- 
tingling, real-time, edge-ofyour- 
seat excitement. 




GET CRUSH, CRUMBLE & CHOMP 

now at your local dealer for your APPLE, ATARI, 
or TRS-80 . . before if s too late. 



GENERAL 



A church finance program for the Color Computer. 



Denominational Computation 



The Key Box 

Color Computer 
Extended Color Basic 
16K RAM 
Line Printer VII 



Gerald Sprouse 

9977 Caminito Chirimolla 

San Diego, CA 92131 



R 



ecently I was asked to 
serve as treasurer of my 



church. One of my tasks is to 
prepare a detailed monthly sum- 
mary of income and expenses. 
After I worked out an accept- 
able format with the financial 
committee members I wrote 
a program for my 16K Color 
Computer. 



While this specific program 
(see Program Listing) is directly 
applicable only to our church 
you can easily adapt it to oth- 
er situations. This program also 
illustrates some of the Extended 
Color Basic's more powerful 
features. 



Program Listing 



10 REM CHURCH FINANICAL STATEMENT 

20 CLEAR 1000 

30 DA=6:DB=25 

40 DIMCS(DA) ,D1(DA) ,D2(DA) ,D3(DA) ,E$(DA,5) ,E(DA,5) ,F(DA) 

50 DIMGS(DB) ,H$(DB) ,RS(DB) ,S(DB) ,T$(DB,5) ,U(DB,5) ,DD(DA) 

60 CLS 

70 PRINT" BEGIN BY GETTING THE CHECK BOOK AND OTHER FINANCIAL RE 

CORDS. THE PROGRAM WILL ASK FOR INPUT DATA." 

80 LINE INPUT" DATE OF SUMMARY?" ;A$ 

90 LINE INPUT" BEGINNING BALANCE?" ;B$:B=VAL(B$) 

100 PRINT " INPUT INCOME DATA" 

110 N=l 

120 LINE INPUT" DATE OF DEPOSIT?" ;C$ (N) 

130 IFC$(N)="" GOTO 240 

140 LINE INPUT" RECEIVED ON PLEDGE?" ;D$:D1 (N) =VAL (D$> 

150 LINE INPUT" OTHER CASH?" ;D$:D2 (N) =VAL (D$) 

160 LINE INPUT" CHURCH SCHOOL?" ;D$:D3<N) =VAL(D$) 

170 K=l 

180 LINE INPUT" SPECIAL-SOURCE?" ;E$(N,K) 

190 IF E$(N,K)="" GOTO 220 

200 LINE INPUT" SPECIAL-AMOUNT?" ;D$: E(N,K) =VAL(D$) 

210 K=K+1:G0T0 180 

220 LINE INPUT" CONFERENCE?" (D$:F (N) =VAL(D$) 

230 N=N+l:GOTO 120 

240 LINE INPUT" PLEDGED FOR MONTH?" ; PS : P=VAL( PS) : CLS 

250 M-l 

260 PRINT'INPUT CHECKS. USE FOLLOWING ACCOUNTS: <S>ALARY <R> 

ENT <A>DVERTISING <0>FFICE SUPPLIES <E>QUIPMENT <T>ELEPHON 

E <ED>UCATION <Y>OUTH <OONFERENCE<S1> SPECIAL 1 ETC." 

270 LINE INPUT" CHECK NUMBER?" ;GS(M) 

280 IF GS(M)="" GOTO420 

290 LINE INPUT" CHECK DATE?" ;HS (M) 

300 LINE INPUT" PAYEE?", -RS(M) 

310 LINE INPUT" AMOUNT?";SS:S(M)=VAL(SS) 

320 K=l 

330 LINE INPUT" ACCOUNT #?";TS(M,K) 

340 IF KOI GOTO 380 

350 LINE INPUT" ALL TO ACCOUNT:Y OR N";XS 

360 IF XS="N" GOTO 380 

370 U(M,K)=S(M) :GOTO 410 

380 IFTS(M,K)="" GOTO 410 

390 LINE INPUT" AMOUNT TO ACCOUNT?" (US: U (M,K) =VAL(US) 

400 K=K+l:GOTO 330 

410 M=M+1: CLS: GOTO 260 

420 N=N-1:M=M-1 

430 FOR I=lTON:Dl=Dl+Dl(I) :D2=D2+D2(I) :D3=D3+D3(I) :F=F+F(I) :NEXT 

440 FOR I=1T0M:S=S+S(I) :NEXT 

450 CLS 

460 PRINT" ENTER PREVIOUS SPENDING" 

470 LINE INPUT" SALARY" ;XS: Xl-VAL(XS) 

480 LINE INPUT" RENT" J XS: X2=VAL(XS) 



490 LINE INPUT" ADVERTISING";XS:X3=VAL(XS) 

500 LINE INPUT" OFFICE SUPPLIES";X$:X4=VAL(X$) 

510 LINE INPUT" EQUIPMENT" ;X$:X5=VAL(X$) 

520 LINE INPUT" TELEPHONE" ;X$:X6=VAL(X$) 

530 LINE INPUT" EDUCATION" ;X$:X7=VAL(X$) 

540 LINE INPUT" YOUTH" ;X$: X8=VAL(X$) 

550 LINE INPUT" CONFERENCE" ;X$:Y1=VAL(X$) 

560 LINE INPUT" SPECIAL 1" ;XS : Y2=VAL(XS) 

570 LINE INPUT" SPECIAL 2" ;X$: Y3=VAL(X$) 

580 LINE INPUT" SPECIAL 3" ;X$: Y4=VAL(X$) 

590 E=0 

600 FOR I=1T0N:K=1:E=E+E(I,K) 

610 K=K+1 

620 IF E$(I,K)=""GOTO 630:E=E+E(I ,K) :GOTO 610 

630 NEXT 

640 D=Dl+D2+D3+E+F 

650 FOR I=lTOM 

660 K=l 

670 IFT$(I,K)="S"THEN V1=V1+U(I,K) 

680 IFT$(I,K)="R"THEN V2=V2+U(I,K) 

690 IFT$(I,K)="A"THEN V3=V3+U(I,K) 

700 IFT$(I,K)="0"THEN V4=V4+U(I,K) 

710 IFT$(I,K)="E"THEN V5=V5+U(I,K) 

720 IFT$(I,K)="T"THEN V6=V6+U(I,K) 

730 IFT$(I,K)="ED"THEN V7=V7+U(I,K) 

740 IFT$(I,K)="Y"THEN V8=V8+U(I,K) 

750 IFT$(I,K)="C"THEN W1=W1+U(I,K) 

760 IFT$(I,K)="S1"THEN W2=W2+U(I,K) 

770 IFT$(I,K)="S2"THEN W3=W3+U(I,K) 

780 IFT$(I,K)="S3"THEN W4=W4+U(I,K) 

7 90 K=K+1 

800 IFTS(I,K)=""GOTO820 

810 GOTO670 

820 NEXT 

830 FOR I=1T0N 

840 K=l 

850 DD(I)=D1(I)+D2(I)+D3(I)+F(I) 

860 IFE$(I,K)=""GOTO890 

870 DD(I)=DD(I)+E(I,K) 

880 K=K+1:GOTO860 

890 NEXT 

900 X1=X1+V1:X2=X2+V2:X3=X3+V3:X4=X4+V4:X5=X5+V5:X6=X6+V6:X7=X7+ 

V7:X8=X8+V8 

910 Y1=Y1+W1 : Y2=Y2+W2 : Y3=Y3+W3 : Y4=Y4+W4 

920 WW=V1 +V2 +V3 +V4 +V5 +V6 +V7 +V8+W1 +W2 +W3 +W4 

930 YY=X1+X2+X3+X4+X5+X6+X7+X8+Y1+Y2+Y3+Y4 

940 CLS 

950 PRINT" ARE ALL SPECIALS DESIGNATED?" 

960 PRINT" TOTAL=";E 

970 LINE INPUT" AMOUNT DESIGNATED?" ;W$: EE=VAL(W$) 

980 D8=.2*(D1+D2) :D9=.45*(D1+D2) 

Listing continues 



80 Micro, January 1983 • 227 



Our financial summary has 
several segments: an over- 
view of each Sunday's income; 
comparison of expenses by cat- 
egory in the budget; and a sum- 
mary of designated accounts. 
To use the program first enter in- 
come data and then enter data 
from the checkbook. Lastly en- 
ter data items from the previous 
summary. Then the program 
prints the financial summary (I 
use a Line Printer VII). You can 
print additional copies and 
produce a check list for the 
summary. 

Before you type in the pro- 
gram type PCLEAR1 to clear 
sufficient memory. 

Nuts and Bolts 

In lines 10-50 variables DR 
and DB allow you to control 
memory assignment (DA is the 
number of deposits and DB is 
the number of checks). 

Lines 60-240 allows entry of 
all income data. Income items 
for each deposit include pledge, 
other cash, church school, spe- 
cials (amount and source), and 
conference. Pressing Enter with 
no entry produces the next 
prompt. 

Lines 250-440 control entry of 
data from the church check- 
book. Specific items include 
check number, check date, 
payee, amount, and account (a 
total of twelve are presently 
available). The user can allocate 
funds from one check to more 
than one account. To assist the 
user the screen contains the ac- 
count designations for the entry 
of each check. 

Lines 450-580 prompt the us- 
er to enter the spending history 
for the previous months using 
the past month's summary. To 
improve this program store this 
data in a file for input at a later 
date for next month's summary. 

Lines 590-930 calculate vari- 
ous items for the final summary. 
For example, lines 650-820 
prepare the monthly account 
summaries. 

Lines 940-1070 prompt the 
user to input previous balances 
for three accounts (specials, 
benevolences and capital fund) 
using the past month's sum- 
mary. The user can designate 
any special income for the 
month. The program automati- 
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cally adds a fixed percentage of 
income to the benevolence and 
capital fund accounts as a form 
of forced savings. The final step 
is to enter any distributions of 
these three accounts. 

Lines 1080-1170 contain for- 
mat statements for "PRINT#-2, 
USING". 

Lines 1180-1730 print the ac- 



tual financial summary. 

Lines 1740-1770 allow you to 
print an additional copy, pro- 
duce a list of checks or exit the 
program. 

Lines 1780-1880 produce a 
check list including check 
number, check date, payee, 
amount, account number and 
amount for each account. Fig- 



ure 2 shows a typical output. ■ 

Mr. Sprouse has an MA 
degree in mathematics from the 
University of Arizona. He is an 
Operations Research Analyst 
for the U.S. Navy in San Diego. 
He serves as treasurer for his 
church and the condominium 
association where he lives. 



Financial Statement 
October 1981 



Summary: 




Beginning balance 


+ 2500.00 


Income 


3793.00 


Expenses 


3425.00 


Net gain 


+ 368.00 


Cash on hand at end of month 


+ 2868.00 


Pledged for month 


2150.00 


Received on pledges 


2250.00 



INCOME 














Sunday 


Received 
On Pledge 


Other 
Cash 


Church 
School 


Specials 


Conference 


Total 


10/4 


700.00 


50.00 


20.00 


0.00 


0.00 


770.00 


10/11 


650.00 


75.00 


15.00 


0.00 


1000.00 


1740.00 


10/18 


500.00 


100.00 


12.00 


0.00 


0.00 


612.00 


10/25 


400.00 


58.00 


13.00 


200.00 Youth 0.00 


671.00 


Total 


2250.00 


283.00 


60.00 


200.00 


1000.00 


3793.00 



EXPENSES 












Budgeted 


Actual 


Budgeted 


Actual for 




For month 


for month 


for year 


year to date 


Salary 


2000.00 


1900.00 


24000.00 


18900.00 


Rent 


1000.00 


1100.00 


12000.00 


9600.00 


Advertising 


100.00 


150.00 


1200.00 


750.00 


Office Supplies 


150.00 


200.00 


1800.00 


1300.00 


Equipment 


100.00 


0.00 


1200.00 


750.00 


Telephone 


100.00 


0.00 


1200.00 


625.00 


Education 


100.00 


75.00 


1200.00 


1050.00 


Youth 


50.00 


0.00 


600.00 


475.00 


Conference 


25.00 


0.00 


300.00 


215.00 


Special 1 


0.00 


0.00 


0.00 


0.00 


Special 2 


0.00 


0.00 


0.00 


0.00 


Special 3 


0.00 


0.00 


0.00 


0.00 


Total 


3625.00 


3425.00 


43500.00 


33665.00 



Designated Accounts 












Received 


Disbursed 


Balance 


Special 




200.00 


0.00 


800.00 


Benevolences 




506.00 


0.00 


1406.60 


Capital fund 




1139.85 


0.00 


2639.85 


Total 








+ 4846.45 


Available cash 








-1978.45 


Equals cash on 


hand less total designated accounts. 





Check Summary for October 1981 










1 10/7 


Minister 


1900.00 


S 


1900.00 


2 10/9 


Rent 


1100.00 


R 


1100.00 


3 10/13 


Newspaper 


150.00 


A 


150.00 


4 10/15 


Petty Cash 


200.00 


O 


200.00 


5 10/17 


Education 


75.00 


ED 


75.00 



Figure 1 



Listing continues 

990 LINE INPUT" PREVIOUS SPECIAL BAL?" ;WS:W5=VAL (WS) 

1000 LINE INPUT" PREVIOUS BENEVOLENCES BAL?" ;WS: W6=VAL (W$) 

1010 LINE INPUT" PREVIOUS CAPITAL FUND BAL?" ;W$: W7=VAL (W$) 

1020 LINE INPUT" DISTRIBUTION-SPECIALS?" ;W$:W8=VAL (W$) 

1030 W5=W5+EE-W8 

1040 LINE INPUT" DISTRIBUTION-BENEVOLENCES?" ;W$ : Y5=VAL (W$) 

1050 W6=W6+D8-Y5 

1060 LINE INPUT" DISTRIBUTION-CAPTIAL FUND?" ;W$: Y6=VAL (W$) 

1070 W7=W7+D9-Y6:W9=W5+W6+W7:X=D-S:XX=B+X:XY=XX-W9 

1080 AA$=" % % 

#.*#" 

1090 AB$=" % 

1100 AC$="% % tttt.tt 

%tttt.tt tttt.tt" 
1110 AD$=" 



tttt.tt tttt.tt 



t MMt.tr 

tttt.tt % 



1120 AE$="% 

tttt.tt 

AFS="% 



tttt.tt" 



1130 
t.tt' 

1140 
1150 
1160 
%###( 

1170 
%ttti 

1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 

1380 
1390 
1400 
1410 



tttt.tt 
%tttt.tt 
%ttttt.tt 



tttt.tt 

tttt.tt 
ttttt.tt 



tttt.tt 
ttttt.tt tttt 



ttttt.tr 

+ttttt.tt' 
%ttttt.tt % 



AGS="% 

AHS="% 

AI$="% %% 

t.tt" 

AJ$=" % 

t.tt" 

LINE INPUT"POSITION PRINTER, KEY ENTER" ;W$ 

PRINTt-2,TAB(10) ; "SCRIPPS MESA UNITED METHODIST CHURCH" 

PRINTt-2,"" 

PRINTt-2,TAB(20) ; "FINANCIAL STATEMENT" 

PRINTt-2, TAB(25) ;A$ 

PRINTt-2,"" 

PRINTt-2, "SUMMARY:" 

PRINTt-2, USING AA$; "BEGINNING BALANCE", -B 

PRINTt-2, USING AB$; "INCOME" ;D 

PRINTt-2, USING AB?; "EXPENSES" ; S 

IFX>0THEN 1300 

PRINTt-2, USING AA$;"NET LOSS";X:GOTO 1310 

PRINTt-2, USING AA$;"NET GAIN";X 

PRINTt-2, USING AA$;"CASH ON HAND AT END OF MONTH" ;XX 

PRINTt-2,"" 

PRINTt-2, USING AB$; "PLEDGED FOR MONTH" ;P 

PRINTt-2, USING ABS; "RECEIVED ON PLEDGES", -Dl 

PRINTt-2,"" 

PRINTt-2, "INCOME" 

PRINTt-2," SUNDAY RECEIVED OTHER CHURCH SPECIALS 

CONFERENCE TOTAL" 
PRINTt-2," ON PLEDGE CASH SCHOOL 

FOR I=1T0N:K=1 
IF E$(I,K)<>"" THEN1420 
E(I,K)=0 



1420 PRINTt-2, USING ACS ;CS ( I ) ;D1 ( I) ;D2 ( I ) ; D3 ( I ) ; E( I ,K) ; ES ( I ,K) ; F 

( I ) ; DD ( I ) 

1430 K=K+1 

1440 IF E$(I,K)=""THEN 1470 

1450 PRINTt-2, USING AD$;E ( I ,K) ;ES (I ,K) 

1460 GOTO 1430 

1470 NEXT I 

1480 PRINTt-2, USING AE$; "TOTAL" ;D1 ; D2 ;D3; E,-F;D 

1490 PRINTt-2,"" 

1500 PRINTt-2, "EXPENSES" 

1510 PRINTt-2, TAB( 20) ; "BUDGETED ACTUAL BUDGETED ACTUAL FOR" 

1520 PRINTt-2, TAB( 20) ; "FOR MONTH FOR MONTH FOR YEAR YEAR TO DAT 

E" 

1530 PRINTt-2, USING AFS; "SALARY" ; 2000 .00; VI ; 24000 .00 ; XI 

1540 PRINTt-2, USING AFS; "RENT" ; 1000 .00;V2; 12000. 00;X2 

1550 PRINTt-2, USING AFS; "ADVERTISING" ;100 .00;V3 ; 1200 .00;X3 

1560 PRINTt-2, USING AF$;"OFFICE SUPPLIES" ; 150 . 00 ;V4; 1800 ,00;X4 

1570 PRINTt-2, USING AFS; "EQUIPMENT" ;100 .00; V5; 1200 . 00;X5 

1580 PRINTt-2, USING AFS; "TELEPHONE" ; 100 .00; V6 ; 1200 . 00 ;X6 

1590 PRINTt-2, USING AFS; "EDUCATION" ;100 .00; V7; 1200 .00;X7 

1600 PRINTt-2, USING AFS; "YOUTH" ; 50 . 00; V8; 600 .00;X8 

1610 PRINTt-2, USING AFS; "CONFERENCE" ; 25 .00;W1; 300 .00; Yl 

1620 PRINTt-2, USING AFS; "SPECIAL 1" ; .00; W2; . 00; Y2 

1630 PRINTt-2, USING AFS; "SPECIAL 2" ; .00;W3; .00; Y3 

1640 PRINTt-2, USING AF$;"SPECIAL 3" ; .00;W4; . 00; Y4 

1650 PRINTt-2, USING AFS; "TOTAL" ; 3625 .00;WW; 43500 .00; YY 

1660 PRINTt-2,"" 

1670 PRINTt-2," DESIGNATED ACCOUNTS:" 

16 80 PRINTt-2, TAB ( 20 ); "RECEIVED DISBURSED BALANCE" 
1690 PRINTt-2, USING AGS; "SPECIAL" ;EE;W8;W5 

1700 PRINTt-2, USING AGS; "BENEVOLENCES" ;D8; Y5 ;W6 
1710 PRINTt-2, USING AGS; "CAPITAL FUND" ;D9 ; Y6 ;W7 
1720 PRINTt-2, USING AHS;" TOTAL";W9 
1730 PRINTt-2, USING AHS;" AVAILABLE CASH";XY 

17 40 PRINTt-2," EQUALS CASH ON HAND LESS TOTAL DESIGNATED ACCOUN 
TS" 

1750 CLS:LINE INPUT"KEY A FOR A CHECK LIST OR R TO REPEAT SUMMA 

RY";WS 

1760 IFWS="R" THEN 1180 

1770 IF WS="" THEN END 

17 80 LINE INPUT"POSITION PRINTER, KEY ENTER" ;W$ 

17 90 PRINTt-2," CHECK SUMMARY FOR ";AS 

1800 FOR I=1T0M 

1810 K=l 

182 PRINT»-2,USING AIS;GS(I);HS(I);RS(I);S(I);TS(I,K);U(I,K) 

1830 K=K+1 

1840 IF TS(I,K)="" THEN GOTO 1870 

1850 PRINTt-2, USING AJS;TS ( I ,K) ;U ( I ,K) 

1860 GOTO 1830 

1870 NEXT 

1880 GOTO 1750 
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MACRO-SOC 

The Micro Works is pleased to announce the release of its disk-based editor, 
macro assembler and monitor, written for Color Computer by Andy Phelps. THIS 
IS IT — The ultimate programming tool! 

The powerful 2-pass macro assembler features conditional assembly, local labels, 
include files and cross referenced symbol tables. MACR0-80C supports the 
complete Motorola 6809 instruction set in standard source format. There are no 
changes, constraints or shortcuts in the source language definition. Incorporating 
all of the features of our Rompack-based assembler (SDS80C), MACRO-80C con- 
tains many more useful instructions and pseudo-ops which aid the programmer 
and add power and flexibility. 

The screen-oriented text editor is designed for efficient and easy editing of 
assembly language programs. The "Help Key" feature makes it simple and fun to 
learn to use the editor. As the editor requires no line numbers, you can use the 
arrow keys to position the cursor anywhere in the file. MACRO80C allows global 
changes and moving/copying blocks of text. You can edit lines of assembly 
source which are longer than 32 characters. 

DCBUG is a machine language monitor which allows examining and altering of 
memory, setting break points, etc. 

The editor, assembler and monitor — as well as sample programs — come on one 
Radio Shack compatible disk. Extensive documentation included. Macro-80c 
Price: $99.95 



SDS80C — Our famous editor, assembler and monitor in Rompack. Complete 
manual included. Price: $89.95 



PARALLEL PRINTER INTERFACE — Serial to parallel converter allows use of all 
standard parallel printers. You supply printer cable. PI80C Price: $69.95 



MICROTEXT — Get printouts while using your modem! Also download to cassette. 
General purpose terminal Rompack. Price: $59.95 



YOU NEED COLOR FORTH!! 

Why 9 •Forth is faster to program in than Basic 

•Forth is easier to learn than Assembly Language 
•Forth executes in less time than Basic 
Forth is a highly interactive language like Basic, with structure like Pascal and 
execution speed close to that of Assembly Language. The Micro Works Color Forth 
is a Rompack containing everything you need to run Forth on your Color Computer. 
Color Forth consists of the standard FORTH Interest Group (FIG) implementation of 
the language plus most of FORTH-79. It has a super screen editor with split 
screen display. Mass storage is on cassette. Color Forth also contains a 
decompiler and other aids for learning the inner workings of this fascinating lan- 
guage. It will run on 4K, 16K, and 32K computers. Color Forth contains 10K of 
ROM. leaving your RAM for your programs! There are simple words to effectively 
use the Hi-Res Color Computer graphics, joysticks, and sound. The 112-page 
manual includes a glossary of the system-specific words, a full standard FIG 
glossary and complete source listing. COLOR FORTH ... THE BEST! From the 
r in Forth, Talbot Microsystems. Price: $109.95 



THEAA n/^ro^/^NS Also available: Machine language Monitor • 2-pass Disassembler • Books • 
MAY >S^ N J Memory Upgrade Kits • Parts and Services • Call or write for information 

W©\j^j& P.O. BOX 1110 DEL MAR, CA 92014 



GAMES 

Star Blaster — Blast your way through an asteroid field in this action-packed Hi- 
Res graphics game. Available in ROMPACK; requires 16K. Price: $39.95 
Pac Attack — Try your hand at this challenging game by Computerware, with 
fantastic graphics, sound and action! Cassette requires 16K. Price: $24.95 
Berserk — Have fun zapping robots with this Hi-Res game by Mark Data 
Products. Cassette requires 16K. Price: $24.95 

Adventure — Black Sanctum and Calixto Island by Mark Data Products. Each 
cassette requires 16K. Price: $19.95 each. 

Cave Hunter — Experience vivid colors, bizarre sounds and errie creatures in hot 
pursuit as you wind your way through a cave maze in search of gold treasures. 
This exciting Hi-Res game by Mark Data Products requires 16K for cassette 
version. Price: $24.95 

California Residents add 6% Tax 

Master Charge/Visa and 

COD Accepted 

61 9-942-2400 



• See List ot Advertisers on Page 435 
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The facts. 
And nothing but the facts. 

Epson. 
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Our MX Series printers are the best-selling 
dot matrix printers in the entire world. This 
is why. 

Fact One: We've got your type. 

Epson invented correspondence quality 
printing. And we still do it better than any- 
body. 

But more importantly, we do more of it than 
anybody. On every Epson MX printer, you 
get a choice of sixty-six different type styles, 
including italics, a handy subscript and 
superscript for scientific notation and small 
print, enough international symbols to print 
most Western languages, and one-pass 
underscore. All in a tack-sharp, easy-to-read 
9x9 matrix with full descenders. 

If print quality is important to you, your 
next printer is an Epson. 

Fact Two: Ultra-high resolution graphics. 

There simply is no higher resolution graphics 
than GRAFTRAX-PLUS. And it comes stan- 
dard on every MX. 

You get bit image graphics free of wander, 
walk and jitter; graphics with blacker blacks 
and better definition because you can pre- 
cisely place a dot at any of 25,920 positions 
inside a square inch (that's 120 DPI h x 216 
DPI v); graphics that make our printers rival 
plotters. 

If graphics is what you want, your next 
printer is an Epson. 

Fact Three: Feature shock. 

The Epson MX Series is packed with the fea- 
tures printer fanatics want most. A bidirec- 
tional print head with logical seeking of the 
shortest line. Programmable tab, form length 
and right margin. Top of forms recognition. 
Skip over perf. Software printer reset. True 



"In my judgment, 
this is the 

best printer j 

you can buy." 




backspace. Self test. The world's only dispos- 
able print head. And more. Lots more. On 
our MX-100 and MX-80 F/T, you even get 
both friction and tractor paper feed. 

If you want performance, your next printer 
is an Epson. 

Fact Four: Incredible reliability. 

Epson MX Series printers are the most reli- 
able printers ever made. And the reason is 
precision. 

Take a look inside one and you'll under- 
stand. Notice the simplicity, the fit, the 
finish. That's why Epson has an out-of-box 
reliability rate others can only envy: 98%. 
And why our mean cycles between failures 
(MCBF) is over five million lines. 

The whole package is neatly wrapped in a 
rugged plastic injection-molded case de- 
signed to look good — and stay looking good. 

If you want a printer that works, and keeps 
on working, your next printer is an Epson. 

Fact Five: World's best seller. Period. 

Within months after we introduced the Epson 
MX-80, it was the best selling dot matrix 
printer in the world. It still is. Not because of 
anything we said, but because tens of thou- 
sands of computer enthusiasts went out and 
did some serious comparison shopping. They 
decided it was the best printer for the money 
they could buy. And who are we to argue? 

If you want the world's best seller, your 
next printer is an Epson. 

Fact Six: Quality doesn't cost more. 

Don't take our word for it. Check it out. Look 
at what they give you. Then look at what we 
give you. Then look at the price. 

There is only one logical choice. Epson. 

And that's the truth. 



Your next printer. 

EPSON 

EPSON AMERICA, INC. 

COMPUTER PRODUCTS DIVISION 



3415 Kashiwa Street 
Torrance, California 90505 
(213) 539-9140 



vSee List of Advertisers on Page 435 
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UTILITY 



LOAD 80 



Save machine-language disk files to tape. 



DSAVE 



John Hodgson 
134 Littlefield Road 
Monterey, CA 93940 



Making a System tape out 
of any disk/CMD file is a 
slow and cautious process prone 
to human error. If you have a ma- 
chine language program (let's 
call it SNOOPY/CMD) on disk 
that you wish to run on a friend's 
tape-based Model I, you might 
follow this procedure: 

• Run NEWDOS LMOFFSET 
utility to find the starting, ending 
and entry points of SNOOPY/ 
CMD. 

• Load SNOOPY/CMD. 

• Execute RSM2D48/CMD, or 



The Key Box 

Level II Basic 
Model I 
32K RAM 
Any DOS 
One disk drive 
Cassette recorder 



your favorite monitor program 
that resides in high memory. 

• Using the data provided 
earlier by LMOFFSET, use the 
Write System Tape command to 
punch the file onto tape. 

This process involves a lot of 
disk switching (especially for 
one drive users) and has some 
drawbacks. For example, many 
machine-language programs on 
the market reside below 7000H. 
Loading object files below 
7000H is risky business, since 
some or all of DOS may be over- 
written. It is interesting that many 
files loading around 5200H- 
6000H work as long as you ex- 
ecute that file, not load it. 

When you execute your ma- 
chine language file, DOS calls in 
and jumps to the needed load 
routines. But if you load the file, 
returning to a DOS Ready state, 
extra DOS routines are called in 
after loading to handle com- 
mand processing. These rou- 
tines overlap your file. Hence, 
never write machine language 
software for disk that resides 
below 7000H, the safe zone for 
disk-based systems. 

The program you wish to mod- 
ify or copy may reside where 
your monitor is, wiping it out. 
This often means that you will 
need some other version of your 
monitor program residing in a 
different portion of memory. 

My Solution 

DSAVE/CMD is an Assembly 
language program (see Program 



Listing 1) that takes any ma- 
chine language file on disk and 
punches it out on tape. Then you 
can load the program from cas- 
sette and it will perform like it 
did before. The formats of ma- 
chine language software on disk 



This type of loading allows any 
memory location to load inde- 
pendently of any other location 
(each record or "chunk" of bytes 
has its own starting address). 
This is how DOS is able to man- 
age assembled files that may be 



01 nn addr: Load the following nn bytes starting at location address (stored in 

LSB, MSB format) 
05 nn: Skip the following nn bytes 

02 02 addr: Jump to location address 

Table 1 



01 


10 


00 


70 


(load the next 10H bytes starting at 7000H) 






21 


00 


3C 


11 


01 3C 01 FF 03 


36 BF ED 


B0 C3 


0D 42 (the 


actua 


data) 


02 


02 


00 


70 


(Jump to 7000H) 


Table 2 











and tape differ, so I wanted 
DSAVE to do any conversion 
necessary. 

Object files are not stored in- 
ternally on disk. Instead, any 
machine language file is inter- 
spersed with control codes and 
data bytes necessary for DOS 
bookkeeping. Object files are 
stored on disk as follows: Load- 
er code plus argument plus ac- 
tual data plus transfer code plus 
execution address. Table 1 lists 
the codes. 

Data is loaded in chunks of 
256 bytes or less, meaning that 
the loader code/argument/data 
cycle is repeated until the entire 
file has been placed in memory. 



ORGed by the assembler in 
more than one place. System 
format tapes also have this 
capability. 

The skip code is interesting: 
When DOS encounters the 05 
code, it skips the next nn bytes 
and continues processing. This 
allows you to embed hidden 
comments, copyright notices 
and the like within the file for in- 
formational purposes without 
actually changing the code 
loaded into memory. 

The transfer code is always 
the last control code of any ma- 
chine language file. After all has 
been loaded or skipped, the 
0202 code tells DOS to jump to 
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the following address, thereby 
executing the program. 

Program Listing 2 is a simple 
screen-zap routine. The actual 
code for this program is shown 
in the second column. On disk 
this code would be stored as 
shown in Table 2. 

OK, that's simple enough. But 
if there is a hidden comment, it 
would look like this: 

05 05 (Skip the following 5 bytes) 
48 41 20 48 41 (ASCII for "HA HA") 

01 10 00 70 (continue with the process as 

before) 

Many DOS routines (notably 
the /SYS files) have sneaky mes- 
sages. Each of these starts with 
code to skip over a copyright 
message following. Warning: 
The codes in Table 1 are the 
most common, used 99 percent 
of the time. However, the values 
of 00 and 03-1 FH are also valid 
numbers for the skip code. The 

02 02 code may have any byte 
after the first 02— the second 
byte is a place holder. 

System Tapes 

System format tapes are simi- 
lar to the /CMD format files: 
Data is also recorded in 256 byte 
(or less) records with control 
codes embedded therein. The 
basic System format is: 255 
zeroes plus A5H (leader and lead- 
er terminator) plus 55H sync byte 
plus six filename bytes plus 
3CH record byte plus nn bytes to 
load plus load address plus data 
plus checksum plus 78H trans- 
fer code plus transfer address. 

This may seem complex at 
first, but is really similar to the 
DOS format. The 255 zeroes and 
A5H make up the leader, whose 
purpose is to get the computer 
in tune with the tape before 
loading data. The 55H byte indi- 
cates the filename follows. The 
next six bytes make up the file- 
name of the program, which is 
left justified and padded with 
blanks. The 3CH record byte 
serves the same purpose as 
DOS' 01 H loader code, and 
starts off every data block. The 
next byte is the number of bytes 
to load, followed by the starting 
address of where to place the 
data (also in the same style as 
the DOS format). The actual 
data follows, followed by a one 
byte checksum of the data. The 
checksum byte is calculated by 











Program Listing 1 






00010 


**************************************** 






00020 


. *** 




DSAVE *** 






00030 


;*** /CMD TO 


SYSTEM FORMAT CONVERTER *** 






00040 


;*** FOR DISK 


BASED MODEL I TRS-80'S *** 






00050 


. ** * 




BY JOHN HODGSON *** 






00060 


. ** * 


COPYRIGHT (C) 1981 *** 






00070 


. *** 


TOP DOG SOFTWARE *** 






00080 


. *** 


134 


LITLEFIELD ROAD *** 






00090 


. ** * 


MONTEREY, CALIF. 93940 *** 






00100 


. *** 




(408) 646-0940 *** 






00110 


J*************************************** 


7000 

R 

7000 




00120 




ORG 


07000H ;MEMSIZE=START-1 ; CALL WITH US 


31FE6F 


00130 


START 


LD 


SP,START-2 


7003 


CDC901 


00140 




CALL 


01C9H ;CLS 


7006 


215871 


00150 




LD 


HL,HIMSG 


7009 


CD4671 


00160 




CALL 


DISPLY 


700C 


219171 


00170 


DOIT 


LD 


HL,FILMSG ; INPUT MESSAGE 


700F 


CD4671 


00180 




CALL 


DISPLY 


7012 


213672 


00190 




LD 


HL,DCB 


7015 


0617 


00200 




LD 


B,23 


7017 


CDD905 


00210 




CALL 


5D9H ; INPUT 


701A 


AF 


00220 




XOR 


A ;TEST TO SEE IF ANY FILENAME 


701B 


B0 


00230 




OR 


B ;WAS ENTERED 


701C 


28EE 


00240 




JR 


Z,DOIT ;GET IT RIGHT IF NOT 


701E 


E5 


00250 




PUSH 


HL 


70.1F 


Dl 


00260 




POP 


DE ;DE NOW HAS DCB 


7020 


215672 


00270 




LD 


HL, BUFFER 


7023 


0600 


00280 




LD 


B,0 ;LRL=0 


7025 


CD2444 


00290 




CALL 


4424H ;OPEN FILE 


7028 


C25071 


00300 




JP 


NZ,ERRORl ;DISK ERROR? 


702B 


115673 


00310 




LD 


DE,STORAG ;MAIN STORAGE BUFFER 


702E 


C5 


00320 


ST LOOP 


PUSH 


BC 


702F 


D5 


00330 




PUSH 


DE 


7030 


113672 


00340 




LD 


DE,DCB 


7033 


CD3644 


00350 




CALL 


443 6H ;READ A SECTOR 


7036 


Dl 


00360 




POP 


DE ; RESTORE DESTINATION 


7037 


FE1C 


00370 




CP 


1CH ;EOF? 


7039 


2813 


00380 




JR 


Z,OUT 


703B 


FE1D 


00390 




CP 


1DH ; RECORD NOT FOUND? 


703D 


280F 


00400 




JR 


Z,OUT 


703F 


B7 


00410 




OR 


A ; RESET FLAG 


7040 


C24F71 


00420 




JP 


NZ, ERROR /OTHERWISE, DISK ERROR 


7043 


215672 


00430 




LD 


HL, BUFFER ; SOURCE BUFFER 


7046 


010001 


00440 




LD 


BC,256 ;256 BYTE SECTORS 


7049 


EDB0 


00450 




LDIR 


;MOVE TO STORAGE AREA 


704B 


CI 


00460 




POP 


BC ; RESTORE SECTOR COUNT 


704C 


18E0 


00470 




JR 


ST LOOP 


704E 


113672 


00480 


OUT 


LD 


DE,DCB 


7051 


CD2844 


00490 




CALL 


4428H ; CLOSE FILE 


7054 


C25071 


00500 




JP 


NZ,ERRORl 


7057 


3A5673 


00510 




LD 


A, (STORAG) 


705A 


FE01 


00520 




CP 


1 ; CORRECT FORMAT? 


705C 


CA6470 


00530 




JP 


Z,OK ; GUESS SO 


705F 


FE05 


00540 




CP 


5 ;SKIP CODE? 


7061 


C21571 


00550 




JP 


NZ, STUPID ;WRONG FORMAT AFTER ALL 


7064 


213672 


00560 


OK 


LD 


HL,DCB 


7067 


0606 


00570 




LD 


B f 6 


7069 


3620 


00580 


CLEAR 


LD 


(HL),' ' ; CLEAR FILENAME 


706B 


23 


00590 




INC 


HL 


706C 


10FB 


00600 




DJNZ 


CLEAR 


706E 


21A671 


00610 


NOPE 


LD 


HL,ENTMSG ; "PRESS ENTER TO SAVE" 


7071 


CD4671 


00620 




CALL 


DISPLY 


7074 


0606 


00630 




LD 


B,6 ;6 BYTES MAX FOR FILENAME 


7076 


213672 


00640 




LD 


HL,DCB 


7079 


CDD905 


00650 




CALL 


5D9H 


707C 


7E 


00660 




LD 


A,(HL) ;NO LEADING BLANKS, PLEASE 


707D 


FE20 


00670 




CP 


i ■ 


707F 


28ED 


00680 




JR 


Z,NOPE 


7081 


FE0D 


00690 




CP 


0DH ;OR NULL FILENAMES 


7083 


28E9 


00700 




JR 


Z,NOPE 


7085 


F3 


00710 




Dl 


;NO INTERRUPTS FOR I/O 


7086 


AF 


00720 


YUP 


XOR 


A ; CASSETTE DRIVE 


7087 


CD1202 


00730 




CALL 


212H 


708A 


3E2A 


00740 




LD 


A, 1 *' 


708C 


323E3C 


00750 




LD 


(3C3EH),A ;PUT ON ASTERISKS 


708F 


323F3C 


00760 




LD 


(3C3FH) ,A 

287H ;WRITE LEADER & SYNC 


7092 


CD8702 


00770 




CALL 


7095 


3E55 


00780 




LD 


A,55H ; "SYSTEM" TAPE HEADER 


7097 


CD6402 


00790 




CALL 


26 4H ; WRITE BYTE 


709A 


0606 


00800 




LD 


B,6 ;6 BYTE FILENAME 


709C 


213672 


00810 




LD 


HL,DCB 


709F 


CD4371 


00820 


FLOOP 


CALL 


GETBYT 


70A2 


CD6402 


00830 




CALL 


26 4H 


70A5 


10F8 


00840 




DJNZ 


FLOOP 

Listing 1 continues 



80 Micro, January 1983 • 233 



Most Disk-Directories show only 
the filespecs plus some hard-to- 
understand superfluous infor- 
mation. Our 

DISK-MENU & 
DIRECTORY 

DISPLAYS DETAILED DESCRIPTION 

OF EACH PROGRAM 

ON A DISKETTE, 

f ilespec and date of creation. 

SELECT & RUN PROGRAMS 

INSTANTLY. 

(For Model l/lll. all systems) 



{ 29 



95 



+ 1 5 ° 



shipping & handling 



INTERNATIONAL 
COMPUTER PRODUCTS 

346 NO. WESTERN AVE. 
LOS ANGELES, CALIF. 90004 



COLOR COMPUTER 




• • JOYSTICKS • • 

Tired of broken joysticks? Our affordable units are 
built to last, with good smooth pots, and a strong lever 
and internal mechanism. These are superior to the 
Radio Shack design. Get your joystick programs 
working the way they should! 

Up to 20% OFF on software. 

We stock excellent programs from 
Prickley Pear, Tom Mix, Mark Data, and Others. 

KONG IS COMING! 

Write or call for free catalog. 
Add $2.00 shipping on Joysticks. We pay shipping on 
software. *1.50 additional for C.O.D. 



ENDICOTT SOFTWARE 
P. O. Box 12543, Huntsville, AL 35802 

5 205/881-0506 



^283 



EPSON MX-80 

CARTRIDGE RIBBONS 

MINIMUM ORDER 3 



$700 



LABELS 

I5 /i 6 x3y 2 Pin- fed white 

PRESSURE SENSITIVE 

Minimum Order I up - 5,000; 

2up - 10,000; 3up - 15,000. 4up - 20,000 



$2.99 

per M 



PAPER 

20# white 

1250 shcels 



$20. 00 



Prices Include Shipping! 

Check must accompany orders. 

Ohio residents ,idd 0- . Sales Tjx 

COMPUTER SALES AND SUPPLIES 
P.O. Box 02294 - Cleveland, OH 44102 

(216) 281-8820 ^ 



Listing 


continued 












70A7 


215673 


00850 




LD 


HL r STORAG ; BUFFER TO DECODE 


70AA 


CD4371 


00860 


RELOOP 


CALL 


GETBYT 


GET LOADER CODE 


70AD 


FE01 


00870 




CP 


1 


OK TO LOAD? 


70AF 


280A 


00880 




JR 


Z , NORMAL 


;JUMP IF SO 


70B1 


FE02 


00890 




CP 


2 


END? 


70B3 


2838 


00900 




JR 


Z, FINIS 




70B5 


FE05 


00910 




CP 


5 


SKIP? 


70B7 


284D 


00920 




JR 


Z,SKIP 


SKIP X BYTES 


70B9 


185A 


00930 




JR 


STUPID 


FUNNY CODE/WRONG FORMAT 


70BB 


3E3C 


00940 


NORMAL 


LD 


A,3CH 


START OF RECORD CODE 


70BD 


CD6402 


00950 




CALL 


26 4H 




70C0 


CD4371 


00960 




CALL 


GETBYT 




70C3 


3D 


00970 




DEC 


A 


COMPENSATE FOR NOT 


70C4 


3D 


00980 




DEC 


A 


COUNTING ADDRESS AS DATA 


70C5 


CD6402 


00990 




CALL 


264H 


WRITE BYTE COUNT 


70C8 


47 


01000 




LD 


B,A 


SET UP FOR LOOP 


70C9 


CD4371 


01010 




CALL 


GETBYT 


GET LSB OF ADDRESS 


70CC 


5F 


01020 




LD 


E,A 




70CD 


CD6402 


01030 




CALL 


264H 




70D0 


CD4371 


01040 




CALL 


GETBYT 


GET MSB 


70D3 


57 


01050 




LD 


D,A 




70D4 


CD6402 


01060 




CALL 


26 4H 




70D7 


83 


01070 




ADD 


A,E 




70D8 


4F 


01080 




LD 


C f A 


INITIALIZE CHECKSUM 


70D9 


CD4371 


01090 


PLOOP 


CALL 


GETBYT 


MAIN DATA LOOP 


70DC 


CD6402 


01100 




CALL 


26 4H 




70DF 


81 


01110 




ADD 


A,C 


COMPUTE CHECKSUM 


70E0 


4F 


01120 




LD 


C,A 




70E1 


13 


01130 




INC 


DE 


BUMP CHECKSUM ADDRESS 


70E2 


10F5 


01140 




DJNZ 


PLOOP 




70E4 


79 


01150 




LD 


A,C 


GET CHECKSUM 


70E5 


CD6402 


01160 




CALL 


264H 


AND WRITE 


70E8 


CD2C02 


01170 




CALL 


22CH 


BLINK * 


70EB 


18BD 


01180 




JR 


RELOOP 


DO 'TIL DONE 


70ED 


CD4371 


01190 


FINIS 


CALL 


GETBYT 


DISCARD DUMMY BYTE 


70F0 


3E78 


01200 




LD 


A,7 8H 


TRANSFER CODE 


70F2 


CD6402 


01210 




CALL 


264H 




70F5 


CD4371 


01220 




CALL 


GETBYT 


•LSB OF TRANSFER ADDRESS 


70F8 


CD6402 


01230 




CALL 


26 4H 




70FB 


CD4371 


01240 




CALL 


GETBYT 


MSB OR TRANSFER 


70FE 


CD6402 


01250 




CALL 


26 4H 




7101 


CDF801 


01260 




CALL 


01F8H 


CASSETTE OFF 


7104 


1817 


01270 




JR 


AGAIN 


RECOPY? 


7106 


CD4371 


01280 


SKIP 


CALL 


GETBYT 


GET BYTES TO SKIP 


7109 


47 


01290 




LD 


B,A 




710A 


CD4371 


01300 


SKIP1 


CALL 


GETBYT 


& SKIP 


710D 


10FB 


01310 




DJNZ 


SKIP1 




710F 


1899 


01320 




JR 


RELOOP 




7111 


FB 


01330 


NOMORE 


EI 


INTERRUPTS ON 


7112 


C32D40 


01340 




JP 


402DH 




7115 


211D72 


01350 


STUPID 


LD 


HL,DUMB 




7118 


CD4671 


01360 




CALL 


DISPLY 




711B 


18F4 


01370 




JR 


NOMORE 




711D 


21C071 


01380 


AGAIN 


LD 


HL,COPMSG 


7120 


CD4671 


01390 




CALL 


DISPLY 




7123 


CD2B00 


01400 


KYLOOP 


CALL 


2BH 


SCAN KYBD 


7126 


FE59 


01410 




CP 


i y i 


COPY AGAIN? 


7128 


2806 


01420 




JR 


Z, FORSUR 


;YEA, VERILY 


712A 


FE4E 


01430 




CP 


*N' 


SAY THEE NAY? 


712C 


28E3 


01440 




JR 


Z , NOMORE 


; GUESS SO 


712E 


18F3 


01450 




JR 


KYLOOP 


KEEP ON SCANNIN' 


7130 


CDC901 


01460 


FORSUR 


CALL 


01C9H 


CLS 


7133 


21DF71 


01470 




LD 


HL,PMSG 


"PRESS ENTER" 


7136 


CD4671 


01480 




CALL 


DISPLY 




7139 


CD2B00 


01490 


KYLP 


CALL 


2BH 




713C 


FE0D 


01500 




CP 


0DH 


ENTER? 


713E 


20F9 


01510 




JR 


NZ,KYLP 


•WAIT 'TIL PRESSED 


7140 


C38670 


01520 




JP 


YUP 


•OTHERWISE, DO IT AGAIN 


7143 


7E 


01530 


GETBYT 


LD 


A, (HL) 




7144 


23 


01540 




INC 


HL 




7145 


C9 


01550 




RET 






7146 


7E 


01560 


DISPLY 


LD 


A, (HL) 




7147 


B7 


01570 




OR 


A 




7148 


C8 


01580 




RET 


Z 




7149 


CD3300 


01590 




CALL 


33H 




714C 


23 


01600 




INC 


HL 




714D 


18F7 


01610 




JR 


DISPLY 




714F 


Fl 


01620 


ERROR 


POP 


AF 


•DUMMY POP 


7150 


21FC71 


01630 


ERROR1 


LD 


HL,ERRMSG 


7153 


CD4671 


01640 




CALL 


DISPLY 




7156 


18B9 


01650 




JR 


NOMORE 




7158 


0D 


01660 


HIMSG 


DEFB 


0DH 




7159 


44 


01670 




DEFM 


'DSAVE VERSION 2.0 COPYRIGHT 












(C) 1981 


T OP DOG SOFTWARE' 


718E 


0D0D 


01680 




DEFW 


0D0DH 




7190 


00 


01690 




DEFB 







7191 


45 


01700 


FILMSG 


DEFM 


'ENTER FILESPEC > ' 














Listing 1 continues 
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80 Micro does not keep subscription 
records on the premises, therefore 
calling us only adds time and doesn't 
solve the problem. 

Please send a description of the prob- 
lem and your most recent address 
label to: 

BOmicro 
Subscription Dept. 
PO Box 981 
Farmingdale, NY 11737 



Thank you and enjoy your subscription. 



Quatrk Computer Systems, Inc. 

P.O. Box 638 

Bixby, Oklahoma 74008-0638 

(918) 369-1359 

TAX PROGRAMS FOR TRS-80 MOD III 

Complete programs lor lax preparers only. 

Programs (screen print only) lor anyone who wants lo do their taxes 

on the TRS-80 MOD III. 

BASIC PACKAGE 



SYSTEMS 

FORW 1040 - U.S. INDIVIDUAL TAX REruHN 
SCHEDULE A & SCHEDULE fi 
TAX PREPARER'S WAIVER & INVOICING 

FEATURES 

MENU DRIVEN PROGRAMS 

DIRECT PRINTING OP THE CORMS & 

DOT MATRIX PRINTERS 
THE I040 FORM REQUIRES PROPER SI 
ALL TAX RECORDS ARE STORED ON DISK 

COST 

TAX PREPARERS BASIC PACKAGE 

SCREEN PRINT ONLV 

MANUAL « PRINT OUTS ON THE IDS PRINTER 

ADDITIONAL SCHEDULES {'requires exti 

SCHEOULE C 

SCHEDULED 

SCHEDULE E 

SCHFDUIEF 

SCHEDULE G 



•EXTENDED SYSTEM REQUIREMENTS 
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WORD GAMES 

• CROSWORD • WORD WIZ 

• SENTENCEER 

Challenging, educational, mind-boggling, 
entertaining. These word games are designed to 
run on TRS-80 Model I, III, 16K. Fast paced 
games for one or two players. 
Excellent for schools. 
CROSWORD $1 1 .95 Ea. 
WORDWIZ & SENTENCEER $9.95 Ea. 
Add $1.50 for shipping. 
(Games are supplied on tape) 

• PERFIN 
Your Personal Finance Program 

No red tape docu mentation! Computes & compares 
your wealth or finances in seconds. A quick 
balance sheet showing how you are doing. Runs 
on model I, III, 1 6K (Disk only). 

PERFIN $1 1 .95 Ea. plus $1 .50 shipping 
All products sold with money back guarantee 
Send for free brochure. ^ 248 

SHIRLEY SOFTWARE 

P.O. BOX 41 7 OLD GREENWICH, CT 06870 




PRESERVE 

micro 

BINDERS 
&FILE 
CASES 

Keep your issues of 80 Micro together, handy and 

protected in handsome and durable library files or 

binders. Both styles bound in dark green leathe- 

ette with the magazine logo stamped in gold. 

Files: Each file holds 6 issues, spines visible for easy ref- 
erence, $5.95 each, 3 for $17.00. 6 for $30.00 

Binders: Eoch binder holds 6 issues and opens flat for 
easy reading. $7.50 each, 3 for $21.75, 6 for $42.00 

(Postage paid in USA. Foreign orders include $2.50 per 

item) 

Please state years: 1980 to 1983 

Send check or money order to: 

JESSE JONES QOX CORP. 

P.O. Box 5120 

Philadelphia, PA 19141 
Please allow 6-8 weeks for delivery 



Unlimited 
Scripsit Backup 

Version 3.2 on Model III TRSDOS*1.3 

Why Pay More? 

For Just S5 ^ ou ^- an C°Py Your 
SCRIPSIT As Many Times As You Like 

Send $5 With 

Your Name and Address to: 

LANGIN- HOOPER ASSOCIATES 

18 MARVIN LANE 

PISCATAWAY 

NEW JERSEY, 08854 

(201)463-0189 9a.m. -9p.m. daily 
^trademarks of Tandy Corporation 

This product is for personal use only. It is not moant 
tor distribution or sales. 

^•340 



TAXPRO 

Videotronics of Sarasota, Inc. 

4086 Honolulu Dr. - Sarasota, FL 
813-953-2332 33583 

The most complete and corrective tax 
program seen yet. Will do schedules: 
1040, A, B, C, D, 4197, SE, G 

Automatic transfer of figures from one form to another. 
Make corrections and watch the changes ripple down 
the lines to readjust all affected figures. 

Calculates Taxes Automatically. Also 
does income averaging. All with printout 
on Nelco form. 

Model 1/111 48K 

Disk 199.95 

Updates 110.00 

Cass/No printout 1 50.00 

Update 60.00 
With instructions 



PROFESSIONAL-GRADE SOFTWARE 



TRS-80 MODEL I 

CATALOG 48K, 1 Disk 

Indexes disks and files of any type or 
system. Very fast, 2500 file capacity, 
single and double density. 

$69.50 
EP-GRAPHICS 48K, 1 Disk 

Epson 80 with GRAFTRAX, or 100 
becomes printer/plotter. 512 x 512 or 480 
resolution fills page. Machine language 
major software, call from short BASIC 
program. 

$79.50 



TRS-80 MODELS 

TUMBLE 48K, 1 Disk 

Control spin, speeds and tilts of moving 
3-D geometric shapes. Real-time, fast 
screen displays teach and entertain. 

$39.50 

GANTT-PACK 48K, 2 Disk 

Projected, elapsed and over-run project 
schedules charted on screen/132 column 
printer. Random entry, automatic organi- 
zation, fast update/edit. Play "what if..." 

$149.50 




LIBRA LABORATORIES 

495 MAIN STREET 

METUCHEN, NEW JERSEY 08840 

(201) 494-2224 .131 



TRS-80 MODEL II 

STAT-TO-PLOTTER 64K, 1 Disk 
Program merges into R.S. Statistical 
Analysis package. Puts statistical work 
directly to R.S. plotter or other HI-PLOT 
3-7. Publication quality charts, ^qq ,-„ 

FILE CARD 64K, 1 Disk 

Look up records by powerful database 
and immediately see/print the text. In- 
finitely long text area for any entry. 
Replaces file card system. .... _. 

o>^4. bU 

GANTT-PACK 64K, 2 Disk 

Enhanced version, early and late entries, 
expanded capacity. 

$224.50 



TRS-80 Trademark of Tandy Corporation 
HI-PLOT Trademark of Houston Instruments 
Epson Trademark of Shinshu Seiki Co., Ltd. 
Libra Laboratories' programs copyright 1981, 1982. 



sSee List of Advertisers on Page 435 
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Listing 


1 continued 










71A5 


00 


01710 




DEFB 





71A6 


45 


01720 


ENTMSG 


DEFM 


'ENTER TAPE FILENAME > ' 


71BF 


00 


01730 




DEFB 





71C0 


0D 


01740 


COPMSG 


DEFB 


0DH 


71C1 


44 


01750 




DEFM 


'DO YOU WISH TO RECOPY? (Y/N) ' 


71DD 


0D 


01760 




DEFB 


0DH 


71DE 


00 


01770 




DEFB 





71DF 


50 


01780 


PMSG 


DEFM 


'PRESS =ENTER= TO WHEN READY' 


71FA 


0D 


01790 




DEFB 


0DH 


71FB 


00 


01800 




DEFB 





71FC 


0D 


01810 


ERRMSG 


DEFB 


0DH 


71FD 


44 


01820 




DEFM 


'DISK ERROR - FUNCTION ABORTED. ' 


721B 


0D 


01830 




DEFB 


0DH 


721C 


00 


01840 




DEFB 





721D 


0D 


01850 


DUMB 


DEFB 


0DH 


721E 


49 


01860 




DEFM 


'INCORRECT FILE FORMAT I ' 


7234 


0D 


01870 




DEFB 


0DH 


7235 


00 


01880 




DEFB 





0020 




01890 


DCB 


DEFS 


32 


0100 




01900 


BUFFER 


DEFS 


256 


7356 




01910 


STORAG 


EQU 


$ 


7000 




01920 




END 


START 


00001 


TOTAL 


ERRORS 









7000 




00100 


START 


ORG 


7000 H 




7000 


21003C 


00110 




LD 


HL.3C00H 


VIDEO MEM LOC 


7003 


11013C 


00120 




LD 


DE.3C01H 


VIDEO MEM +1 


7006 


01FF03 


00130 




LD 


BC.3FFH 


BYTE COUNT 


7009 


36BF 


00140 




LD 


(HL),0BFH 


WRITEACHR$(191) 


700B 


EDBO 


00150 




LDIR 




ZAP!! 


700D 


C30D42 


00160 




JP 


402DH 


JUMP TO DOS 


7000 




00170 


END 


START 












Program Listing 2 





adding each data byte to the 
previous data byte, after initially 
adding the low order memory lo- 
cation of where it is supposed to 
go. This way, the computer cal- 
culates its own checksum byte 
from the loaded data block and 
compares it with the one on 
tape. If they differ, there has 
been a loading error and C is dis- 



played next to the blinking as- 
terisk on the screen. The record 
byte/data/checksum format is 
repeated until the entire pro- 
gram is loaded. DOS files of any 
type do not need checksum 
bytes, as the floppy disk con- 
troller performs error checking 
and checksumming. Unfortun- 
ately, Basic (CSAVE) and data 
tapes have none. 

Just like DOS, the last code 
loaded is the 78H transfer code. 
The execution address follows, 
where the program is executed 
and the process is complete. 

DSAVE/CMD's code has plen- 
ty of comments, so the flow of 
the program should become 
clear. DSAVE also writes /SYS 
files to tape, as the format for 
/SYS and /CMD files is basically 
the same. To use the program, 
just follow the prompts. DSAVE 
supports multiple copying as 
well as error checking for DOS 
errors and file format errors. Try 
converting a Basic or ASCII file 
and see what happens. Feel free 
to modify this program to fit 
your own needs. ■ 




TRS-80 MODEL II 

£^3000 



TRS-80 MODEL 16 

128-K$ 



48K$ri|Qf-f% 16 - K $Q4 Q 
26-1066 I 9W^/26-1062O I W 

WITH 2 DISK RS-232 TAPE VERSION 

(ALL RADIO SHACK EQUIPMENT) 



8.4 MEGABYTE HARD DISKS (PRIMARY UNIT) $4000. 



WE ALSO CARRY EPSON AND OKIDATA 
PRINTERS, XEROX 820 AND 

ALTOS COMPUTERS. 
NO OUT-OF-STATE TAXES. 

Sold with the manufacturer's limited warranty. Copies 

of such warranty may be obtained for review from 

Perry Oil and Gas Co. 



WE ACCEPT 

CERTIFIED CHECKS, 

CASHIERS CHECKS 

AND MONEY ORDERS. 




TRS-80 COLOR 



$ 

26-3004 



16-K 



309 



16-K $4.9 B 32-K $ 
26-3002 *»fcW 26-3003 



COLOR DISK DRIVES 

o $ 475 1-2-3*315 



T.M.TANDY CORP 



PERRY OIL & GAS INCORPORATED 

Dept. No. A-1 137 NORTH MAIN ST., PERRY. MICHIGAN 48872 

PHONE (517) 625-4161. MICH " 124 

FOR OUR PRICES, PLEASE CALL TOLL FREE 1 -800-248-3823 
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Peripherals 
Unlimited. 



FANTASTIC PRICES! 

OUR FAST SERVICE, PRODUCT 
SELECTION AND OUR CUSTOMERS' 
SATISFACTION MAKE US #1. 



Microsoft Z-80 Softcard 
Microsoft RAMCARD 
Z-90-64K DO 
Z-1 9 Terminal 
Z-121 Monitor 12" 



$214 

$129 

$2588 

$777 

$149 



ATARI COMPUTERS 




Atari 800 16K 


$649 


Atari 400 


$318 


Atari Interface Module 


$174 


Atari 810 Single Disk 


$444 


Atari 830 Modem 


$166 


Programmer 


$59 


Entertainer 


$84 


Star Raiders 


$34 


16K Mem. Exp. for Atari 


$74 


32KMem. Exp. for Atari 


$114 



NEC PRINTERS 



7710/30 Spinwriter R/O 
7720SpinwriterKSR 
3510/30 Spinwriter R/O 



$2295 
$2649 
$1689 



NEC DOT MATRIX 
PC-8023 $474 

Call for prices on ribbons, etc. 



OKIDATA & MORE 




OkidataMicroline82A 


$459 


OkidataMicroline83A 


$699 


Okidata Microline 84 (P) 


$1069 


Okidata Microline 84 (S) 


$1099 


Tractor(OKI80&82only) 


$60 


Diablo 620 


$1239 


Diablo 630 


$1999 


IDSMicroprism 


$ 539 



AMDEK & NEC MONITORS 




Amdek 12" 300 GRN Phospor 


$149 


Amdek13"Colorl 


$319 


Amdek 13" Color II 


$739 


Amdek 13" Color III 


$429 


NEC J B1 201 GRN Phosphor 


$149 


NEC JC1201 Color 


$339 



EPSON PRINTERS 




MX-80 w/Graphtrax Plus 


$469 


MX-80FT (Friction & Tractor) 


$529 


MX-1 00 (15" Carriage) 


$699 


Grappler Interface 


$129 


Call for prices on 




Ribbons, Cables and Interfaces 


NEC-PC 8000 




Series Microcomputer 




PC-8001 A Computer w/32K 


$888 


PC-8012Aw/32K + Exp. Slots 


$588 


PC-8031A Dual Mini Disk 


$888 


PC-8032A Addon Mini Disk 


$777 


Call for Software Prices 





FOR THE LOWEST 
PRICE CALL 

TOLL FREE 

1-800-343-4114 

ORDERING INFORMATION 

Our order lines are open 9AM to 6PM 
EST Monday thru Friday. Phone 
orders are welcome; same day ship- 
ment on orders placed before 10AM. 
Free use of Mastercard and VISA. Per- 
sonal checks require 2 weeks 
clearance. Manufacturer's warranty 
included on all equipment. Prices sub- 
ject to revision. C.O.D.'s accepted. 

For service, quality and delivery call: 

PERIPHERALS UNLIMITED 

(617)655-7400 

62 N. Main St.* Natick, MA 01760 



^272 



■See List ol Advertisers on Page 435 
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TECHNIQUE 



LOAD 80 



Windchill Determiner 



by John L. Cranmer, Jr. 



I used to know how cold I was by 
simply going outside. Then I used the 
windchill factor to know how cold I was 
through scientific measurements based 
on the outside temperature and wind 
speed. Now, with microcomputers, you 
can determine precisely how uncom- 
fortable you are going to be without re- 
sorting to the interpolation of charted 



Now you have a way to 
determine just how 
cold you will be on those 
frosty winter mornings. 



VARIABLE 


USE 


A 


UNITS FLAG 




1: SYSTEM INTERNATIONALE 




2: US SYSTEM 


TF 


TEMPERATURE (DEGREES FAHRENHEIT) 


AT 


TEMPERATURE (DEGREES CENTIGRADE) 


VM 


WIND VELOCITY (MILES PER HOUR) 


V 


WIND VELOCITY (METERS PER SECOND) 


H 


HEAT LOSS (kcal/mVhour) 


TA 


EQUIVALENT TEMPERATURE (DEGREES CENTIGRADE) 


FT 


EQUIVALENT TEMPERATURE (DEGREES FAHRENHEIT) 


A$ 


DESCRIPTION OF OUTSIDE CONDITIONS BASED UPON 




HEAT LOSS RATE 'H' 




Table 1 







Program Listing 


100 


********************************************************** 


110 


* 


TRS-80 MODEL III MICROCOMPUTER PROGRAM * 


120 


* 


TO DETERMINE * 


130 


* 


EQUIVALENT WIND CHILL TEMPERATURE * 


140 


* 


FROM WIND VELOCITY AND TEMPERATURE INPUTS * 


150 


* 


* 


160 


* 


BY JOHN L. CRANMER, JR. P.E. * 

Listing continues 



values. 

The first step in determining the 
equivalent temperature is the calcula- 
tion of the heat loss from exposed skin 
due to the combined effects of wind 
speed and air temperature. The equa- 
tion, as determined from human physi- 
ological studies, is: 

H = ((33-T)x (10.45 + (10 x v'vj-V)) 
where: H =heat loss in kcal/mVhr 
T = air temperature in degrees centigrade 
V = wind speed in meters/sec 

Once H has been calculated, you can 
calculate the equivalent temperature 
from the following equation: 

ET = 33-(H/22.034) 

where: H =heat loss in kcal/mVhr (from 

the first equation) 

ET = equivalent temperature in degrees centigrade 

The divisor (22.034) in the second 
equation has not been determined for a 
zero value of wind speed, but for a 
value of 4 mph (1 .788 m/s) — the value 
that has been determined as the thresh- 
old value for windchill effects, and on 
which most published windchill charts 
are based. 

Based upon the calculated value of 
H, another, more subtle evaluation of 
the conditions can be made. The follow- 



The Key Box 

Model III 
16K, 32K 
Cassette or Disk Basic 
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<ulations 

for the" 80s'... 



T80-FS1 




Simulator 

The realism of "out-the-window" flight can be yours with 
this challenging simulation that will excite beginners and 
test experienced pilots. On cassette, $25.00. 
On enhanced disk (increased world projection rates, 
10-frame-per-second approach mode, infinite horizon, 
hit/crash detection, and more), $33.50. For Model I or 
III: please specify since the media are different. 
All versions require 16K. 



T80-SG2 



Forest Fire 
Dispatcher 

Also challenging and realistic, Forest Fire Dispatcher 
features the ease of operation that lets you concentrate 
your energy and imagination on the job at hand: saving 
forests as efficiently as possible. A naturally deep 
strategy game for years of pleasurable interaction. On 
cassette, $24.95 (16K required). On disk, $29.95 
(32K required). Specify Model I (Level 2 BASIC) or 
Model III. 




See your dealer I 



For direct order, include $1.50 and indicate UPS or first class mail. Illinois 
residents add 5% sales tax. Visa and MasterCard accepted. 
If you don't yet own a disk, don't fret. You can upgrade anytime. 
Cassette users may send back their cassette (but not the manual) along 
with $10 (first class shipping included) and receive the disk version. 

mofeLOGIC -„ 

Communications Corp. 
713 Edgebrook Drive 
Champaign, I L 61820 
,J (217)359-8482 
Telex: 206995 



ing chart describes the weather condi- 
tions for the various values of H: 



H 



0-200 

200-400 

400-600 

600-800 

800-1,000 

1,000-1,200 

1,200-1,400 

1,400-2,000 

2,000-2,300 

2,300 - 3,000 



Weather Description 

Hot 

Pleasant 

Cool 

Very Cool 

Cold 

Very Cold 

Bitterly Cold 

Exposure Disagreeable 

Exposure Dangerous 

Survival Uncertain 



The above descriptions are subjective 
evaluations and are averages for a 
number of subjects. Individuals will 
probably vary from this norm. 

The program is designed for a Model 
III using Disk Basic, but it should also 
run on Level II, since none of the extra 
features of Disk Basic have been used. 
Lines 200-390 represent the input sec- 
tion of the program, with data being 
entered in either SI or US units (data 
entered in US units will be converted to 
SI for calculations). Lines 400-530 are 
the calculation portion of the program. 
Lines 540-660 are the output portion of 
the program and will display the output 
in the same units (SI or US) as entered. 
Line 410 represents the computer allow- 
ing for the threshold value of wind 
speed. The POKE command in line 200 
is for the Model III only, as it controls 
the screen scroll protection. Table 1 lists 
the program variables and their corre- 
sponding units. ■ 



John Cranmer lives at P.O. Box 265, 
Van Horn, TX 79855. 
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* VAN HORN, TEXAS * 

********************************************************** 



271 
281 
29f 
301 
311 



CLS: PRINT: POKE 16916,3 

WIND CHILL FACTOR" 



'TEMPERATURE AND WIND VELOCITY CAN BE" 
'ENTERED IN METRIC OR US UNITS" 
'ENTER <1> FOR METRIC OR <2> FOR US" 



191 
20{ 

210 PRINT 
220 PRINT 
230 PRINT 
240 PRINT 
250 PRINT 
260 INPUT A 

IF A < 1 OR A > 2 THEN PRINT "TRY AGAIN": GOTO 250 

IF A = 1 THEN GOTO 360 

PRINT "ENTER AIR TEMPERATURE (DEGREES FAHRENHEIT)?" 

INPUT TF 

AT = (5 * (TF - 32) )/9 
320 PRINT "ENTER WIND VELOCITY (MILES PER HOUR)?" 
330 INPUT VM 
340 V = VM * .4470 
350 GOTO 400 
360 PRINT "ENTER AIR TEMPERATURE (DEGREES CENTIGRADE)?" 



370 


INPUT AT 


380 


PRINT "ENTER WIND VELOCITY (METERS PER SECOND)?" 


390 


INPUT V 


400 


H = 


■ 


33 - AT)*(10.45 + (10 * SQR(V)) - V) 


410 


IF 


V 


<= 1.788 THEN TA = AT:GOTO 430 


420 


TA 


= 


33 - (H/22.034) 


430 


IF 


A 


= 2 THEN FT = (9*TA/5) + 32 


440 


IF 


H 


> AND H <= 200 THEN AS = "HOT" 


450 


IF 


H 


> 200 AND H <= 400 THEN A$ = "PLEASANT" 


460 


IF 


H 


> 400 AND H <= 600 THEN A$ = "COOL" 


470 


IF 


H 


> 600 AND H <= 800 THEN A$ = "VERY COOL" 


480 


IF 


H 


> 800 AND H <= 100 THEN A$ = "COLD" 


490 


IF 


H 


> 1000 AND H <=1200 THEN A$ = "VERY COLD" 


500 


IF 


H 


>1200 AND H <=1400 THEN A$ = "BITTERLY COLD" 


510 


IF 


H 


>140 AND H <=2000 THEN A$ = "OUTSIDE EXPOSURE DISAGREE 


ABLE" 






520 

S" 

530 


IF 


H 


>2000 AND H <=2300 THEN A$ = "OUTSIDE EXPOSURE DANGEROU 


IF 


H 


>2300 THEN A$ = "OUTSIDE SURVIVAL UNCERTAIN" 


540 


CLS 




550 


IF 


A 


= 1 THEN GOTO 610 


560 


PRINT "OUTSIDE TEMPERATURE IS: " ; TF ; " DEGREES FAHRENHEIT" 


570 


PRINT "WIND VELOCITY IS: n ;VM;" MILES PER HOUR" 


580 


PRINT 



590 PRINT "EQUIVALENT OUTSIDE TEMPERATURE IS: ";:PRINT USING "## 

##"; FT; : PRINT " DEGREES FAHRENHEIT" 

600 GOTO 650 

610 PRINT "OUTSIDE TEMPERATURE IS: ";AT;" DEGREES CENTRIGRADE" 

620 PRINT "WIND VELOCITY IS: ";V;" METERS PER SECOND" 

630 PRINT 

640 PRINT" EQUIVALENT OUTSIDE TEMPERATURE IS: ";:PRINT USING "### 

#";TA; :PRINT " DEGREES CENTIGRADE" 

650 PRINT "OUTSIDE CONDITIONS ARE: ";A$ 

660 END 



PRICE BREAKTHROUGH 

100% RS COMPONENTS, NO FOREIGN DRIVES OR MEMORY — FULL WARRANTY 



MOD III 48K 
2 Drives RS232 

s 1795 





MOD II 64K 
1 Drive 



$2499 



CASHIERS CHECK OR MONEY ORDER MUST ACCOMPANY ALL ORDERS. 

(817) 825-4027 

NOCONA ELECTRONICS • P.O. Box 593 • Nocona.TX 76255 
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TAS Adventure Series 
Package I 

By: Gary Heimburger and Gary Robinson 

(This adventure package is the first to be marketed 
that was created by The Adventure System! Look lor 
more fantastic adventures coming soon! Each TAS 
adventure package includes TWO complete 
adventures for one low price!) 

Adventure 1: Isles of Doom - Part I 

The Scenario: A small South-sea island chain. 
Unfortunate navigation left you stranded on one 
island. 

The Mission: (if you can get through the shark- 
infested waters to the island!) The island was a 
scene of activity during WWII. Scattered over the 
island are components that will allow you to fix an 
old radio transmitter. Can you fix it and tap out your 
SOS before falling prey to the elements of doom? 

Adventure 2: Lost City of Gold 

The Scenario: You're on a mountain climbing 
expedition in South America (in Peru, near Lake 
Titicaca). After straying from the beaten path, you 
discover a cave that eventually leads to a forgotten 
part of the lost Incan city. Grab your pitons. 
The Mission: There are plenty of treasures if you 
can safely collect them and retrace your steps to the 
simple mountain hut. Be forwarned that most Incan 
cities contain many perils, especially for the 
uninitiated.. .seems Incan priests were rather 
paranoid. Requires 32K. 

TAS Adventure Packages are $15.95 on tape 
and $1 9.95 on disk. All media is unprotected! 
TAS Adventures allow you to SAVE up to 10 
versions of the game in progress! Please 
specify Model I or III. 



Get in on the action! The Adventure System 
editor is now completely in Z80 and allows 
easy interactive debugging. Requires 48K. 
Specify Tape or Disk, please. Only $39.95 tor 
the complete system AND three adventures! 



STOPPER! 

The BASIC Breakpointer 

By Roxton Baker 

Author of TRAKCESS" 

Stopper is a unique machine language utility 
that allows interactive program debugging 
when using Level II or Disk BASIC on the 
Model I and III. Stopper was designed by 
Roxton to help debug a new version of 
TRAKCESS that will be announced shortly, 
because there wasn't anything on the 
market that would provide the features 
needed. 

Some of Stopper's commands: Set a 
breakpoint with a "hit" count, either when a 
line has been executed "n" times or a 
variable is equal a certain value; or not equal 
a certain value; breakpoints and variables 
may be viewed and modified at any time; 
selective execution of program statements 
and lines; display only the portion of the line 
where the error occurred; TRON functions 
are improved and may be routed to printer; 
set a "tolerance" on single and double 
precision numbers (to accommodate the 
inaccurate ROM routines and more. 
Naturally single stepping is fully supported. 
With STOPPER you will know exactly where 
the error is and why it occurred. Program 
execution is under YOUR control! 
A special offer from the author and TAS: 
Stopper is $20 on tape or disk, BUT you are 
licensed to make up to four additional 
copies, making the cost for this valuable 
utility only $4. Support co-op purchases by 
ordering today. BASIC debugging will never 
be easier, nor a better utility any cheaper. 
Extra manuals and Z80 source code are 
available. 



LDOS Users! 

A special utility package just for YOU: 

DRIVE-5 
Four drives not enough? DRIVE-5 is a memory 
based disk emulator which allows you to configure a 
fifth drive IN MEMORY! No moving parts, so access 
is FAST! In a two drive system, FORMAT and 
BACKUP can be placed on DRIVE-S (with /SYS 
modules) to allow multiple backups with less disk 
swapping. 

LOWDUMP 

LOWDUMP allows you to DUMP files from 
anywhere in memory, including ROM and video 
RAM! LOWDUMP allows all parameters as the 
LDOS DUMP command, including ASCII, for 
dumping files without loader information present. 

SYSGEN 

SYSGEN/CMD allows you to save one or more 
SYSGEN files as normal /CMD files. Keep several 
configurations on the same disk and reload as 
necessary by simply typing the filename. Especially 
useful when the preferred configuration consumes 
so much memory that large programs will not 
execute properly. SYSGEN/CMD may also be 
executed from a running BASIC program. When the 
resultant /CMD file is executed, the BASIC program 
will continue with the next statement, all program 
variables intact! 

UNREPAIR 

Model I TRSDOS cannot read LDOS disks due to 
the F8 DAM used for directory sectors. UNREPAIR 
will rewrite the directory track of a single density 
disk using the FA DAM that will be recognized by 
Model I TRSDOS. UNREPAIR should run with any 
Model I DOS and the Radio Shack E/l. 

An extra BONUS! The TAS LDOS Utility pack 
includes Z80 source code (on disk) of most of the 
above utilities (the most informative). The LDOS 
Utility Pak is $49.95. This package was written by 
Les Mikesell. H 



= BRAND NEW! s 



HE 
M.TERNKTE 

__S#URCE 

EFFECTIVE 
COMMUNICATION 



is easy with Modem80. There is absolutely no need 
to pay any more for a top-quality communication 
package. Modem80 can help your TRS-80 Model I 
and III talk to a wide variety of machines. The 
Modem80 translation table is easily modified to 
accommodate unusual protocol. Modem80 allows 
file uploading and downloading. XON andXOFF are 
supported to allow transmission of files larger than 
memory. A special protocol (compatible with the 
CP/M public domain program MODEM) allows 
error-free transmission without converting to 
ASCII. XMODEM, a special version of MODEM is 
included so that you may give your friends a copy to 
take advantage of faster error-free transmission. A 
host program is included at no extra charge to allow 
accessing your unattended TRS-80 from a remote 
location. All "local" parameters (baud rate, stop 
bits, parity, duplex and more) can be changed 
quickly and easily with a minimum of keystrokes. 
For specialized applications, one file may be 
transmitted while a different file is simultaneously 
being received. DOS commands may be executed 
while within Modem80. Special patches insure 
compatibility with all popular Model I and III 
operating systems. The previous screen is restored 
after DOS commands. Modem80 also allows 
disabling screen scroll to permit transmission 
speeds at up to 9600 baud (under direct connect 
situations). A special patch sheet is available for 
people wanting to use the Micronet Dow Jones 
service. Also available, on request, is a LYNX 
modem version that allows operation on a Model III 
even if RS-232 is installed. All this and many more 
features are what's making Modem80 one of our 
most popular programs! Oh, yes, the price helps 
too: $39.95 complete including documentation in a 
three-ring binder. Modem80 is authored by Les 
£ Mikesell. 
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An exciting new arcade game! Threshold-Nine is 
easy, but only the experienced reach Threshold- 
Zero. As you progress to the faster levels, the 
playing field decreases! Excellent graphics and 
sound, joystick compatible, all Z80 programming! 
Supplied in a "back-uppable" format (disk users will 
need to copy to a TRSDOS system diskette). High 
scores are saved on the disk version. Includes a 
special "pause" feature (for nature calls and other 
interrupt processing). Works on Models I and III 
cassette ($15.95) and disk ($19.95). 

FREE to the first 100 customers who order 
Threshold-Zero: A mini-poster of the Threshold- 
Zero Cover Art! Order today and find out why 
Threshold-Zero is already one of our best selling 
games! 



i 



Order Form 



Please send me the following: 

□ TAS Adventure Package I (tape) $15.95 
D TAS Adventure Package I (disk) $19.95 
D The Adventure System (tape) $39.95 

□ The Adventure System (disk) $39.95 

D LDOS Enhancement Package $49.95 

□ Threshold-Zero (tape) $15.95 

□ Threshold-Zero (disk) $19.95 

D Stopper $20.00 

D Modem80 $39.95 



□ 



TAS Subscription $24.00 



Please add $3 to your total order for 
shipping (except TAS subscribers). 
We ship UPS unless you specify 
otherwise. 



Name: 

Address: . 
Address: . 

City: 

State, Zip: 



Mail order to: 

The Alternate Source 

704 N. Pennsylvania Ave. 

Lansing, Michigan 48906 

Ph. (800) 248-0284 

Ph. (517) 482-8270 

Master Card, Visa and COD ($1.75 extra) are welcome! 



sSee List of Advertisers on Page 435 
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UTILITY 



Supervisor calls and other tricks. 



Getting the Most from the 
Model II 



La Verne E. Olney 
1920 Brookside Road 
Kingsport, TN 37660 



Supervisor calls (SVCs), ma- 
chine code subroutines hid- 
den in inaccessible memory, are 
called by loading their number in- 
to the A register and performing 
a restart (RST 08H) instruction. 

The TRS-80 Owner's Manual 
was little help when I tried to use 
these calls. Thankfully, Radio 
Shack shed some light on this 
subject by describing the use of 
USR commands from a Basic 
program and programming with 
SVCs in the May and August 
1980 issues of TRS-80 Micro- 
computer News. The first article 
enabled me to selectively scroll 



part of the screen and the sec- 
ond routine blocks the Break 
key, disallowing access and in- 
terruptions to my program. I 
have incorporated these two 
subroutines as well as two 
others into the top 84 bytes of 
user memory. 

Break Disabler 

This subroutine will disable 
the Break key and prevent ac- 
cess to the program and its 
disruption by accidental use. To 
enter, save, and call this pro- 
gram, follow these steps: 

• After receiving the TRSDOS 
ready signal, type: DEBUG ON, 
then DEBUG. 

• Enter the subcommand M 
A = EFEO, then press the F1 
key. 

• Enter the hex code into the 
displayed memory positions, as 
shown in Fig. 1. 

• Press the F2 key, then S to 





Page Length 




Lines/Page 




Width 




Dec 


Hex 


ADDR 


Dec 


Hex 


ADDR 


Dec 


Hex ADDR 


Form 1 


66 


42 


EEBB 


60 


3C 


EEBD 


80 


50 EEBF 


Form 2 


42 


2A 


EEC7 


42 


2A 


EEC9 


80 


50 EECB 


Form 3 






EED3 






EED5 




EED7 


Form 4 






EEDF 






EEE1 




EEE3 



Table 1. Parameter Definition. Values in first two formats are 
used as examples 



return to TRSDOS. 

• Type: DUMP SETBRK/CIM 
START = EFEO, END = EFF3, 
TRA = EFE2, RORT = T then 
push Enter to save the program 
to disk. 

• Type and enter DEBUG 
OFF. 

• Type: BASIC — M:61100 to 
protect the segment of upper 
memory for the subroutines. 

You may then test the sub- 
routine by typing: SYSTEM 
"SETBRK/CIM" in a Basic pro- 
gram or directly in the command 
mode. Before invoking this rou- 
tine Debug must be off or con- 
trol will transfer to Debug. 

The Assembly code listing for 
this short subroutine is Program 
Listing 1. In essence, it replaces 
the resident break-processing 
routine with a simple return in- 
struction. There is currently no 
method to make the Break key 
work again using an SVC call. 
One must reset the computer to 
restore the Break key function. 

Scroll Protection 

Scroll protection is useful 
when displaying tables longer 
than 24 lines. Table headings re- 
main in the USR-call-protected 
upper screen while the table 
values to scroll below. 

This subroutine utilizes 



SCROLL (SVC 27). The number 
of lines to be protected will be 
passed in the USR argument. 
The Debug hexadecimal input is 
shown in Fig. 2, and Program 
Listing 2 shows the Assembly 
listing. Enter: 

• DEBUG ON <Enter> 

• DEBUG <Enter> 

• M A = EFD0 

• Press F1 

• Enter the hex codes shown 
in Fig. 2 

• Press F2 

• Press 'S' 

• DUMP SCROLL/CIM 
START = EFDO, END = EFDC, 
RORT = R<Enter> 

• BASIC — M:61 100 <Enter> 
The following program illus- 
trates this utility: 

10 SYSTEM "LOAD SCROLUCIM" 

20 DEFUSR0 = &HEFDO 

30 CLS 

40 X = USR0(2):REM Number of lines to 

protect = 2 
50 PRINT @0, "TABLE HEADING" 



The Key Box 

Model II 

64K RAM 

2.0 DOS 

1 or more Disk Drives 

Any Printer 
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'Scroll protection is useful 

when displaying tables 

longer than 24 lines." 



60 PRINT® 80, STRING$(13," = ") 

70 FOR I = 1 TO 80 

80 PRINT "VALUE";I 

90 FOR J = 1 TO 100 : NEXT : REM 

Delay loop 
100 NEXT 
110 END 

A CLS command will restore 
normal screen behavior. 

Formatted Input 

This subroutine controls op- 
erator input. It will prevent ex- 
cessive input from overwriting 
screen directives; prevent 
screen format scrolling by an 
improper input; allow precise 
control of file fields by specify- 
ing length; and allow selective 
editing of string data. 

The key to this subroutine is 
KBLINE (SVC 5). Its use is com- 
plicated, since it must be di- 
rected to a specific string mem- 
ory storage location and must 
receive and return arguments to 
the Basic USR statement. Pro- 
gram Listing 3 shows the As- 
sembly program and Fig. 3 illus- 
trates the. Debug hexadecimal 
input. Enter the program into the 
proper memory locations as 
previously described. Save this 
program after receiving the 
TRSDOS ready prompt by typ- 
ing: DUMP INPUT/CIM START = 
EF00, END = EF21, RORT = R. 
Again load Basic— M:61 100 and 
test the subroutine with the 
following program: 

10 SYSTEM "LOAD INPUT/CIM" 

20 DEFUSR1=&HEF00 

30 CLS 

40 INPUT "MAXIMUM LENGTH OF 
STRING FIELD";IL 

50 INPUT "PRINT AT SCREEN LOCA- 
TION";IP 

60 CLS 

70 S$ = SPACE$(IL) 

80 PRINT @ IP.;: X = USR1 
(VARPTR(S$)) 

90 PRINT "NUMBER OF INPUT CHAR- 
ACTERS, INCLUDING ENTER = ",X 
100 PRINT "LENGTH OF STRING, IN- 
CLUDING TRAILING SPACES = "; 
LEN(S$) 
110 PRINT "PUSH ANY KEY TO CON- 
TINUE"; 
120 IF INKEY$ = " " THEN 120 
130 GOTO 30 

Experiment with this program 
using the arrow keys; Control 
and X; Control and W; Escape; 
Backspace and Enter. 

Unfortunately, there are a few 

^See List ol Advertisers on Page 435 



confining features to this sub- 
routine. It can only be used for 
new data entry; a carriage re- 
turn, automatically incorpor- 
ated into the string, often de- 
stroys screen formats; and the 
control key effects go beyond 
the field length. To correct these 
limitations, the subroutine must 
be completely rewritten. 

The Assembly program is 
shown in-Program Listing 4 and 
its hex notation in Fig. 4. Care- 
fully enter the code and save the 
subroutine with the TRSDOS 
command: DUMP INPUT2/CIM 
START = EF00, END = EFCC, 
RORT = R. 

Now load Basic, again pro- 
tecting memory above 61100, 
and enter Program Listing 5. 
This program will provide ail the 
features promised above. Use 
the Edit function to replace 
single letters in the string by 
moving the cursor with the ar- 
row keys; the escape key re- 
places the cursor to the be- 
ginning of the field. The string of 
periods denoting input position 
and length, no longer automat- 
ically printed by the subroutine 
(to allow for the Edit function), 
must be added to the Basic code 
(line 190). 

In some applications, you 
may not wish to have trailing 
blanks. You can then use the in- 
formation sent back to the USR 
routine in the X variable, for ex- 
ample: LEFT$(S$,X). Change 
line 3000 in Program Listing 5 to 
read: 3000 X = USR2(VARPTR 
(S$)) : ID$(I) = LEFT$(S$,X). This 
modification will print a more re- 
spectable address label but will 
interfere with the Edit function. 

The program is easily expand- 
ed to full-screen data entry by 
adding more data statements 
and increasing the final value in 
the For.. .Next loop (line 150). The 
INSTR function in line 240 
forces proper INKEY$ input and 
directs the On. ..GOTO com- 
mand appropriately. 

One cautionary note: the IN- 
PUT2/CIM subroutine will 
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BUSINESS 



TSHARE 2.0 MULTI-USER 

SYSTEM -^, 

trs-80* im\ 



Hardware 
and 
Software 

Products for the TRS 80® 
Models I S. Ill 




MODELS I & III 

SPECIFICATIONS: 

TSHARE is a multi-tasking operating system tor 
two users. It patches itself to your NEWD0S or 
TRSDOS SYSTEM. TSHARE allows simultane- 
ous and separate operations for two users with- 
in a single computer. 

AVAILABLE USER MEMORY 
ABOVE 7F80 HEX 

•32K TRS-80 16KFREE 

•48K TRS-80. 32K FREE 

TIMESHARING MODES: 

•SIMPLEX MODE: With TSHARE 1.3 

and 2A Only 
•STANDARD MODE: With All Systems 

SUPPORT EQUIPMENT: 
•One + Disk Drive 
•32K + Memory 
SIMPLEX MODE: STANDARD MODE: 

•A Printer «A Terminal 

•TRS-232 (optional) •RS-232 or MPR-232 
EXECUTION SPEED 
STANDARD MODE: 
(Without Clock Speedup Mods) 
•BENCHMARK executed by 2 simultaneous 
users: 37 sec. 

•BENCHMARK executed once by standard 
TRS-80: 14 sec. 

FEATURES: 

•Type-ahead during Disk I/O (V2 Only) 
•Communications between users 
•Concurrent execution of single program 
•Foreground/background task design 
•Address up to two printers 

PRICES: 

#TS-13 for TRSDOS 2.3 S89 (MOO 

#TS-13 for NEWD0S 2.1 $89 (MOD ) 

#TS-2A for NEWD0S V1 $99 (MOO 

#TS-2Blfor NEWD0SV2 $99 (MOO 

#TS-2BIII1orNEW00SV2 $99 (MOD II 



m 



SERIAL I/O 
MPR-232 



AT LAST! A serial imput/ 
out pul interface designed 
for connecfion to the 
TRS80 Model I with or 
without an expansion in- 
terface. 

MPR232 Specifications 
•Glitch free operation 
•Connecls with card edge connector 
•Baud rates 75-19.200 are switch selectable 
•Integral Power Suppply included! 
•May be daisy chained with other MPR 232s 

PRICES: 
#MPR232I $129.00 (MOD I) 

1PR232III ^-^~. $139.00 (MOD III) 



CST0CK 
$99 

A) CST0CK main- 
tains a securities 
data base 

• Maintains data 

on up to 3 stock 

market indexes 
•Weekly Stock 

Data (Price . Vol. 

P/E. and Yield) _ 

•Weekly Stock Option Data 
•Two years of continuous data per stock 

B) CST0CK is a professional technical tool 
•Stock and market averages, highs, and lows 

with respect to any time span 
•Linear regression analysis of stock behavior 

versus any of 3 market indexes 
•Shori term betas computed (stock volatility in 

terms of market return) 
•Data plotting capabilities 

C) CST0CK provides a parametric portfolio 
selection system as an aid in evaluating 
investment strategies in relation to risk. 




Tor "Ease of Use 

THE FILE CLERK 

TRS-80" Models I & III 

Version 5.5 
SPECIFICATIONS: 

'A multi-feature file manager 
'Plus a simple data base (multi-file data sets) 
'File handling capacity lor 12000 records 
'Up to 20 data fields/record 
'MAX record and field length 255 
'MAX effective record length w/lndexing 7905 
'Assembly language sorts on single and com- 
bined data fields 

'Multiple search parameters and chained 
queries 

■Fast (KSAM) record retrieval on sorted key 
fields 

'Flexible report generator with Pagination & 
User titles 
'Computational fields 

• Files can extend over several diskettes 
•All diskettes need not be on line. 
AUTO MOUNT REQUESTS 

•Fields can be redefined, deleted, or aoded 

• 140-page manual 




DMB5 provides four data management 
features: 

A) A comprehensive FILE MANAGER for 
defining your records, data entry or 
edit, and general record retrieval. 

B) A flexible REPORT GENERATOR for 
information retrieval. 

C) A simple data base for advanced ap- 
plications, where DATA SETS involv- 
ing file pairs can be defined. 

D) A COPY file facility to transfer 
SORTS, SEARCHES, and transfer 
data to NEW formats. 

PRICES: 
#DB-5I $99 (MOD I) 

#DB-5III $99 (MOD III) 



VIEW 3.0 $49 

A SCREEN FORMATTER FOR 0BM5 

•Full CURSOR control lor MASK design 
•Screen design with keyboard GRAPHICS 
•Elegant & professional looks 
•File data entry, inquiry. & edit 
•Word processor style field editing 
•VIEW is a stand-alone data base 
COMPUTED FIELDS 
KSAM Master Keys 
Requires DBM5 for SORTS 



MPR-232 & MERLIN TM of Micro Proiects Eng. 
TRS-80 TM of Radio Shack. Tandy Corp 
NEWD0S80 TM ol Apparai. Inc. 
TRS232 TM of Small Syslem Software Co 



ComScffc e 

203 Arden Street 
Glendale, California 91203 

(213)649-0369 ^104 




JUST, 
OUT/ 



Merlin 
CP/M 86jor the 0RS-8O® 



co-processor 

128K RAM (Expandable to 256K) 
Diskette compatibility with IBM PC 

(Available December 1982) 
Dealer Inquiries Invited 
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change string variables within 
the program line if they are de- 
fined as constants within 
quotes. To illustrate this, type in 
the following program: 

10 SYSTEM "LOAD INPUT2/CIM" 
20 DEFUSR2 = &HEF00 
30 S$ = "MM/DD/YY" 
40 CLS : PRINT @ 800, "INPUT DATE";S$ : 
PRINT @ 811,; :X = USR2(VARPTR(S$)) 
50 LIST 

Run this program a few times 
and note the S$ variable in line 30 
changes with different input. 
When the string variable is a con- 
stant, the VARPTR function 
points to the area of memory 
where the program line with the 
constant is stored, instead of to 
the string storage space in high 
RAM. This phenomenon allows 
string packing techniques in 
Level II. There may be beneficial 
uses, but in most cases it is un- 
desirable. Now change line 30 to 
S$ s CHR$(77) + CHR$(77) + 
CHR$(47) + CHR$(68) + CHR$ 
(68) + CHR$(47) + CHR$(89) + 
CHR$(89) and rerun the program. 
If S$ is set equal to SPACE$(8), 
STRING$(8,46), . . ., the routines 



will operate properly. 

Forms Control 

If you have a program using 
several sizes of printed forms, or 
if you are tired of answering the 
forms questions, this next sub- 
routine is for you. Four different 
formats are available in the 
subroutine; switch from one to 
another by simply changing the 
argument in the USR command. 

To construct this subroutine, 
first define your desired para- 
meters (Table 1). 

Next insert the hex values in- 
to the proper places of the pro- 
gram in Fig. 5. Enter the hex 
code into memory, then type: 
DUMP FORMS/CIM START = 
EEAD, END = EEF5, RORT = R. 
In the Basic program you must 
again provide for loading, identi- 
fying the entry point and USR 
number; for example: 

10 SYSTEM "LOAD FORMS/CIM" 
20 DEFUSR2 = &HEEAD 

Easy changes in forms may 
then be made by: X = USR2(# of 
desired format). Of course, your 



program must now prompt you to 
load the proper paper and adjust 
to top-of-form before executing 
the USR command. As Program 
Listing 6 indicates, line count 
and character count are reset to 
zero (top of form, left margin) 
when the USR call is executed. 

Summary 

If you use all these routines in a 
single program, combine them by 
following these steps: 

• From TRSDOS Ready, type 
SETBRK/CIM and Enter. 

• SCROLUCIM and Enter. 

• INPUT2/CIM and Enter. 

• FORMS/CIM and Enter. 

• DUMP SUBROU/CIM START 



= EEAD, END = EEF5, TRA = 
EFE2, RORT = T and Enter. 

• BASIC — M:61100 and Enter. 

• Place the following at the 
beginning of the Basic program: 



10 SYSTEM "SUBROU/CIM" 
20 DEFUSR0 = &HEFD0 
30 DEFUSR1 = &HEF00 
40 DEFUSR2 = &HEEAD 

• Use the USR commands as 
previously described and as re- 
quired within the program. ■ 



La Verne Olney, a physician, 
is interested in medical appli- 
cations of micros. 



Progre 


m Listing 1. 


Assembly program for SETBRK/CIM. 


Address 


Hex Op codes 


Z80 Mnemonics 


Comments 


EFE0 


F3 


F3 


Stores RETurn address. 


EFE1 


EF 


EF 




EFE2 


21 00 00 


LD HL.OOOOH 


Remove prev. processing prog. 


EFE5 


3E03 


LD A ,03H 


Execute SETBRK SVC. 


EFE7 


CF 


RST 08H 




EFE8 


ED 5B E0 EF 


LD DE, (EFE0H) 


Store "RET" as new 

Listing 1 continues 






AT LAST!!! A Micro-Design 
Model III System Upgrade. 

The Micro- DisiqN ModEl III upqRAdE iNcludES MicRO-DEsiqNs exceptjonaI MDX-6 

CONTRoIIeR DOARd, ONE 40 TRACk doublE dENSJTy Disk DRiVE, NECESSARy iNSTAllATiON CAblES 
rIARdWARE. 




c 



For More InIormatjon & Free Uteratlre 

CaII or Wrjte 

MICRO-DESIGN 

6 Jul Manchaca RoAd 
Alstjn Texas, 78745 

Toll Free 

1-800-531-5002 




See our other ads on pages 99 & 135 
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Listing 1 continued 


EFEC 


22 EO EF 


LD(EFEOH),HL 


BREAK-processing 




EFEF 


EB 


EX DE,HL 


program. 




EFFO 


3E03 


LD A ,03H 


Execute SETBRK SVC. 




EFF2 


CF 


RST 08H 






EFF3 


C9 


RET 


Return to Basic. 



TRS-B0 
EFE0 
EFF0 
F000 
F010 
F020 
F030 
F040 
F050 
PC 
2800 
? P 
DEBUG 
TRSDGS 
DEBUG 


Model II DEBUG Program 
F3 EF 21 00 00 3E 03 CF ED 5B E0 EF 22 E0 EF 
3E 03 CF C9 00 00 00 00 00 00 00 00 00 00 00 
23 FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
SP SZHPNC AF BC DE HL IX IY AF' 

21FE 000000 0000 0000 0000 0000 0000 0000 0000 

s now ON 
READY 

Fig. 1. Hex code for SETBRK/CIM 


EB 
00 
FF 
FF 
FF 
FF 
00 
00 

BC 
0000 




.00.29.01 . 






























DE' 
0000 


HL' 
0000 



TRS-B0 


Model II DEBUG Program 








.00.46.29. 


EFD0 


21 D8 EF E5 


2A 03 28 E9 


45 3E 


IB CF C9 00 00 


00 


!...*.( .E> 




EFE0 


00 00 00 00 


00 00 00 00 


00 00 


00 00 00 00 00 


00 






EFF0 


00 00 00 00 


00 00 00 00 


00 00 


00 00 00 00 00 


00 






F000 


23 FF FF FF 


FF FF FF FF 


FF FF 


FF FF FF FF FF 


FF 


# 




F010 


FF FF FF FF 


FF FF FF FF 


FF FF 


FF FF FF FF FF 


FF 






F020 


FF FF FF FF 


FF FF FF FF 


FF FF 


FF FF FF FF FF 


FF 






F030 


FF FF FF FF 


FF FF FF FF 


FF FF 


FF FF FF FF FF 


FF 






F040 


00 00 00 00 


00 00 00 00 


00 00 


00 00 00 00 00 


00 






PC 


SP SZHPNC 


AF BC DE 


HL 


IX IY AF' 


BC 


DE' HL" 


2B00 
? P 


21FE 000000 


0000 0000 0000 0000 


0000 0000 0000 


0000 


0000 0000 






Fig. 2. Hex code for SCROLL/CIM 







ADDRESS 


HEX OP CODES 


Z-80 MNEMONICS 


COMMENTS 


EFD0 


21 D8 EF 


LD HL.EFD8H 


Save continuation 


EFD3 


E5 


PUSH HL 


address 


EFD4 


2A 03 28 


LD HLi (2803H) 


Convert USR argument 


EFD7 


E9 


JP (HL) 


to integer. 


EFD8 


45 


LD B.L 


# lines to protect. 


EFD9 


3E IB 


LD A ,1BH 


Execute SCROLL SVC. 


EFDB 


CF 


RST 03H 




EFDC 


C9 


RET 


Return to BASIC. 




Program Listing 2. Assembly program for SCROLL/CIM 



TRS-80 
EF00 
EF10 
EF20 
EF30 
EF40 
EF50 
EF60 
EF70 
PC 
2B00 
? P 


Model II DEBUG Program 
21 08 EF E5 2A 03 28 E9 46 23 5E 23 56 EB 3E 
CF 00 00 78 32 20 EF 2A 20 EF E5 2A 05 2B E3 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
SP SZHPNC AF BC DE HL IX IY AF' 

21FE 000000 0000 0000 0000 0000 0000 0000 0000 

Fig. 3. Hex code for INPUT/CIM 


05 
C9 
00 
00 
00 
00 
00 
00 

BC 
0000 


.01.02. 19. 
!...*.( . F#t#V.>. 
. . . x2 . * ........ 












DE' HL' 

0000 0000 



Program Listing 3. Assembly program for INPUT/CIM 

HEX OP CODES Z-80 MNEMONICS COMMENTS 



EF00 
EF03 
EF04 



21 08 EF 

E5 

2A 03 28 



LD HL.EF0BH 

PUSH HL 

LD HL. (2803H. 



Save continuation 

address. 
Convert USR argument to 



Listing 3 continues 




THE KING 

OF 

UTILITIES 

SUPER UTILITY PLUS 

"/ believe 

SUPER UTILITY or 

SUPER UTILITY PLUS 

should be present at 

every TRS-80 disk 

installation. " 

We didn 't say this; Paul Wiener did in 80 
Microcomputing, Jan. '82. ..but we sure 
agree with him! 

You heard about it' You read about it (80 
Microcomputing). Now get the "cadillac" 
at a special price! 

Compatible with MOD I, and MOD III, and 
all the current operating systems! Copy 
files from any DOS to any DOS, MOD I or 
III, without converting! 

Zap 
Purge 
Format 

Special Format 
Disk Repair 
Memoiy 
File Utility 
Tape Copy 
Format without erase 
Disk Copy 
Special Disk Copy 
Configurable System 
MUCH MORE - Mod I & Mod III on Same Disk 

For MOD I/III . . . $74.95 

NEW 

Back up copy NOW included 

Also Available: 

Super Utility Plus Tech. Manual . . . $14.95 

"Inside Super Utility Plus" 819.95 



A Division of Breeze/QSD, Inc. 
1 1 500 Stemmons Fwy., Dallas, Texas 75229 
To order call toll free 1 800-527-7432 

For product information (214) 484-2976 
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New Book 



ffi Just (w 



b 



TRSD0S23 
WOOED 




& Other 
Mysteries. 



FARVOUR EXPEDITION EXPLORES TRSDOS, 
AND YOU ARE THERE! 



Dateline: California, 
December 1982. 

James Farvour . . . Programmer, 
Author and Adventurer Extraordinare', who 
two years ago last spring came to popular 
public attention with his much heralded and 
nationally acclaimed publication Microsoft 
Basic Decoded & Other Mysteries, has done it 
again. 

Leaving no stone unturned in his 
never ending quest to bring to the common 
man and programmer the information 
hidden for so long in the dark unchartered 
expanse of computer software, which was 
thought before to be unobtainable to mortal 
men, James Farvour brings to you . . . 

TRSDOS 2.3 Decoded 
& Other Mysteries. 

The diary of our intrepid 
explorers' journey through the internal 
operations of the TRSDOS operating system 
(used on the TRS-80 Model I computer) and 
what he found while he was there. 

With the assistance of his trusted 
friend and long time companion Tandy, our 
hero brings to you, in the comfort of your 



own home, such wonders as . . . 

a fully commented source code 
listing at the end of each chapter along with 
(where appropriate) diagrams and 
descriptions of the data structures for the 
modules described, a discussion of the Model 
I system architecture as it pertains to 



r? 



■ I'fitns Eai- f<arn*ttr 



TltStHtS 2.3 MAimiW 

«fc OTHER MYS 




operating system implementation, a general 
description of the Z-80 CPU register sets and 
interrupt modes, a description of the 
command line interpreter and the 
subroutines used by the TRSDOS commands 
module, the modules used by the file 
management system, the error message 
processor, the debug module available with 
TRSDOS, and much, much more. 

Can you believe it? . . . Believe it! 

Discover yours today! 

TRSDOS 2.3 DECODED & Other 
Mysteries is available for $29.95 at computer 
stores, B. Dalton Booksellers and 
independent book dealers around the world. 
If your dealer is out of stock, order direct 
from IJG. 

Include $4.00 for shipping and 
handling. Foreign residents add $11.00 plus 
purchase price. U.S. funds only please. 



IJG, Inc. 1953 West 11th Street 
Upland, California 91786 
Phone: 714/946-5805 

Helping you help yourself. 



A3 



©IJG, Inc. 1982 



Microsoft trademark Microsoft Corp. TRSDOS and TRS-80 trademark Tandy Corp. 



Listing 3 Continued 














EF07 


E9 






JP (HL) 




i nteger . 


EF08 


46 






LD B» <HL) 




B = string length. 


EF09 


23 






INC HL 




Find ifie-morY location 


EF0A 


5E 






LD E, (HL) 




of string and put 


EF0B 


23 






INC HL 




address in HL . 


EF0C 


56 






LD Di (HL) 






EF0D 


EB 






EX DE.HL 






EF0E 


3E 


05 




LD A »B5H 




KBLINE supervisor call. 


EF10 


CF 






RST 08H 




Do line input routine. 


EF11 


00 






NOP 






EF12 


00 






NOP 






EF13 


78 






LD A,B 




Convert argument from 


EF14 


32 


20 


EF 


LD (EF20H) 


»A 


routine to integer-; 


EF17 


2A 


20 


EF 


LD HLi (EF2 


0H> 


HL = *» characters 


EF1A 


E5 






PUSH HL 




that were input. 


EF1B 


2A 


05 


28 


LD HL. (2805H) 




EF1E 


E3 






EX (SP).HL 






EF1F 


C9 






RET 




Return to BASIC. 


EF20 


30 






NOP 




Data storage. 


EF21 


00 






NOP 







TRS-80 


Model II DEBUG Program 










.01.21.02. 


EF00 


21 08 EF E5 


2A 03 28 E9 


46 23 


5E 23 56 EB C5 


D5 


!...*.( .F#t#V. . . 


EF10 


E5 AF B8 20 


09 3E 03 B7 


El Dl 


CI C3 Bl EF 3E 


01 






EF20 


CF 48 C5 F5 


01 FC 0E ED 


41 DB 


FD F6 F8 57 04 


ED 


.H. . 


. . . A. . . .W. . 


EF30 


41 DB FD 5F 


Fl CI ED 53 


88 EF 


16 00 48 3E 04 


CF 


A. .*- 


. . S. . . . H>. . 


EF40 


20 FB 78 FE 


20 38 0D 3E 


08 CF 


70 23 14 0D 20 


ED 


. X. 


8.>..ptt.. . 


EF50 


06 0D 18 04 


FE 0D 20 03 


42 18 


51 FE 08 20 12 


CD 




. .B.G.. .. 


EF60 


BA EF 28 D9 


06 2E 70 3E 


08 CF 


06 IC 3E 08 CF 


IB 


. . ( . 


. p> ....>.. 


EF70 


CC FE IC 20 


05 CD BA EF 


18 C3 


FE ID 20 05 3E 


08 






PC 


SP SZHPNC 


AF BC DE 


HL 


IX IY AF' 


BC 


DE' 


HL' 


2800 


21FE 000000 


0000 0000 0000 0000 


0000 0000 0000 


0000 


0000 


0000 


TRS-80 


Model II DEBUG Program 












EF80 
EF90 


CF 18 C3 FE 
E6 07 ED 41 


IB 20 ID 11 
D3 FD 04 7B 


AA FD 
ED 41 


C5 F5 01 FC 0E 
D3 FD Fl CI El 


7A 
Dl 






. . . A 


. . ( . A 


EFA0 
EFB0 


CI C3 0E EF 
AF 26 00 68 


70 06 7F 3E 

E5 2A 05 2B 


08 CF 
E3 C9 


18 9F El Dl 33 
32 CB EF 7A B7 


33 
28 






■ &.h 


* . ( . . 2 . . z . ( 


EFC0 
EFD0 
EFE0 
EFF0 
PC 


09 0C 15 28 
00 00 00 00 
00 00 00 00 
00 00 00 00 
SP SZHPNC 


06 IC 3E 08 

00 00 00 00 
00 00 00 00 
00 00 00 00 
AF BC DE 


CF B0 
00 00 
00 00 
00 00 
HL 


3E IC C9 00 00 
00 00 00 00 00 
00 00 00 00 00 
00 00 00 00 00 
IX IY AF' 


00 
00 
00 
00 
BC 


















DE' 


HL' 


2800 
? P 


21FE 000000 


0000 0000 0000 0000 


0000 0000 0000 


0000 


0000 


0000 






Fig. 4. Hex code for INPUT2/CIM 











TRS-80 Model II DEBUG Program 

EEAD 21 B5 EE E5 2A 03 28 E9 7D FE 01 20 08 06 42 0E 
EEBD 3C 16 50 18 22 FE 02 20 08 06 2A 0E 2A 16 50 18 
EECD 16 FE 03 20 08 06 00 0E 00 16 00 18 0A FE 04 20 
EEDD 17 06 00 0E 00 16 00 3E 11 CF 06 03 0E 00 3E 5F 
EEED CF 06 04 0E 00 3E 5F CF C9 00 00 00 00 00 00 00 
EEFD 00 00 00 74 FF FF FF FF FF FF FF FF FF FF FF FF 
EF0D FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
EF1 D FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 

PC SP SZHPNC AF BC DE HL IX IY 
2800 21 FE 000000 0000 0000 0000 0000 0000 0000 


!...*.(.).. ..B. 
<.P.".. ..*.". P. 


> >— 


...t 




AF' BC DE' HL' 
0000 0000 0000 0000 




DEBUG is now ON 
TRSDOS READY 
DEBUG 






Fig. 5. Hex code for FORMS/CIM. Boldface addresses are user-supplied values 





Program Listing 4 


Assembly program 


for INPUT2/CIM 


ADDRESS 


HEX OP CODES 


Z-80 MNEMONICS 


COMMENTS 


EF00 


21 08 EF 


LD HL.EF08H 


Save continuation 


EF03 


E5 


PUSH HL 


address. 


EF04 


2A 03 28 


LD HLi (2803H) 


Convert USR argument 


EF07 


E9 


JP (HL) 


to integer. 


EF08 


46 


LD B. (HL) 


B = string length. 


EF09 


23 


INC HL 


Find memory location of 


EF0A 


5E 


LD Ei (HL) 


string and put 


EF0B 


23 


INC HL 


address in HL . 


EF0C 


56 


LD D* (HL) 




EF0D 


EB 


EX DE.HL 


Listing 4 Continues 




This Special Limited Edition Package will be in high 
demand as only 500 copies will be made. They will be 
numbered 1-500 and will be personally signed by the 
author. Kim Watt YOUR name will be embedded in the 
program as the serial number. The following is included 
with this SPECIAL LIMITED PACKAGE: 

1) SUPER UTILITY PLUS S/E in /CMD File Formal 
Both MOD I and III versions are included, and your 
NAME will be the serial number. This will MOT be a 
protected disk, and you may make as many BACKUPS 
as you wish. The serial number is NOT changeable. 

2) TWO attractive SCJ+/SE binders. 
Binder "1 will include: 

Three manuals in LARGE format (8 1/2 x 11") 

(a) SUPER UTILITY+ Manual 

(b) INSIDER SUPER UTILITY by Paul Wiener/ 
foreward by Kim Watt 

(c) SUPER UTILITY TECH Manual by Kim Watt 6 
Pete Carr 

3) Binder "2 will include THE SOURCE CODE for 
SUPER UTILITY PLUS. 

Yes...the SOURCE CODE to this .MAJOR program will 
be available to 500 programmers. This is FULLY 
commented by the author, Kim Watt, and is a machine 
language programmer's dream come true! After 
reading this, your machine language programming skill 
should increase tremendously. All of Kim's knowledge 
in ONE book! All at your disposal and for YOUR use.* 

4) The license to USE Kim Watt's sub-routines... 

will be granted to those 500 registered owners! These 
500 ONLY will be able to apply all of Kim's magic to 
THEIR programs. No royalty fee necessary. In other 
words. IMPROVE YOUR PROGRAMS! Take Kims ideas 
and expand on them! Never has anything EVER been 
done like this before. These 500 ONLY have the right to 
use our sub-routines. This information is NOT being put 
in the public domain. We are allowing these 500 to use 
our routines by buying our special package. All copy- 
rights and trademarks are retained by Breeze/ QSD, Inc. 

5) SUV'SE is NOT available from any dealer, but only 
directly through Breeze/QSD, Inc. Customers will be 
handled on a one-on-one basis. Confirmed orders will 
be preregistered and a matching card must be returned 
by purchaser for full support from Breeze/QSD. Inc. We 
will know who each and every owner is, so full support 
can be given. We DO want you to sign and return our 
registration card for this support to commence, 
however. No exceptions will be made. 

6) This is a very important step that we are taking, and 
only a select group can appreciate the value in a 
package like this. This is NOT for the general mass 
market It is a college education in machine language 
written by a recognized expert. It IS SU + in /CMD file 
form. It is a license to use Kim Watt's subroutines. It is an 
opportunity to vastly improve your product It is a 
collector's item, also. Limited, Indeed. Last but not least 
it is expensive. On the surface only, however, as this 
product will make you an expert programmer if that is 
what you want You can literally write a DOS from 
studying the code! It will also make you a member of an 
elite group that has access to Kim's knowledge and can 
USE that knowledge to YOUR benefit 

Source Code is FULLY Commented. 

Price for the Super Utility Plus- 
Special Edition is 
$500 

Available later this year 

Call or write for more information 

"Credit to Kim Watt and Breeze/QSD must be given in the 

program and in the documentation for sub-routines used. 

There is NO royalty fee to pay however. 




A Division of Breeze/QSD, Inc. 
1 1 500 Stemmons Fwy., Dallas, Texas 75229 
61 To order call toll free 1-800-527-7432 

For product information (214) 484-2976 
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COLOR COMPUTER SOFTWARE 

16K EXTENDED BASIC 

Adventure word games 

THE ALCHEMIST'S LABORATORY - $14.95 

mix the ingredients yourself 

• LOKAR'S MAGIC STAFF - $14.95 

live crystal statues, the magic staff, and a castle 
filled with wild animals. 

• NIGHT TOWER DESCENT - $14.95 

ten floors of danger, treasure, and magic are be- 
tween you and freedom. 

•SQUEEZE $14.95 
arcade style game where aliens close in from both 
sides at once. 

• GRAPHIC SCREEN EDITOR ■ $16.95 
create pictures on the screen using joysticks or 
arrow keys-save on tape, erase, paint, and many 
other features. 

• COLOR SHOW DISPLAYS - $8.95 

five graphics programs that create endless chang- 
ing patterns. 

all programs 16-K extended basic cassette only. 
Send for free catalogue. We accept checks, money 
orders, Visa and Mastercharge (no C.O.D.s). 
Please add $1.00 for shipping. Send to: 



REAL SOFTWARE CO. 

P.O. BOX 401 
HOPEDALE, MA 01747 

(617) 393-6281 



•345 



Mass. residents add 5% sales tax 
* dealer inquiries welcomed ' 




NMf 



^231 



GRADEBOOK 

Disk-based program 



Select from 10 menu items 

— create class rolls 

— record scores 

— print scores 

— calculate/print grades 

— correct scores 



(partial menu) 



Requires: 

- TRS-80 (I or III) 

- 32K 

— Minidisk 

— Printer (optional) 

$34.95 



Order From: 
MM Computer Club 
4732 Fairview Ave. 
Downers Grove, IL 
60515 

312-852-8640 
.Add $2 for COD 



Listing 4 Continued 










EF0E 


C5 




PUSH BC 


Save registers. 


EF0F 


r>5 




PUSH DE 




EF10 


E5 




PUSH HL 




EF11 


AF 




XOR A 


Zero accumulator. 


EF12 


B8 




CP B 


Is string length 0? 


EF13 


20 


09 


JR NZiEFlEH 


If not, go to EF1E. 


EF15 


3E 


03 


LD A , 03H 




EF17 


B7 




OR A 




EF18 


El 




POP HL 


Restore registers. 


EF19 


Dl 




POP DE 




EF1A 


CI 




POP BC 




EF1B 


C3 


Bl EF 


JP EFB1H 


Go to e>:it routine. 


EF1E 


3E 


01 


LD A ,01H 


Initialize keyboard. 


EF20 


CF 




RST 08H 




EF21 


48 




LD C,B 


Put string length in C. 


EF22 


C5 




PUSH BC 


Initialize video buffer. 


EF23 


F5 




PUSH AF 




EF24 


01 


FC 0E 


LD 8C0EFCH 




EF27 


ED 


41 


OUT < C > » B 




EF29 


DB 


FD 


IN Ai (FDH) 




EF2B 


F6 


F3 


OR F8H 




EF2D 


57 




LD D,A 




EF2E 


04 




INC B 




EF2F 


ED 


41 


OUT (C).B 




EF31 


DB 


FD 


IN A. <FDH) 




EF33 


5F 




LD E.A 




EF34 


Fl 




POP AF 




EF35 


CI 




POP BC 




EF36 


ED 


53 88 EF 


LD (EF88H),DE 


Save cursor- position. 


EF3A 


16 


00 


LD D , 00H 


Initialize char, counter. 


EF3C 


43 




LD C.B 


Put string length in C. 


EF3D 


3E 


04 


LD A ,04H 


KBCHAR SVC 


EF3F 


CF 




RST 08H 


Get char, from keyboard. 


EF40 


20 


FB 


JR NZ.EF3DH 


If no input go to EF3D. 


EF42 


7a 




LD AiB 


Put char, in A. 


EF43 


FE 


20 


CP 20H 


Is char, a space? 


EF45 


38 


0D 


JR CEF54H 


If not 9o to EF54. 


EF47 


3E 


08 


LD A , 08H 


VDCHAR SVC. 


EF49 


CF 




RST 08H 


Send char, to screen. 


EF4A 


70 




LD <HL),B 


Put char, in string. 


EF4B 


23 




INC HL 


Adv. char, position. 


EF4C 


14 




INC D 


Adv. char, count. 


EF4D 


3D 




DEC C 


Dec. # char. left. 


EF4E 


20 


ED 


JR NZ.EF3DH 


If not 0. go to EF3D. 


EF50 


06 


0D 


LD B -0DH 


Put ENTER in B. 


EF52 


18 


04 


JR EF58H 


If goto EF58. 


EF54 


FE 


0D 


CP 0DH 


Is char. ENTER? 


EF56 


20 


03 


JR NZ.EF5BH 


If not. 9o to EF58. 


EF58 


42 




LD B,D 


Put # input char, in B. 


EF59 


18 


51 


JR EFACH 


Go to END. 


EF5B 


FE 


08 


CP 08H 


Is char, a backspace? 


EF5D 


20 


12 


JR NZ,EF71H 


If not) 9o to EF71. 


EF5F 


CD 


BA EF 


CALL EFBAH 


Backspace routine. 


EF62 


28 


D9 


JR Z.EF3DH 


If first char. 9o to EF3D. 


EF64 


06 


2E 


LD 8 ,2EH 


Put " . " in string. 


EF66 


70 




LD <HL),B 




EF67 


3E 


08 


LD A , 08H 


VDCHAR SVC 


EF69 


CF 




RST 08H 


Send char, to screen. 


EF6A 


06 


1C 


LD B . 1CH 


Backspace cursor. 


EF6C 


3E 


08 


LD A .08H 


VDCHAR SVC 


EF6E 


CF 




RST 08H 


Send info to screen. 


EF6F 


18 


CC 


JR EF3DH 


If done, 9o to EF3D. 


EF71 


FE 


1C 


CP 1CH 


Is char, a < — ? 


EF73 


20 


05 


JR NZ,EF7AH 


If not, go to EF7A. 


EF75 


CD 


BA EF 


CALL EFBAH 


Backspace routine. 


EF78 


18 


C3 


JR EF3DH 


Go to EF3D. 


EF7A 


FE 


ID 


CP 1DH 


Is char, a — > ? 


EF7C 


20 


05 


JR NZ,EF83H 


If not, go to EF83. 


EF7E 


3E 


08 


LD A , 08H 


VDCHAR SVC 


EF80 


CF 




RST 08H 


Send info to screen. 


EF81 


18 


C8 


JR EF4BH 


If done 90 to EF4B. 


EF83 


FE 


IB 


CP 1BH 


Is char. ESC kev? 


EF85 


20 


ID 


JR NZ.EFA4H 


If not, 9o to EFA4. 


EF87 


1 1 


AA FD 


LD DEiFDAAH 


Get cursor position. 


EF8A 


C5 




PUSH BC 


Clear video buffer. 


EF8B 


F5 




PUSH AF 




EF8C 


01 


FC BE 


LD BC0EFCH 




EF8F 


7A 




LD A,D 




EF90 


E6 


07 


AND 07H 




EF92 


ED 


41 


OUT ( C > , B 




EF94 


D3 


FD 


OUT (FDH) 




trY6 


04 




INC B 




thV/ 


<t> 




i-U Ml t 




EF93 


ED 


41 


UUI (t)lB 




EF9A 


D3 


FD 


OUT (FDH) 




EF9C 


Fl 




POP AF 




EF9D 


CI 




POP BC 




EF9E 


El 




POP HL 


Restore registers. 


EF9F 


Dl 




POP DE 




EFA0 


CI 




POP BC 




EFA1 


C3 


0E EF 


JP EF0EH 


Go to START (EF0E). 


EFA4 


70 




LD (HL)iB 


Put char, in string. 


EFA5 


06 


7F 


LD B ,7FH 


Put "+" in B. 


EFA7 


3E 


08 


LD A , 08H 


VDCHAR SVC 


EFA9 


CF 




RST 08H 


Send info to screen. 


EFAA 


18 


9F 


JR EF4BH 


Go to EF4B. 


EFAC 


El 




POP HL 


END 


EFAD 


Dl 




POP DE 




EFAE 


33 




INC SP 




EFAF 


33 




INC SP 




EFB0 


AF 




XOR A 




EFB1 


26 


00 


LD H , 00H 


EXIT. 

Listing 4 Continues 
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Listing 4 Continued 

EFB3 
EFB4 
EFB5 
EFB8 
EFB9 
EFBA 
EFBD 
EFBE 
EFBF 
EFC1 
EFC2 
EFC3 
EFC4 
EFC6 
EFC8 
EFC9 
EFCA 
EFCC 



68 




E5 




2A 


05 28 


E3 




C9 




32 


CB EF 


7A 




B7 




28 


09 


0C 




15 




2B 




?\h 


1C 


JE 


08 


CF 




B0 




3F 


1C 


C9 





LD L.B 

PUSH HL 

LD HLi (2805H) 

EX (SP).HL 

RET 

LD (EFCBH)iA 

LD A.D 

OR A 

JR ZiEFCAH 

INC C 

DEC D 

INC LS 

LD B i 1CH 

LD A i08H 

RST 08H 

OR B 

LD A . 1CH 

RET 



Convert argument from 
routine to integer. 

HL = # char, input. 
Return to BASIC. 
Backspace routine. 



30 



DIRECTIVES*) 



* * FORMATTED INPUT * * 

DIR POSITION(DP) INPUT POSITION! IP) LENGTH! ID 



240, 


24 8 


267. 


273 


287. 


294 


306 . 


311 



50 DATA "LAST NAME" . 

60 DATA" FIRST NAME". 

70 DATA"STREET" . 

80 DATA" CITY" . 

90 DAT A "ST ATE". 

100 DATA" ZIP" , 

110 ' 

120 CLEAR 1000 

130 SYSTEM" I NPUT2/CIM" 

140 DEFUSR2=&HEF00 

150 X*="N" 

160 CLS 

170 RESTORE 

180 F0RI=1T06 

190 READ DS.DP. IP, IL 

200 IFX*="N"THENPRINTaDP.D*! 

210 IFX»="R"THENGOSUB1000ELSEIFX*="E"THENGOSUB2000ELSEPRINT3IP, STRING* <IL, 46 
220 NEXT 

230 IFX*="N"THENX*="R" :G0T017B 

240 PRINT31200. ID*<2);- " ; ID* < 1 > ; CHR*( 1 3 ) ; ID* ( 3) 

250 PRINTID*(4> ;", " ; ID*(5 ) ;SPC(2) ; ID*(6) 

260 PRINT3520."N = NEW / E = EDIT / S = STOP"; 

270 X*=INKEY«: IFX*=" " THEN270 

280 ONINSTRCNES".X*)GOTO160. 170.300 

290 GOTO260 

300 END 

310 ' 

1000 PRINT3IP, ; :S*=SPACE*( ID : GOTO3000 

2000 PRINT3IP, ID*(I) ::PRINT3IP, ; :S*=ID*(I) 

3000 X=USR2(vARPTR<SS> ) : I D* ( I >=S$ 

4000 RETURN 



Program Listing 5 



ADDRESS 


HEX OP CODES 


EEAD 


21 B5 EE 


EEB0 


E5 


EEB1 


2A 03 28 


EEB4 


E9 


EEB5 


7D 


EEB6 


FE 01 


EEB8 


20 08 


EEBA 


06 42 


EEBC 


0E 3C 


EEBE 


16 50 


EEC0 


18 22 


EEC2 


FE 02 


EEC4 


20 08 


EEC6 


06 2A 


EEC8 


0E 2A 


EECA 


16 50 


EECC 


18 16 


EECE 


FE 03 


EED0 


20 08 


EED2 


06 00 


EED4 


0E 00 


EED6 


16 00 


EED8 


18 0A 


EEDA 


FE 04 


EEDC 


20 17 


EEDE 


06 00 


EEE0 


0E 00 


EEE2 


16 00 


EEE4 


3E 11 


EEE6 


CF 


EEE7 


06 03 


EEE9 


0E 00 


EEEB 


3E 5F 


EEED 


CF 


EEEE 


06 04 


EEF0 


0E 00 


EEF2 


3E 5F 


EEF4 


CF 


EEF5 


C9 



Z-80 MNEMONICS 

LD HL.EEB5H 

PUSH HL 

LD HL,(2803H) 

JP (HD 

LD A.L 

CP 01H 

JR NZ.EEC2H 

LD B . 42H 

LD C .3CH 

LD D ,50H 

JR EEE4H 

CP 02H 

JR NZ.EECEH 

LD B ,2AH 

LD C ,2AH 

LD D ,50H 

JR EEE4H 

CP 03H 

JR NZ.EEDAH 

LD B .00H 

LD C .00H 

LD D .00H 

JR EEE4H 

CP 04H 

JR NZ.EEF5H 

LD 8 ,00H 

LD C .00H 

LD D ,00H 

LD A , 11H 

RST 08H 

LD B ,03H 

LD C .00H 

LD A .5FH 

RST 08H 

LD B .04H 

LD C .00H 

LD A ,5FH 

RST 08H 

RET 



Convert USR argument to 
integer . 

Form *1 ? 

If not. skip to EEC2. 

Load page length (66). 

Load lines/page (60). 

Load char /line (80). 

Go to END. 

Form #2 ? 

If not. skip to EECE. 

Load page length (42). 

Load lines/pag* (42). 

Load char/1 ir.e (80). 

Go to END. 

Form #3 ? 

If not. s.kip to EEDA. 

Load page length. 

Load lines/page. 

Load char/line. 

Go to END. 

Form #4 ? 

If not. skip to EEF5. 

Load page length. 

Load 1 ir.es /page. 

Load char /line. 

Execute PRINIT SVC 

Reset line-count 

to 0. 
Execute PRCTRL SVC. 

Reset character- 
count to 0. 
Execute PRCTRL SVC. 



Program Listing 6. Assembly program for FORMS/CIM 




►'See List of Advertisers on Page 435 



THE MOST POWERFUL, FLEXIBLE 

DISK MAILING SYSTEM FOR THE TRS80 

*SUPPORTS 65,000 NAMES* 

PowerMAIL is a highly sophisticated 
mass mailing system designed to run 
under all of the popular DOS's currently 
available for the Mod I or HI. The program 
is written entirely in machine language for 
maximum operation speed, and occupies 
only 4K of the available RAM in your 
computer. There are no slow' periods 
when PowerMAIL is running. New 
features have been added to the program 
that others have always lacked. You now 
have the ability to keep track of mailings 
using the 24 'flags' that are incorporated 
into the PowerMAIL program. The 
PowerMAIL system will handle a file up to 
8 megabytes, or 65535 names, whichever 
is smaller. The program will run in as little 
as 32K and one disk drive, although 48K 
and 2 drives are desirable. The program 
will also sort the entire maximum file size 
and open up to 168 files simultaneously 
during the process. Author Kim Watt 

For MOD I/HI...$ 99.95 

Hundreds of Satisfied 
Users... Scriplus 3.0 

Scriplus is a modification to 
Scripsit* '" which enables you to take 
advantage of the special functions, 
features, and print formats of your 
printer while your document is being 
printed. Allows you to: 

Chang* nx p«nd»cJ print 
change no. of ditrittm f>mr inch 
or UQd»rliD* *« »id-lin»' 

Features: 

• Compatible with all current DOS's (I or III). 

• Modifies ALL versions of SCRIPSIT". 

• Allows usage of MOD I version on MOD III. 

• Allows MOD III versions to be BACKED UP for your 
protection. 

• Files can be killed, loaded, merged, or chained from 
the Scriplus directory. 

• Scriplus supplies an ALPHABETIZED directory with 
FREE space shown. 

• "END'' returns to DOS READY instead of rebooting. 

• Printer can be stopped for insertion of text or forms 
alignment Inserted text can be edited prior to 
resumption of printing. 

• Specifically written for the MX-80 but will work with 
any printer that accepts CHR$ codes for control. 

• Optionally select line feed after carriage return. 

For MOD I/III . . . $39.95 



A Division of Breeze/QSD, Inc. ** 378 
1 500 Stemmons Fwy„ Dallas, Texas 75229 
To order call toll free 1-800 527 7432 

For product information (214) 484-2976 
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DISPLAYED VIDEO IS DRIVING DOWN 
PRICES ON DISKS! 

"* DV'S COLOR COMPUTER FIRST DRIVE 

$425.00 

80 TRACK TEAC DISK DRIVE W/CASE & POWER SUPPLY , 

<4&$ $275.00 £*W 

% i 40 TRACK TEAC DISK DRIVE W/CASE & POWER SUPPLY ^C/^7 

$239.00 

TEACS NEW 40 TRACK SLIMLINE W/CASE & POWER SUPPLY 

$269.00 

TWO DRIVE CABLE $23.99 

With Gold Plated Connectors 

NEWDOS 80 $ 1 1 5 .00 MODEL I or III 

Bare Drives & Cases Available Upon Request 

DV'S 5 MEG. HARD DISK 

$1949.00 

ATHANA DISKETTS 
$26.95 

100 Percent Certified W/Own Hub Rings 

EPSON PRICES 

We're not going to make you call for prices. 
Here they are in black and white!! 

MX 80 (W/GRAPHTRAX) PLUS $459.00 
MX80FT (W/GRAPHTRAX) PLUS $545.00 
MX82FT (W/GRAPHTRAX) PLUS $555.00 

MX100 (W/GRAPHTRAX) PLUS $709.00 
PRINTER CABLE $23.99 



Stop In Our Two 
Retail Locations: 

886 Ecorse Rd., Ypsilanti, MI 48197 

(313) 426-5086/(313) 482-4424 

or 

111 Marshall Street, 

Litchfield, MI 49252 

(517) 542-3280 



We Carry A Full Line of OKIDATA Printers 




D ISPLA YED 




IMMEDIATE DELIVERY 

180 Days Parts and Labor Warranty 
DEALER INQUIRIES INVITED 

Free Shipping in the U.S. 
4S Contiguous States 



Radio Shack Authorized Dealership at: 

111 Marshall Street, Litchfield, Michigan 49252 #P142 

To Order: Call (313) 426-5086 or (313) 482-4424 or (517) 542-3280 or write DISPLAYED VIDEO, 
886 Ecorse Road, Ypsilanti, Michigan 48197 

TRS-80 is a trademark of the Tandy Corporation Prices subject to change without notice 



'. ". 








120 

DAY 

WARRANTY 



"S 




"NO YOU'RE NOT SEEING THINGS, THATS FOUR INTERNAL DRIVES IN 

A MODEL III, WITH UP TO 4 MEG. DISK STORAGE AVAILABLE NOW, 

ONLY FROM DISPLAYED VIDEO!!" 



DISPLAYED VIDEO IS DRIVING DOWN 
** PRICES ON DISKS! #/ % 

DISPLAYED VIDEO is now offering TRS-80* MODEL III with TANDON disk drives, one of the most reliable 
disk drive systems on the market, for INCREDIBLY low prices. 

OF DNKFTTf's 1 48K ' dUal 4 ° traCk double densit y disk drives > complete systems with TRSDOS and ONE BOX 

PLUG IT IN AND GO $1,749.00 

M9P5- H! with 48K ' dual ^°^° track double density disk drives, complete systems with NEWDOS 80 and ONE 
BOX OF DISKETTES 

PLUG IT IN AND GO $2,149.00 

o5P?t K™StJ}£ K ' dual 80 track double densit y di sk drives, complete systems with NEWDOS 80 and ONE 
dUa (Jh UlbKh 1 I Lb 

PLUG IT IN AND GO $2,149.00 

^ODEL HI with48K, dual 80/80 track double density disk drives, complete systems with NEWDOS 80 and ONE 
tSUX Or DloKL I I Lb 

PLUG IT IN AND GO $2,449.00 

MODEL III with 48K, four 40 track double density internal disk drives, complete systems with TRSDOS and ONE BOX OF 
DISKETTES pUJQ JJ fly ANQ QO. ... $2,399.00 

MODEL IE with 48K, four internal drives of any configuration available to achieve up to 4 meg of disk storage 

MODEL III Internal Drive Kit: Includes controller board, dual drive mounting bracket, 

dual power supply, all hardware cables and connectors (gold plated) 

MODEL 16 w/1 drive.. ..$4,450.00 w/2 drives $4,850.00 



CALL 



$329.00 




Displayed 



IMMEDIATE DELIVERY 

120 Days Parts and Labor Warranty 
DEALER INQUIRIES INVITED 

Free Shipping in the U.S. 
48 Contiguous States 



Visit Our Two 
RETAIL LOCATIONS: 

886 Ecorse Rd., Ypsilanti, MI 48197 
(313) 426-5086/(313) 4824424 
111 Marshall St., Litchfield, MI 49252 
(517) 542-3280 

Radio Shack Authorized Dealership atT 
111 Marshall Street, Litchfield, Michigan 49252 #P142 

To Order: Call (313) 426-5086 or (313) 482-4424 or (517) 542-3280 or write DISPLAYED VIDEO, 

*8§6 Ecorse Road, Ypsilanti, Michigan 48197 

. 'TRS-80 is a trademark of the Tandy Corporation ^ 62 Prices subject to change without notice 




UTILITY 



Enter the guts of the Color Computer. 



CC Monitor 



Sergio Zigras 
171 Arundel Road 
Paramus, NJ 07652 



I waited a long time for an inex- 
pensive home computer with 
my favorite microprocessor, the 
6809. Radio Shack finally made 
it with the Color Computer, and I 
think they did a very nice job. 

First I explored the hardware. 
I made up schematics, in- 
creased the memory to 16K and 
connected my black-and-white 
direct video monitor. Then I 
started looking closely into the 
software. 

A Basic Monitor? 

It is not very easy to get into 
the guts of Color Basic unless 
you own a 6809 disassembler. 
Lots of PEEKs and POKEs are 
needed to accumulate a little in- 
formation. Besides that, ma- 
chine-language programs re- 
quire a good number of POKEs. 

All this was tiring so I decid- 
ed to write a monitor program. I 
have written monitor programs 
for 6800 and 6809 machines in 



The Key Box 

Color Computer 
Color Basic 
16K RAM 



Assembly language, and I am 
well aware of the speed of exe- 
cution and tightness of the 
code. This time I decided to 
use resident Basic to do the 
job. Why? 

• Most commands don't need 
to be fast. 

• Implementation of Color 
Computer Basic routines is very 
easy. 

• The user can easily under- 
stand and modify the proce- 
dures. 

• No special cassette I/O func- 
tions or commands are needed 
to load and save the monitor 
programs. 

• Since the whole program is 
modularized, any routine can be 
substituted by a corresponding 
machine-language routine tak- 
en from Color Basic (if the entry 
address is known). In this way 
the monitor program will eventu- 
ally become smaller and faster. 

MIMO, which stands for Mlni- 
MOnitor, is the name of the pro- 
gram (see the Listing). It is bro- 
ken down into routines as in 
Table 1. 

Some parts of the conversion 
routines are shared by other 
commands (lines 60-70 are used 
by the "convert decimal charac- 
ter to hex" routine). 

MIMO's General Characteristics 

MIMO, a Basic hexadecimal 
debugging tool, occupies ap- 
proximately 2,160 bytes of 
memory. 



I suspect that the memory of 
the 4K computer is not enough 
for the whole program. If you 
own the 4K model, exclude the C 
and V commands. Remember, 
Color Basic reserves half of its 
4K of memory for itself. To in- 
crease available memory, play 
games with the Clear function. 
The amount of available memo- 
ry depends on how many spaces 
you waste between statements 
and tokens. Color Basic has on- 
ly a few cases where the spaces 
are necessary. 

Save the MIMO program on 
cassette or disk before you at- 
tempt to run it. Once you have 
copied the program, give it a try. 
MIMO's command menu (M, D, 
F, J, C, V and E) should appear. 

To call a function just type in 
the command's character, one 
space, and then input the hex 



addresses or data required by 
the particular command. The 
variables used in the program 
are shown in Table 2. 

MIMO's Commands 

• M (Memory examine/modify) 

Input formal M XXXX enter 
Output format XXXX YY Z? 

XXXX is the address to be exam- 
ined, YY is the contents of this 
location, and Z is the ASCII or 
graphics character of the con- 
tents (YY). The question mark is 
the prompt for your next action. 
Four things can be done at this 
point. 

First, input H (higher) and en- 
ter to advance to the next loca- 
tion without changing the con- 
tents of the memory. 

Second, hit L (lower) and enter 
to backtrack one location, leav- 



Lines 


Purpose 


20-25 


Convert a decimal character to hex 


30-35 


Convert a hex character to decimal 


40-48 


Decimal nibble (4 bits, 1 digit) to hex 


50-62 


Decimal address to hex 


64-70 


Pack a hex address (four characters) 


72-110 


Hex address to decimal 


120-128 


Pack four hex bytes 


130-140 


Pack eight ASCII or graphics characters 


200-275 


M command 


300-350 


D command 


400-460 


F command 


500-545 


C command 


550-560 


J command 


600-799 


Reserved space for future commands 


800-850 


Main routine, command's decoding 


950-980 


V command 




7a6/e 1. Line Functions 
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ing the memory unchanged. 

Third, hit R (restart) and 
enter to get back to the com- 
mand mode. 

Fourth, enter as two hex char- 
acters the new contents of this 
location. If the memory location 
is writeable, the new contents 
will be entered and the next 
memory address will show up 
on the screen; otherwise, an er- 
ror message will be delivered. 
(This happens when you try to 
write into ROM or nonexistent 
memory.) 
• D (Dump a block of memory) 

Input format D XXXX YYYY enter 

XXXX is the starting (From) ad- 
dress and YYYY is the ending 
(To) address. The fourth digit of 
the starting address will be 
masked to zero. The output for- 
mat consists of the block's 
eight-byte base address in two 
groups of four bytes each (re- 
member there are two charac- 
ters per byte), and eight ASCII 
or graphics characters corre- 
sponding to the displayed 
eight bytes. The lines are 



shown at an approximate rate 
of one per second. 
• F (Find a character or a 
string of characters within 
given limits) 

Input format F XXXX YYYY Z Z enter 

XXXX is again the From ad- 
dress, YYYY is the To address 

and Z Z is the character or 

string to be located. The output 
format consists of none, one or 
groups of four addresses per 
line, representing where the 
string or character under search 
begins. 

This is the slowest of MIMO's 
commands. It takes approxi- 
mately two minutes and fifteen 
seconds to search for one char- 
acter over a thousand locations 
of memory, and about five min- 
utes and forty seconds to 
search for a string of three bytes 
over the same amount of memo- 
ry. Just for comparison, my As- 
sembly-language monitor pro- 
gram takes only five seconds to 
search the whole 64K memory 
range. But remember that in 
MIMO you don't need assem- 
blers and editors. 



• J (Jump to a machine-lan- 
guage program) 

Input format J XXXX enter 

XXXX is the beginning address 
of the program to be run. 

• C (Convert a number from hex 
to decimal and vice versa) 



Input format C D HHHH enter 
orC H D. . .D enter 

The first format converts a hex- 
adecimal number HHHH to dec- 
imal. The routine recognizes on- 
ly four-digit hex numbers. If 
your hex number is only one, 
two or three digits long, just in- 



A— Temporary for conversions 

AA— -Temporary for A 

B$— ASCII form for a decimal byte 

BA$ — Beginning address (From) 

BE — Temporary decimal for BA$ 

BL$ — String concatenator for F command 

C$ — Command to be decoded 

CNT— Counter for the length of a string 

COS — Identifier for Convert command (H or D) 

DA, SDA— Decimal address 

DB, CDB, XDB— Decimal byte 
EA$— Ending address (To) 

ER— Error flag for illegal hex character 

Fl$— First four-byte string (D command) 

H$— Hex (byte or address) 

HB$— Hex byte 

HAS— Hex address 

INS — String to be found (F command) 

LA — Last address 

MO — Flag for D or F command 

OS— Operation to be decoded 

PS— Packing element 

PAS— Pack a string of four hex bytes 

SES— Second four-byte string (D command) 

V, V$ — Temporaries for conversions 



Table 2. Program Variables 





Program Listing 1 


GOTO80 


20 


H$= nn :GOSUB60 


25 


HB$=H$: RETURN 


30 


V$=HB$ : DA=0 : GOSUB90 


35 


DB=DA: RETURN 


40 


ER=0 


42 


IFV<48ORV>70THENER=1 


44 


IFV<58THENV=V-48 


46 


IFV>63THENV=V-b5 


48 


RETURN 


50 


H$="":A=DA/4096:A=INT(A) 


52 


GOSUB64 


54 


DB=DA-4096*A 


56 


A=DB/256:A=INT(A) :GOSUB64 


58 


DB=DB-256*A 


60 


A=DB/16:A=INT(A) :GOSUB64 


62 


A=DB-16*A 


64 


AA=A 


66 


IF A>9THEN A=A+55ELSE A=A+48 


68 


A$=CHR$(A) :H$=H$+A$:A=AA 


70 


RETURN 


72 


HB$=HA$ 


74 


V=ASC(HB$) 


76 


GOSUB40 : IFER=1THEN110 


78 


DA=4096*V 


80 


V$=MID$(HB$ f 2 f l) 


82 


V=ASC(V$) 


84 


GuSUB40 : IFER=1THEN110 


86 


DB= 2 5 6 * V : DA=DA+DB 


88 


V$=MID$(HB$,3 f l) 


90 


V=ASC(V$) 


92 


GUSUB40 : IFER=1THEN110 


94 


DB=16*V:DA=DA+DB 


96 


V$=RIGHT$(HB$,1) :V=ASC(V$) 


98 


GOSUB40 : IFER=1THEN110 


100 DA=DA+V 




Listing 1 continues 





NOW 
FOR 

CP/M (Z-80) & 
Model II TRSDOS 



The bestselling Adventure series by 

Scott Adams is now available for CP/M (Z-80) 

and Model II TRSDOS users! This is the original 

Adventure series which has received rave reviews 

in every major computer magazine. Order now! 

8" Disk of ALL 12 Adventures $129.95 




Minimum 24K • Single density • Soft sector • Single side 
Converted to run under CP/M by Russ Wetmore 

A Oivsion ol Scon Aflams. Inc DSalSf 

Adventure International • Box 3435 • Longwood, FL 32750 """ 

TOLL-FREE ORDER NUMBER: (800) 327-7172 Inquiries 

riuinmwm Please Specify |„uitorf 

s &"« CP/M or TRSDOS "IVUBU 



•-22 



sSee List of Advertisers on Page 435 
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put the appropriate number of 


Listing 1 continued 






leading zeros followed by the 


105 RETURN 








110 PRINT" ERROR, NOT HEX":RETURN 






hex number. 


120 PA$= n " 






The second type converts a 


122 FOR X=1T04 






decimal number (0-65535) to a 


124 DB=PEEK(DA) :GOSUB20 








126 PA$=PA$+HB$:DA=DA+1:NEXT 






hex one. The message Beyond 


128 RETURN 






Range will be displayed in case 


130 A$="" 






of a limits violation. 


132 FOR X=1T08 

134 DB=PEEK(DA) :IFDB<32THENDB=46 






• V (Verify the MIMO's 


136 P$=CHR$(DB) 






program) 


13 8 A$=A$+P$:DA=DA+1:NEXT 








140 RETURN 






Input format V enter 


200 HA$=MID$(0$ f 3 f 4) 








205 GOSUB72:IFER=1THEN10 






Nineteen seconds later the 


210 SDA=DA 






screen will show Good or Bad. If 


215 DB=PEEK(DA) :XDB=DB: IFDB<32THENXDB=46 
220 B$=CHR$(XDB) :GOSUB20 






the answer is Bad, reload MIMO 


225 PRINT HA$" "HB$ n "B$; 






because one or more locations 


230 INPUT HB$:IF HB$="H"THEN260 






of the program are gone. 


235 IF HB$="L"THEN275 






MIMO loads from 0603 to 


240 IF HB$="R"THEN10 








245 GOSUB30:IF ER=lTHEN255ELSE POKE SDA,DB:CDB=PEEK (SDA) 




0E74 hex. Lines 965 and 970 are 


250 IF CDBODB THEN PRINT"NO CHANGE" 






not calculated because they 


255 DA=SDA 






carry the sum which is altered 


260 DA=DA+1 
265 GOSUB50 






when you make changes (if you 


270 HA$=H$:GOTO210 






include these two lines you will 


275 DA=DA-l:GOT0265 






run into a race condition). If you 


300 BA$=MID$(0$ f 3,3) :BA$=BA$+"0" 
305 EA$=MID$(0$,8,4) 






change anything, even a charac- 


310 HA$=EA$:GOSUB7 2:LA=DA:IFER=1THEN10 






ter, the verification will always 


315 HA$=BA$:GOSUB72:IFER=1THEN10 






come back Bad. To fix the prob- 


320 IF MO=1THEN405ELSEGOSUB120 






lem type in the following line: 


325 FI$=PA$:GOSUB120 






330 SE$=PA$ 






962 PRINT A 


335 DA=DA-8:GOSUB130 








340 PRINTBA$ n "FI$" "SE$" "A$ 






The number on the screen 


345 IF DA>=LA THEN10 








350 GOSUB50:BA$=H$:GOTO320 






after the V command is entered 


400 PRINT :MO=l:GOT03 00 








405 BE=DA:MO=0:IN$=MID$(O$,13) 
410 CNT=LEN(IN$)/2:CNT=INT(CNT) 












415 BL$="" 




Program Listing 2 


420 FOR Z=xTOCNT 






425 DB=PEEK(DA) :GOSUB20 


10 


GOTO800 


43 BL$=BL$+H$:DA=DA+1:NEXT 


20 


H$="":GOSUB60 


435 IF BL$=IN$THEN450 


25 


HB$=H$: RETURN 


440 BE=BE+1:DA=BE:IF BE=LA THEN10 


30 


V$=HB$:DA=0:GOSUB90 


445 GOT0415 


35 


DB=DA: RETURN 


450 DA=BE:GOSUB50 


40 


ER=0 


455 PRINT" "H$" " ; : DA=DA+CNT 


42 


IFV<48ORV>70THENER=1 


460 GOTO440 


44 


IFV<58THENV=V-48 


500 CO$=MID$(0$,3,l) 


46 


IFV>63THENV=V-S5 


505 IF CO$="D"THEN530 


48 


RETURN 


510 H$=MID$(0$,5) :DA=VAL(H$) 


50 


H$= nn :A=DA/4096:A=INT(A) 


515 IF DA>6553 5THENPRINT"BEYOND RANGE" :GOTOl0 


52 


GOSUB64 


520 GOSUB50 


54 


DB=DA-4096*A 


525 PRINT" "H$:GOTO10 


56 


A=DB/256:A=INT(A) :GOSUB6 4 


530 HB$=MID$(0$,5) :L=LEN(HB$) 


58 


DB=DB-256*A 


535 IF L<>4THENPRINT"4 HEX CHARS ONLY" :GOTO10 


60 


A=DB/16:A=INT(A) :GOSUB64 


540 GOSUB74 


62 


A=DB-16*A 


545 PRINT DA:GOTO10 


64 


AA=A 


550 HA$=MID$(0$,3,4) :GOSUB72 


66 


IF A>9THEN A=A+55ELSE A=A+48 


555 EXEC DA 


68 


A$=CHR$(A) :H$=H$+A$:A=AA 


560 GOTO10 


70 


RETURN 


800 PRINT 


72 


HB$=HA$ 


805 PRINT"MIMO COMMANDS:M, D,F,C, J,V,E" 


74 


V=ASC(HB$) 


810 INPUT 0$:C$=LEFT$(0$,1) 


76 


GOSUB40 : IFER=1THEN110 


815 IFC$="M"THEN200 


78 


DA=4096*V 


820 IFC$="D"THEN300 


80 


V$=MID$(HB$,2,1) 


825 IFC$="F"THEN400 


82 


V=AS(J(V$) 


830 IFC$="C"THEN500 


84 


GOSUB40 : IFER=1THEN110 


835 IFC$="J"THEN550 


86 


DB= 2 5 6 * V : DA=D A+DB 


840 IFC$="V"THEN950 


88 


V$=MID$(HB$,3,1) 


845 IFC$="E"THENEXEC40999 


90 


V=ASC(V$) 


850 PRINT"WHAT ?":GOTO10 


92 


GUSUB40 : IFER=1THEN110 


950 X=1539:A=0 


94 


DB=16*V:DA=DA+DB 


955 FOR N=X TO X+2100:B=PEEK (N) 


96 


V$=RIGHT$(HB$,1) :V=ASC(V$) 


960 A=A+B:NEXT 


98 


GOSUB40 : IFER=1THEN110 


965 IFA=158211THENPRINT"G00D"ELSEPRINT"BAD" 


100 DA=DA+V 


970 GOTO10 




Listing 2 continues 
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AARDVARK 
TRS-80 COLOR OSI VIC-64 VIC-20 SINCLAIR TIMEX 





TUBE FRENZY 

(by Dave Edson) 
This is an almost indescribably fast action 
arcade game. It has fast action, an all new 
concept in play, simple rules, and 63 levels 
of difficulty. All machine code, requires 
Joysticks. Another great game by Dave 
Edson. TRS 80 COLOR ONLY. 16k and 
Joysticks required. $19.95. 



QUEST - A NEW IDEA IN ADVENTURE 
GAMES! Different from all the others. 
Quest is played on a computer generated 
map of Alesia. Your job is to gather men 
and supplies by combat, bargaining, explor- 
ation of ruins and temples and outright 
banditry. When your force is strong enough, 
you attack the Citadel of Moorlock in a 
life or death battle to the finish. Playable 
in 2 to 5 hours, this one is different every 
time. 16k TRS-80, TRS-80 Color, and Sin- 
clair. 13K VIC-20. $14.95 each. 




CATERPILLAR 

O.K., the Caterpillar does look a lot like a 
Centipede. We have spiders, falling fleas, 
monsters traipsing across the screen, poison 
mushrooms, and a lot of other familiar 
stuff. COLOR 80 requires 16k and Joy- 
sticks. This is Edson's best game to date. 
$19.95 for TRS 80 COLOR. 

PROGRAMMERS! 

SEE YOUR PROGRAM IN THIS SPACE!! 

Aardvark traditionally pays the highest com- 
missions in the industry and gives programs 
the widest possible coverage. Quality is the 
keyword. If your program is good and you 
want it presented by the best, send it to 
Aardvark. 




ADVENTURES!!! 

These Adventures are written in BASIC, are 
full featured, fast action, full plotted ad- 
ventures that take 30-50 hours to play. (Ad- 
ventures are interactive fantasies. It's like 
reading a book except that you are the main 
character as you give the computer com- 
mands like "Look in the Coffin" and 
"Light the torch.") 

Adventures require 16k on TRS80, TRS80 
color, and Sinclair. They require 8k on OSI 
and 13k on Vic-20. Derelict takes 12k on 
OSI. $14.95 each. 

ALSO FROM AARDVARK - This 
TRS-80 Color and OSI), business 



CATCH'EM 

(by Dave Edson) 
One of our simplest, fastest, funnest, all 
machine code arcade games. Raindrops and 
an incredibe variety of other things come 
falling down on your head. Use the Joy- 
sticks to Catch'em. It's a BALL! — and a 
flying saucer! — and a Flying Yl— and so 
on. TRS 80 COLOR. $19.95. 

BASIC THAT ZOOOMMS!! 
AT LAST AN AFFORDABLE COMPILER! 

The compiler allows you to write your 
programs in easy BASIC and then auto- 
matically generates a machine code equiv- 
alent that runs 50 to 150 times faster. 

It does have some limitations. It takes at 
least 8k of RAM to run the compiler and it 
does only support a subset of BASIC— 
about 20 commands including FOR, NEXT, 
END, GOSUB, GOTO, IF, THEN, RETURN, 
END, PRINT, STOP, USR (X), PEEK, 
POKE, *,/,+, -, > , < ,=, VARIABLE 
NAMES A-Z, SUBSCRIPTED VARIABLES, 
and INTEGER NUMBERS FORM 0-64K. 
TINY COMPILER is written in BASIC. It 
generates native, relocatable 6502 or 6809 
code. It comes with a 20-page manual and 
can be modified or augmented by the user. 
$24.95 on tape or disk for OSI, TRS-80 
Color, or VIC. 

Please specify system on all orders 

is only a partial list of what we carry. We have a lot of other games (particularly for the 
programs, blank tapes and disks and hardware. Send $1 .00 for our complete catalog. 



ESCAPE FROM MARS 

(by Rodger Olsen) 
This ADVENTURE takes place on the RED 
PLANET. You'll have to explore a Martian 
city and deal with possibly hostile aliens to 
survive this one. A good first adventure. 

PYRAMID (by Rodger Olsen) 
This is our most challenging ADVENTURE. 
It is a treasure hunt in a pyramid full of 
problems. Exciting and tough! 

HAUNTED HOUSE (by Bob Anderson) 
It's a real adventure — with ghosts and ghouls 
and goblins and treasures and problems — 
but it is for kids. Designed for the 8 to 12 
year old population and those who haven't 
tried Adventure before and want to start 
out real easy. 

DERELICT 

(by Rodger Olsen & Bob Anderson) 
New winner in the toughest adventure from 
Aardvark sweepstakes. This one takes place 
on an alien ship that has been deserted for a 
thousand years — and is still dangerous! 



w 



AARDVARK - 80 

2352 S. Commerce, Walled Lake, Ml 48088 

(313)669-3110 

Phone Orders Accepted 8:00 a.m. to 4:00 p.m. EST. Mon.-Fri. 



% 



sSee List of Advertisers on Page 435 
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is your new checksum. Delete 
line 962 and replace the old 
6-digit number in line 965 with 
the new one. If you add or delete 
entire lines, recalculate the 
bytes taken by the program. 
Replace 2100 in line 955 with 
this number. Then do the trick 
with lines 962 and 965 as 
described before. 

Note: Extended Basic loads 
MIMO from 1E03to2674 in hex. 
Therefore, change the Basic ad- 
dress in line 950 from 1539 to 
7683, and the checksum in line 
965 to 160953. 

To add more commands, de- 
code them at the main routine 
(lines 800-850), and write them 
in the reserved space (lines 
600-799). 

• E (Exit to Color Basic) 

Input format E enter 

This takes you back to Color 
Basic without pressing the 
break key. 

Possible Improvements 

Some people like sounds in 
their programs and some don't. 
If you belong to the first group, 
you can add sounds or single 
beeps in different frequencies to 
identify special features (for ex- 
ample, in case of an error mes- 
sage, or when you find an ad- 
dress in the F command, or 
when you display the answer in 
the V command). To single beep 
every time you display the 
MIMO's menu, add the line: 

802SOUND125.2 

Those who have the 16K Color 
Computer and like challenges 
might try to add the following 
commands: 

• T (Transfer a block of 
memory) 

• K (Compare blocks of 
memory) 

• R (Dump computer's internal 
registers) 

• G (Go to the last jump input) 

• B (Breakpoint implemen- 
tation) 

• O (Observe a block of memory 
while you run a program). 

Now, if you love challenges, 
try writing an assembler, editor, 
tracer, and disassembler! ■ 

Sergio Zigras enjoys radio- 
controlled airplanes and inter- 
national folk dancing. 
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Listing 2 continued 

105 RETURN 

110 PRINT" ERROR, NOT HEX":RETURN 

120 PA$=" n 

122 FOR X=1T04 

124 DB=PEEK(DA) :GOSUB20 

126 PA$=PA$+HB$:DA=DA+1:NEXT 

128 RETURN 

130 A$="" 

132 FOR X=1T08 

134 DB=PEEK(DA) :IFDB<32THENDB=46 

136 P$=CHR$(DB) 

138 A$=A$+P$:DA=DA+1:NEXT 

140 RETURN 

200 HA$=MID$(0$,3,4) 

205 GUSUB7 2:IFER=1THEN10 

210 SDA=DA 

215 DB=PEEK(DA) :XDB=DB: IFDB<32THENXDB=46 

220 B$=CHR$(XDB) :GOSUB20 

225 PRINT HA$" "HB$ n n B$; 

230 INPUT HB$:Ir HB$="H n THEN260 

235 IF HB$="L"THEN275 

240 IF HB$="R"THEN10 

245 GUSUB30:IF ER=1THEN255ELSE POKE SDA,DB:CDB=PEEK (SDA) 

250 IF CDBODB THEN PRINT n NO CHANGE" 

255 DA=SDA 

260 DA=DA+1 

265 GOSUB50 

270 HA$=H$:GOTO210 

275 DA=DA-l:GOT026 5 

300 BA$=MID$(0$,3,3) :BA$=BA$+ n 0" 

305 EA$=MID$(0$,8,4) 

310 HA$=EA$:GOSUB7 2:LA=DA:IFER=1THEN10 

315 HA$=BA$:GOSUB7 2:IFER=1THEN10 

320 IF MO=1THEN405ELSEGOSUB120 

325 FI$=PA$:GOSUB120 

330 SE$=PA$ 

335 DA=DA-8:GOSUB130 

340 PRINTBA$" "FI$" n SE$" n A$ 

345 IF DA>=LA THEN10 

350 GOSUB50:BA$=H$:GOTO320 

400 PRINT :MO=l:GOT03 00 

405 BE=DA:MO=0:IN$=MID$(O$,13) 

410 CNT=LEN(IN$)/2:CNT=INT(CNT) 

415 BL$="" 

420 FOR Z=lTOCNT 

425 DB=PEEK(DA) :GOSUB20 

430 BL$=BL$+H$:DA=DA+1:NEXT 

435 IF BL$=IN$THEN450 

440 BE=BE+1:DA=BE:IF BE=LA THEN10 

445 GOT0415 

450 DA=BE:GOSUB50 

455 PRINT" "H$" ";:DA=DA+CNT 

460 GOTO440 

500 CO$=MID$(0$,3,l) 

505 IF CO$="D"THEN530 

510 H$=MID$(0$,5) :DA=VAL(H$) 

515 IF DA>65535THENPRINT"BEYOND RANGE" :GOTO10 

520 GOSUB50 

525 PRINT" "H$:GOTO10 

530 HB$=MID$(0$,5) :L=LEN(HB$) 

535 IF L<>4THENPRINT"4 HEX CHARS ONLY" :GOTO10 

540 GOSUB7 4 

545 PRINT DA:GOTO10 

550 HA$=MID$(0$,3,4) :GOSUB72 

555 EXEC DA 

560 GOTO10 

800 PRINT 

805 PRINT"MIMO COMMANDS:M f D, F , C, J,V,E" 

810 INPUT 0$:C$=LEFT$(0$,1) 

815 IFC$= n M"THEN200 

820 IFC$="D"THEN300 

825 IFC$="F"THEN400 

830 IFC$="C"THEN500 

835 IFC$="J"THEN550 

840 IFC$="V"THEN950 

845 IFC$="E"THENEXEC40999 

850 PRINT"WHAT ?":GOTO10 

950 X=7683:A=0 

955 FOR N=X TO X+2100 :B=PEEK(N) 

960 A=A+B:NEXT 

965 IFA=160953THENPRINT"GOOD"ELSEPRINT"BAD" 

9/0 GOTO10 



TRS-80 
MODEL II 



^ 




Now CMy $2899 



HARD DISK SYSTEM 
FOR THE MODEL III 

6* MEG. $1795°° 

12* MEG. 331995 00 

19* MEG. $2195°° 

COMPLETE. READYTO RUN. NOW AVAILABLE!! 

LDOS REQUIRED — $129 



'unformatted capacity 



TRS-80 
MODEL 




16K $825°° 

48K $849°° 

48K, 1 Drive $1499°° 
48K, 2 Drive $1749°° 

RS-232 (INSTALLED) CpOCl 




•EPSON* 

MX-80 $459 

MX-80 F/T $525 
MX- 100 $685 

WE STOCK A COMPLETE LINE 

OF EPSON ACCESSORIES 

CALL FOR PRICES!! 



•C. ITOH* 

PROWRITER 



8510 PARALLEL-10" 
8510SERIAL-10" 
1550 PARALLEL-15" 
1550SERIAL-15" 



$489 
$639 
$719 
$769 



STARWRITER 



F-10 40 CPS, PARALLEL $1450 

F-1040CPS, SERIAL $1599 

F-10 55 CPS, PARALLEL $1699 

F-10 55 CPS, SERIAL $1850 



OKIDATA 



ML-80 

ML-82A 

ML-8>A 

ML-84P 

ML-84S 



$>50 

$429 

$699 

$1049 
$1149 



OKIGRAPH $60 



THESE ARE OUR CASH DISCOUNTED PRICES. C.O.D. AND CHARGE ORDERS ARE 3% HIGHER. ALL COMPUTERS ARE 
SHIPPED FREIGHT COLLECT. PRICES, SPECIFICATIONS AND AVAILABILITY ARE SUBJECT TO CHANGE WITHOUT NOTICE 
IBM & IBM PERSONAL COMPUTERS ARE TRADEMARKS OF INTERNATIONAL BUSINESS MACHINES, INC. TRS-80 AND RADIO 
SHACK ARE TRADEMARKS OF TANDY CORPORATION. 



£rizw& 




\± 918/829-4844 

AMERICAN 



SmaII 
BlisIness 



118 SO. MILL ST 
PRYOR, OK 74561 



COMPUTERS 



HARDWARE 



Without a hardware mod, your 80 is immune to rude interruptions. 



Interrupt Your 80 



Douglas C. Fisher 
3835 S. Pitkin Circle 
Aurora, CO 80013 

The TRS-80 was not designed 
for control or interrupt-driv- 
en applications. Attempting to 
utilize interrupts of any mode 
results in a Restart operation, 
bringing control back to the 
Basic interpreter. 

This article explains the 
changes in hardware necessary 
for the TRS-80 to use interrupts. 



In addition, it describes and ex- 
plains the three interrupt modes 
of the Z80 microprocessor. 

It is important to remind you 
that removing the TRS-80 
keyboard cover voids Radio 
Shack's warranty. If service is 
required by the Radio Shack re- 
pair center, the cost of the repair 
will include returning the unit to 
its original electrical condition. 
In other words, Radio Shack will 
remove any modifications at 
your expense. 
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Figure 1 
258 • 80 Micro, January 1983 



Interrupts provide an asyn- 
chronous means for an external 
device to signal to the CPU that 
it wishes to input data to, or to 
take data from the computer. 
The Z80 has three modes of 
maskable and one mode for 
non-maskable interrupts. A 
maskable interrupt can be ig- 
nored by the CPU by using the Dl 
(disable interrupt) instruction, 
whereas the non-maskable in- 
terrupt cannot be disabled. 

Non-Maskable Interrupt 

This negative edge triggered 
input has priority over maskable 
interrupts. It generates an auto- 
matic Restart to location 0066H; 
the TRS-80 uses this input as a 
Reset. Therefore, without ex- 
tensive modifications, this 
mode cannot be used for other 
than a Reset. 

Maskable Interrupt 

The programmer can selec- 
tively enable or disable the 
maskable interrupt (INT). There 
are two internal interrupt flip- 
flops in the Z80. The enable 
interrupt instruction El sets 
both IFF1 and IFF2 to a logic 
one, enabling the interrupt at 
the completion of the instruc- 
tion following the El instruction. 
The disable interrupts instruc- 
tion Dl resets IFF1 and IFF2to 
a logic zero, preventing the Z80 
from responding to interrupts. 

Maskable Interrupt Mode Zero 

Mode Zero in the Z80 is iden- 
tical to the 8080-A interrupt se- 



quence. The interrupting device 
places an instruction on the 
data bus for execution by the 
CPU. Although normally a re- 
start (RST) instruction for sim- 
plicity, any multi-byte instruc- 
tion can be used, as this mode 
looks for executable code. 

This mode is not recommended 
for the TRS-80 for the following 
reasons. A single-byte instruction 
(Restart) returns control to the 
Basic interpreter. If a multi-byte 
instruction is used, the first byte 
is read during an interrupt ac- 
knowledge cycle. Remaining 
bytes of the instruction are read 
by normal read cycles with the 
program counter remaining in 
its preinterrupt state. The 
TRS-80 memory must not re- 
spond to these read sequences, 
requiring extensive modifica- 
tion to the TRS-80 hardware. 

Maskable Interrupt Mode One 

Mode One is very similar to an 
NMI interrupt except the CPU 
does an automatic call to loca- 
tion 0038H instead of 0066H. 
This mode is not recommended: 
Response to this type of inter- 
rupt also returns control to the 
Basic interpreter. 

Maskable Interrupt Mode Two 

Mode Two, the most power- 



Trie Key Box 

Basic Level II 
Model I 
4KRAM 



FRANKLIN COMPUTERS 

Fully Apple Compatible 

FRANKLIN ACE lOOO with64K, 8 Expansion Slots 

for peripheral cards; a joystick/paddle connector. A full 72- key typewriter- style key- 
board that includes 1 2 key numeric pad, upper/lower case with shift and alpha lock, 
full cursor control, and special keys for use with Visicalc. Built into the unit is a 50- 
watt power supply and cooling fans which permit use of all 8 peripheral expansion 
slots without power or overheating problems. ^ *m J» "%^ ^ #% 



FRANKLIN DISK DRIVE «*. ««**.... . 

5.25" disk drive with 143k bytes of storege 



FRANKLIN DISK DRIVE 



only 



same as above without controller 



'*.;% 



COLOR 
COMPUTERS 




16K LEVEL I $279 

16K EXTENDED $379 

32K EXTENDED $$2Q 



TRS-80 
MODEL 1 6 




MODEL 16-1 DRIVE 
MODEL 16-2 DRIVE 



$4499 
$4779 



DT-1 VIDEO DATA TERMINAL $620 

For use with Model 16 or Mainframe Computer 



THESE ARE OUR CASH DISCOUNTED PRICES. COD. AND CHARGE ORDERS ARE 3% HIGHER. ALL COMPU- 
TERS ARE SHIPPED FREIGHT COLLECT. PRICES, SPECIFICATIONS AND AVAILABILITY ARE SUBJECT TO 
CHANGE WITHOUT NOTICE. IBM & IBM PERSONAL COMPUTERS ARE TRADEMARKS OF INTERNATIONAL 
BUSINESS MACHINES. INC. 



918/825-4844 



AMERICAN 



118 SO. MILL ST 
PRYOR, OK 74*61 
(918) 829-4844 
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*TWO WAIT STATES ARE AUTOMATICALLY INSERTED BY THE CPU TO ALLOW FOR A RIPPLE PRIORITY 
INTERRUPT SCHEME 



Figure 2 

ful of the maskable interrupt any memory location by a sin- 
modes, allows an indirect call to gle 8-bit vector supplied by the 



Which TRS-80* Accounting Software 

Do I Buy . . . 

That's a tough question. I know, I asked it myself not very long ago. I'm Mike 
Motta. As president of Shawmut Systems, specialists in TRS-80* custom soft- 
ware, my customers were asking me for Model II and 16 Accounting Software 
— GL, AR, AP and Payroll. But I said "Why write the software. There must be a 
good package already available." So I searched for the best I could find. And I 
found it! 

Now, when I tell you that these are the best Accounting programs I've seen on a 
microcomputer, you probably think that you are just listening to another sales 
pitch. But you're not. You're listening to a businessman with over twenty years 
combined experience in sales, management, and programming. So when I say 
that these programs will work for you, it really means something. 

Each program, designed for the Model II or 16, will work with one or more floppy 
or hard disks. With each program, I'll include a 200 page manual written with 
the first time user in mind, and a set of sample data files so you can start using 
the program right away. 

But I won't stop there. If you have a question, or a problem, call me. You won't 
get an operator, or order taker. You'll get me. And if I can't talk to you on the 
spot, I'll call you back. And I'll fix your problem. FAST. 

Now I could say a lot more about these programs, but you really won't know 
how good they are until you try them. So, order the programs you need, and try 
them for 14 days. If you're not convinced that these are the programs for you, 
send them back, and I'll refund your money. 

My price for these programs is only $289.00 each, postpaid. I could charge hun- 
dreds more, but I want you to have the best programs at the best possible price. 
So mail or call your order in today. I'll make sure you'll be satisfied. 



Model 11/16 Accounting Software Packages 



Accounts Receivable 
General Ledger 



Accounts Payable 
Payroll 



SHAWMUT SYSTEMS 

105 Circle Drive • PO Box 324- A 

Somerset, MA 02726 

(617)672-9794 



Ask about our Model I and III 
versions. 

"TRS-80 is a Trademark 
of Tandy Corp. 



Send check, money order or 
Visa/MC number 



Mass. residents add 
5% sales tax. 



^363 



interrupting device. In this 
mode, the interrupting device 
places the vector on the data 
bus in response to an interrupt 
acknowledge. This vector be- 
comes the least significant 
eight bits of a pointer; the I reg- 
ister contents are combined as 
the most significant eight bits of 
the pointer. This 16-bit pointer 



becomes the address in a vector 
table containing the starting ad- 
dress of the interrupt routine. 

Looking at Fig. 1 , suppose the 
I register was previously loaded 
with the value 50H. Assume also 
that the interrupt service routine 
resides at address 6000H. In 
step one, the interrupting device 
places the value 10H on the data 
bus during an interrupt acknowl- 
edge cycle. The CPU then takes 
the value 10H, and with the con- 
tents of the I register as the 
most significant byte, forms a 
16-bit pointer (the address of a 
vector table). The vector table 
here is at 5010H. At this point 
(step two), the CPU fetches the 
two bytes at pointer (5010H) and 
pointer plus one (501 1H). Note: 
Address 5010H contains the 
least significant byte of the in- 
terrupt service routine's starting 
address. These two bytes are 
loaded into the program counter 
and the CPU begins executing 
the program at location 6000H 
(step three). 

Mode Two cannot be used in 
the TRS-80 the way it comes 
from the factory; a slight modifi- 
cation is necessary. 

Notice in Fig. 3 that data on 
the data bus is only enabled into 
the CPU during a read operation 
(RD) true. The (RD) signal never 



Step 1: Remove all cables and connectors from the keyboard unit. 

2: Remove the 6 screws from bottom side of keyboard unit. Note the three 
different lengths. 

3: Turn unit over and remove top. A word of caution: Some units may have 
the main power LED mounted to the top cover instead of soldered on 
keyboard PCB. If so, take care not to pull wires from the LED. 

4: Lift up the keyboard enough to remove the five rubber spacers and lay it 
back down. 

5: Lift both PC boards up and remove bottom cover. 

6: Unfold the two PC boards and lay both face down to expose printed cir- 
cuit sides. 

7: Locate the Z-53. ICs are numbered on front side of board. Cut circuit 
path which leads from pin five of Z-53 to feed through below pin seven of 
Z-53. See Fig. 5. 

8: Fold the main PC board back over the keyboard to expose component 
side. 

9: Take the IC to be soldered in (a 74LS08), and bend all the leads straight 
out except pins seven and 14. See Fig. 6a. 

10: Lay the 74LS08 on top of Z-52 making sure pin 14 lays on top of pin 14 of 
the Z-52 and pin 7 lays on top of the pin 7 of Z-52. These are the power 
and ground pins, respectively. Solder pin 14 to 14 and 7 to 7. See Fig. 
6b. This new IC is referred to as the piggyback chip. 

11: Solder a small gauge wire from pin 13 of the piggyback chip to feed 
through just below pin seven of Z-53. See Fig. 7. Solder a wire from the 
piggyback chip pin 12 to Z-73 pin three. Solder a wire from the piggyback 
chip pin 11 to Z-53 pin five. 

12: Check your work watching for solder shorts. Carefully reassemble the 
unit. 

Table 1 



260 • 80 Micro, January 1983 



DISK DRIVES 



40 TRACK 
$149 

with POWER SUPPLY $1 89 

and CABINET 

•CONTROL DATA CORP. 



40 TRACK 

BARE $199 

with POWER SUPPLY $239 

and CABINET 



DISK DRIVES 

For The TRS-80 MODEL III 
DRIVE DRIVE 1 



Single Side, 40 Track $595 



Double Side, 40Track $729 



Single Side, 80 Track $729 



Double Side, 80 Track $819 



Single Side, 40 Track 



Double Side, 80 Track 



Single Side, 40 Track 



Double Side, 80 Track 



$219 



$279 



$279 



$329 



The disk drives we sell for the Model III are the Tandon drives. 
Drive includes the controller board, power supply, cables and all 
mounting hardware. Complete instructions are included for 
installation. It takes 30 minutes to an hour to install disk drives in 
a Model III. No soldering is required. TRSDOS operating system 
is not included in this low price, 



IBM 

PERSONAL COMPUTER 

DISK DRIVES 

SINGLE SIDE, 40 TRACK $209 

DOUBLE SIDE, 40 TRACK $269 



These drives are fully compatible with the IBM Personal Compu- 
ter. They can be used as the first or second drive and come with 
our exclusive 90 day warranty. DOS and Drive Adapters required. 
Our disk drives adhere to the high quality standards that IBM 
demands. 



TEAC 



TANDON 



BARE 



COMPLETE 

WITH POWER SUPPLY & CABINET 



40 Track, Single 
40 Track, Double 
80 Track, Single 
80 Track, Double 



$199 40 Track, Single 

$289 40 Track, Double 



$289 



$349 



Track, Single 



Track, Double 



$239 
$340 
$340 
$399 



BARE 

40 Track, Single 
40 Track, Double 
80 Track, Single 
80 Track, Double 



$199 
$269 
$269 
$319 



COMPLETE 

WITH POWER SUPPLY & CABINET 
40 Track, Single $239 

40 Track, Double $319 



80 Track, Single 



80 Track, Double 



$319 



$369 



We sell two brands of disk drives for the TRS-80: the TEAC and the Tandon. The TEAC disk drive has a 1 year warranty, the Tandon 
has a 90 day warranty. The TEAC uses a lead screw actuator, the Tandon uses a split band type actuator. The track to track access 
rate for the Tandon is 5 milliseconds, as opposed to 25 milliseconds for the TEAC. The TRS-80 Model III requires a faster drive speed 
than the Model I, therefore the Tandon works better with the Model III. With the slower drive speed requirements of the Model I, the 
TEAC is a more reliable drive. We have both 40 track and 80 track drives with either single or dual head. All drives are capable of 
double density. These drives are available either bare or complete with power supply and cabinet. A cable is required to hook up the 
drives. We have both two-drive and four-drive cables. All drives come with complete instructions for hooking up a system. TEACs 
and Tandons can be inter mixed with other drives on the same system. 



THESE ARE OUR CASH DISCOUNTED PRICES. C.O.D. AND CHARGE ORDERS ARE 3% HIGHER. ALL COMPUTERS ARE 
SHIPPED FREIGHT COLLECT. PRICES, SPECIFICATIONS AND AVAILABILITY ARE SUBJECT TO CHANGE WITHOUT NOTICE. 
IBM & IBM PERSONAL COMPUTERS ARE TRADEMARKS OF INTERNATIONAL BUSINESS MACHINES, INC. TRS-80 AND RADIO 
SHACK ARETRADEMARKSOFTANDY CORPORATION. 
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Figure 4 



Address Data 


Instruction 


Comments 


4500H 


31 FF4F LD SP, 4FFFH 


; top of memory (4k) 


4503H 


3E48 


LD A, 48H 


; most significant byte of 


4505H 


ED 47 


LDI, A 


; interrupt vector table 


4507H 


ED5E 


IM2 


; set interrupt mode 2 


4509H 


FB 


El 


; enable interrupt 


450AH 


00 


NOP 


; wait for interrupt 


450BH 


18 FC 


JR FC 


loop 






Interrupt Vector Table 






Address 


Data 






4800H 


00 






4801 H 


4C 






4802H 


00 






4803H 


4D 






4804H 


05 






4805H 


4E 






Interrupt Service Routines 


4C00H 


3E30 


LD A.30H 


; This routine puts a in the 
center of screen. 


4C02H 


32203E 


LD (3D20H),A 




4C05H 


ED4D 


RETI 


; Return from interrupt. 


4D00H 


3E32 


LD A,32H 


; Puts a 2 in center of screen. 


4D02H 


C3024C 


JP 4C02H 




4E05H 


3E34 


LD A.34H 


Puts a 4 in center of screen. 


4E07H 


C3024C 


JP 4C02H 








Program Listing 



goes true during an interrupt 
acknowledge cycle. Therefore, 
there is no way to enable the in- 
terrupt vector from the interrupt- 
ing device into the CPU. By stu- 
dying Fig. 2, it becomes clear 
that the data must be enabled 
into the CPU when the interrupt 
acknowledge signal (INTAK) 
goes true. This is easily ac- 
complished by the addition of 
one AND gate (74LS08) (see Fig. 
4). With this addition to the cir- 
cuit, the data is enabled into the 
CPU either by the interrupt ac- 
knowledge signal or the read 
signal. 

The steps to actually modify 
the TRS-80 are shown in Table 1 . 
To test the interrupt mode, a 
simple interface board (which 
can be built on a vector board or 



any prototype material) is re- 
quired. A 40-pin ribbon cable 
and 40-pin edge connector is re- 
quired to interface directly with 
the TRS-80 expansion interface 
connector. 

It is important that the inter- 
face board be powered by its 
own 5 volts dc power supply. 
Do not use the power supply in- 
ternal to the TRS-80. This 
avoids any possible damage to 
the TRS-80 power supply. 

A schematic of the required 
interface board for testing the 
interrupt mode is shown in Fig. 
8. 1 recommend the 40-pin ribbon 
cable be as short as possible to 
eliminate noise problems on the 
bus. Good grounds are also very 
important. 

U1, a 74LS00, serves as a 
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DISCOUNT SOFTWARE 



NEWDOS, DOSPLUS 

AN<I NOW 

LDOS!! 

YOUR CHOICE, ONLY $1 29 EACH. 

NEWDOS, DOSPLUS AND LDOS are three of the most 
advanced operating systems ever available for the TRS- 
80. After spending thousands of dollars on your com- 
puter, why limit yourself by using an inferior operating 
system? 



ATON 

ATON CP/M 

for 
Radio Shack Hard Disk.. .$235 
ATON CP/M 

LEVEL II 

for 

TSR-80 Mod. II. ..$279- 



COLOR COMPUTER 
GAMES 

COSMIC DOGFIGHT 
OFFENDER,PACKMAN 

GET ALL THREE OF OUR NEWEST 
COLOR COMPUTER GAMES 
EITHER DISK OR CASSETTE. 

CASSETTE .. .$44.00 
DISK $59.00 



* * NEW RELEASES * • 

COSMIC DOGFIGHT cassette 14.95 

DISK 19.85 

CASSETTE 29.95 

DISK 34.95 



OFFENDER 



OTHER FAVORITES 



PACKETMAN 
MOONLANDER 

METEROIDS 
SPACE INVADERS 



CASSETTE 
DISK 

CASSETTE 
DISK 

CASSETTE 

CASSETTE 



24.95 
29.95 
14.95 
19.95 
21.95 
21.95 



RADIO SHACK SOFTWARE 



MODEL I, III 

Cassette Scrcpsit 

Cassette Portfolio 

Stock Pack 

Disk Mailing List 

General Ledger I 

Inventory Control I 

Accts Payable 

Accts. Receivable 

Disk Payroll 

Business Mailing List 26-1558 

Profile 26-1562 

Scripsit 

Visicalc-Mod I 

Visicalc-Mod III 

Project Manager 

Checkwriter 

Super Scripsit 



26-1505 
26-1506 
26-1507 
26-1551 
26-1552 
26-1553 
26-1554 
26-1555 
26-1556 



26-1563 
26-1566 
26-1569 
26-1580 
26-1584 
26-1590 



$34.95 

$24.95 

$44.95 

$34.95 

$87.95 

$87.95 

$138.00 

$138.00 

$175.00 

$8/.95 

$69.95 

$87.95 

$87.95 

$175.00 

$87.95 

$87.95 

$175.00 



Scripsit Dictionary 26-1591 

Profile III Plus 26-1592 

Desktop Plan-80 26-1594 

Budget Mgmt 26-1603 

Advanced Stat Analysis 26-1705 



$131.00 

$175.00 

$175.00 

$22.00 

$39.95 



MODEL II 

Gen Ledger 1 Disk 26-4501 $175.00 

Inventory Mgmt System 26-4502 $175.00 



Mod II Visicalc 
Profile II 
Profile II Plus 
Mod II Scripsit 2.0 
Scripsit Dictionary 
Inventory Mod II 
Order Entry ICS 



26-4511 $263.00 
26-4512 $170.00 
26-4515 $275.00 
26-4531 $375.00 
26-4534 $175.00 
26-4602 $275.00 
26-4607 $465.00 



ofcC° 



titrt 



w 



LAZY WRITER 

ALCOR PASCAL 

MICRO CLINIC 

CHEXTEXT MICROSOFT 

LEVEL III BASIC 

TYPING TUTOR 

EDITOR ASSEMBLER + 

ADVENTURE 

MOD I FORTRAN 

A.L.D.S. 

MOD I BASIC COMPILER 

MOD I MuMATH 

OLYMPIC DECATHLON 

EDITOR ASSEMBLER (Disk) 

CP/MFORTRAN-80 

CP/M BASIC COMPILER 

CP/M MuMATH-MuSIMP-80 

CP/M COBOL COMPILER 

CP/MBASIC-80 



$175 

$199 

$24.95 

$34.95 

$50 

$15 

$30 

$30 

$87.95 

$85 

$195 

$75 

$24.95 

$49.95 

$475 

$375 

$250 

$699 

$350 



BASIC COMPILER II $395 

COBOL-80MODII $699 

M/SORT $195 

ASPEN: 
GRAMMATIKI/III $75 

GRAMMATIKII $99 

PICKLES & TROUT: 
RANDOM HOUSE PROOF READER $50 

CP/M FOR MODEL II $185 

CP/M FOR MODEL 16 $220 

MISC: 
BOOKKEEPER I /III 

Cassette $49.95 Disk $59.95 

MICRO SEABATTLE 

Cassette $19.95 Disk $24.95 

LIST: 1 (Telephone List) 

Cassette $9.95 Disk $14.95 

COMPUTER BASEBALL 

Cassette $14.95 Disk $19.95 



FARM 
and 
RANCH MANAGEMENT 



BEEF PROJECTION 

BEEF RATION 

DAIRY COW 

FEED LOT Models I and III 

Model II 
FARM RECORD 
GOVERNMENT PROGRAM 
GRAIN STORAGE 
LOAN 

MACHINE COST 
RECORD MANAGEMENT 
ESTATE TAX 
FEEDFORMULATOR 
PASTURE PROJECTION 



$20.00 
$15.00 
$15.00 
$35.00 
$100.00 
$35.00 
$15.00 
$15.00 
$15.00 
$20.00 
$15.00 
$25.00 
$35.00 
$20.00 



THESE ARE OUR CASH DISCOUNTED PRICES. C.O.D. AND CHARGE ORDERS ARE 3% HIGHER. ALL COMPU- 
TERS ARE SHIPPED FREIGHT COLLECT. PRICES. SPECIFICATIONS AND AVAILABILITY ARE SUBJECT TO 
CHANGE WITHOUT NOTICE. IBM & IBM PERSONAL COMPUTERS ARE TRADEMARKS OF INTERNATIONAL 
BUSINESS MACHINES. INC. 



918/829-4844 



AMERICAN 



118 SO. MILL ST 
PRYOR, OK 74561 

(918) 825-4844 



* 844 SmaII 
^|N BusiNEss 
COMPUTERS 



SECURE 
PROGRAMS 



WITH 



COPV-NOT 



COPY-NOT IS A COPY PROTECTION PGM. WHICH PERMITS 
BASIC SOFTWARE AUTHOR TO PROTECT HIS CREATION 
FROM PIRATES. PROGRAMS ON THE DISK ARE DATA EN- 
CRYPTED. PROGRAMS IN MEMORY RUN IN AN ENCRYPTED 
MODE FOR MAX-PROTECTION. 

COPY-NOT satisfies external security needs by forcing the would 
be pirates into the assembly language code where he must stay 
for several hundred hours before he can attempt to breach the 
security of COPY-NOT. 

COPY-NOT is an external security program for "BASIC" software 
authors. It is a menu-driven tutorial program that comes with a 41 page 
owners manual and technical support registration card. COPY-NOT sig- 
nificantly modifies TRSDOS 2.3 by killing off three TRSDOS modules thus 
achieving a net disk overhead of less than 2565 bytes. COPY-NOT stores 
all "/BAS" compressed files on the disk in encrypted form. COPY-NOT 
significantly modifies "DOS READY" function, but still allows library 
command execution. It's "DO/JCL" file allows up to nine DOS sequence 
commands. It has no impact on available memory during execution, and 
renders "BASIC*" equal to "GARBAGE". Furthermore, it allows the soft- 
ware authorto place his 128 character title line on each diskette and has an 
AUTO serial number feature that places your 10 digit serial number on 
each application program diskette, and increments the serial number by 
one. It even has a simultaneous manufacturing feature that allows you to 
make up to three application programs at once. COPY-NOT error checks 
during execution and forces frustrated pirates into the assembly language 
code. 

COPY-NOT'S MANUAL AVAILABLE FOR 

$8.00. MANUAL PRICE APPLIED TO 

COPY-NOT ORDER. 



$275.00 



OR 



C0DE4 



CODE4 is an internal security encryption program that is undecryptable with it's a 
1.6x10" keys. CODE4 is a MICROSOFT compiled BRUN utility program that handles 
ASCII files with FIELD lengths of 256 characters or less. Generally, the file must not be 
longer than 13,056 bytes or 225 lines. CODE4 comes with its list source which will allow 
easy customizing of its RANDOM NUMBER GENERATOR by selecting a prime number 
between 11 and 999991. CODE4 can be used with multiple keys depending on the 
largest single line length in the file. 

Features four run modules: ENCODE, DECODE, SAVE FILE, and ZERO FILE. Like its 
big brother COPY-NOT, CODE4 is for use on a 48K, two-disk Model I system. It is 
available on a single density TRSDOS 2.3 disk, and comes with a sample ASCII file. 

$19.95 

TO: H P B VECTOR CO. 

* ^ 

130 CENTER STREET 
E. STROUDSBURG, PA. 18301 

Allow Two Weeks for Delivery 

PS. MONEY ORDERS ARE RUSH ORDERS. 




Figure 5 

switch debounce network and a 
positive edge one shot. This 
switch generates the interrupt 
request (fNT) signal. U2, a 
74LS244, is an octal tri-state buf- 
fer used to gate an eight-bit vector 
on the data bus during an inter- 
rupt acknowledge cycle (INTAK). 
If a 74LS244 is not available, 
substitute two 74LS367 IC's. If 
an external 5 volts dc power 
supply is not available, the op- 
tional circuit is required. 

The easiest way to implement 
the software for this test is with 
the T-Bug monitor. You can also 
use Radio Shack's Editor/As- 
sembler. Load the Program 
Listing into memory. 



The flow diagrams and mem- 
ory map for the test routine are 
shown in Fig. 9. The program 
sets the stack pointer, loads the 
I register with the interrupt vec- 
tor, sets the interrupt mode, en- 
ables the interrupt and waits. If 
all eight switches on the inter- 
face board are closed (a binary 
zero) and the interrupt push but- 
ton is depressed, the CPU will 
go into the interrupt mode. This 
prints a zero on the screen, then 
returns to its wait loop. If switch 
two is opened and the button is 
pushed, a two will be printed. 
Switch three being opened and 
two closed results in a four be- 
ing printed. If the computer re- 
turns to a ready, or power-up 
condition, something was done 
incorrectly. Go back and check 
the software and hardware. 

Note: The RETI instruction 
resets the interrupt flip-flop so it 
is necessary to include the El 
instruction in the main wait 
loop. Another approach would 
be to use the El instruction in 
the interrupt service routine and 



PIGGYBACK 
MOUNTING 




Figure 6a 



Figure 6b 



PIGGYBACK 
CHIP 




PINS 7 AND 14 BENT DOWN AND SOLDERED 



FEEDTHROUGH 



Figure 7 
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SALE SPECIAL 

SMITH CORONA TP-1 

DAISY WHEEL PRINTER 




*"••»*, 



CALL FOR PRICE 

FULL LETTER QUALITY 
144 WORDS PER MIN. (12CPS) 
PARALLEL OR RS-232C SERIAL (specify) 
LOAD PAPER LIKE TYPEWRITER 
POPULAR WHEEL FONT TYPES 
NATIONAL SERVICE ORGANIZATION 

COOSOL, INC. 



P.O. Box 743, ANAHEIM, CA 92805-0743 
CALL: 7 DAYS CALIF. (714)545-2216 
(800) 854-8498 



s 111 



IPOWIEffS OOT 




NEW! PowerDOT allows you to create HI-RESOLUTION 
screen prints on EPSON (Graftrax and Graftax+), C.ltoh 
PROWriter, and Radio Shack LP 8 printers without ANY 
hardware additions or modifications to your TRS-80! You 
can draw directly on your screen which is a "picture window" 
of a much larger drawing area, therefore allowing you plenty 
of room to work You are only limited by memory size and your 
imagination! Great for designers, architects, engineers, etc. 
Model I or III disk version only. Works on all current operating 

Systems. $49.95 $2.50 shipping (U.S/Canada) 



^GWEttOF 



1 1500 Stemmons Fwy. 

Dallas, Texas 75229 

To order call toll free 1-800-527-7432 

For product information (21 4)484-2976 



INNOVATION — DUALITY I 

SUPPORT J 

I PIONEER SOFTWARE 1 

| 1746 NORTH WEST 55TH. AVE. »204 ■■ 

1 1 LAUDERHILL, FLORIDA 33313 Jl 1 

*. M PHONE 1- (305) -739-2071 H 1^^^ 



PI □ r*i E E R »i 





GRAPHTRAX! -ITALICS, UNDERLINE, DOUBLE, EMPHASIZE + JUSTIFY. 

DIAL-A-PRINT - REPRINT LINES FOR OPTIMUM LETTER QUALITY. 
1). ENTER/EXIT SCRIPSIT AT WILL WITHOUT LOSING TEXT BUF . 
2). OUTPUT ANY CODE'(S) (0-255), DIRECT FROM THE TEXT. 
3). SIMPLE COMMANDS IN TEXT CONTROL EVERY MX-80 + MX-100 

PROGRAMMABLE FEATURE INCL. VAR LINESPACING AND FORMS. 
4). WRITE FORM LETTERS AND INPUT DATA INTO REPORT FORMS. 
5). DISPLAY ONLY MODE SHOWS WHERE PAGES WILL START/END. 
6). EDIT MODE FOR ERRORS, CHANGES, GRAPHICS OR PAUSING. 
7). SELECTED PAGES PRINTED DIRECT/CORRECT HEADERS, PAGE* ' S 
8). PRINT OUT FULL SCREEN PICTURE FILES MADE BY CRAYON' 1 
9). 7 SAMPLE TEACHING PROGRAMS TAKE YOU STEP BY STEP. 
10). 66 PAGE MANUAL, BOUND, INDEXED, COMPLETELY REVISED. 
11). CUSTOM VERSIONS AVAILABLE FOR THE FOLLOWING PRINTERS; 
12). MICROLINE-80 + 82A, PROWRITER + LP IV. + VIII. + L 10 
13). DAISY WHEEL 2 VER. ALLOWS SUB/SUPER SCRIPTING 10", 12" 
+ PROPORTIONAL-UNDERLINING-1+1/2 LEGAL LINE SPACING 
EMPHASIZED, DIAL-A-PRINT, PROGRAMMABLE OVERSTRIKE MODF . 

___^___ NOW I DOS COMPATIBLE ON I/I I I ______^^_ 

MX-80/100 VER. WORKS WIIH/WI1HOUT (3RAPHTRAX 80 OR PIUS 

DISK SCRIPTR MOD 1/3 = «40.00 MOD I+III. VERSIONS BOTH 

WORK WITH MODEL I. SCRIPSIT/LC NO PATCHING REQUIRED. 

CASSETTE SCRIPTR MOD 1/3 = *40.00 WORKS WITH REG. SCRIPS. 

1.0 FOR MOD 1/3 REQ.32K.+ LC/MOD SCRIPTR IS A 5.5K PROG. 

SEND FOR OUR FREE BROCHURE THAT DEMONSTRATES ALL FEATURES 

ASK FOR OUR FREE FEATURES CHARI SHOWING WHAI FEATURES 

WE SUPPORT ON VARIOUS PRINTERS. CALL / WRITE FOR INFO. 



«<< PLEASE INCLUDE THIS INFORMATION WHEN ORDERING ■■■■■- 
NAME ________■ MODEL 1 OR 3 _ | CASSE I IE/DISK 

ADDRESS _____• I TYPE PRINTER m | SCRIPSIT VER #. 

CITY/STATE/ZIP/PHONE I MEMORY SIZE .1 PAYMENT METHOD 
CHECKS - MONEY ORDERS - COD'S ACCEPTED 



CRAYON IS A GRAPHICS DESIGN UTILITY THAT NO TRS-S0 
OWNER SHOULD BE WITHOUT. CRAYON DUES IT ALL ! ! 

YOU'VE SEEN THE ADS FOR OTHER DRAWING PROGRAMS. SOME 
CHARGE AS MUCH AS H50.00 FOR THE ABILITY TO ADD GRAPHICS 
TO YOUR PRINTOUTS. CRAYON ISN' I A CONVERTED TEXT PROCESSOR 
CRAYON WAS DESIGNED FROM THE GROUND UP TO GIVE YOU THE 
VERY FINEST GRAPHIC'S EDITOR POSSIBLE. COMPLEX GRAPHICS 
REQUIRE ROUTINES TO MOVE AND MANIPULATE GRAPHICS THAT NO 
TEXT PROCESSOR CONTAINS. ALSO CRAYON PRODUCES SUPER HIGH 
SPEED GRAPHICS THAT YOU CAN ACCESS FROM YOUR ASSEMBL Y AND 
BASIC PROGRAMS. ALSO WITH A BLOCK GRAPHICS PRINTER AND 
SCRIPTR YOU CAN PRINT OUT YOUR CRAYON FILES FROM SCRIPSIT. 
BEFORE YOU WASTE YOUR MONEY ON HALF A PROGRAM CHECK OUT 
CRAYON'S MANY FEATURES. CRAYON DOES IT ALL!!! 
1). TYPESET LOGO'S - LETTERHEADS - ENVELOPES - BLISINESS 
CARDS AND OTHER OFFICE FORMS. THIS AD WAS TYPESET 
FROM AN MX-80 PRINTOUT THEN SHRUNK. COST = *4.50 
IF AD WAS TYPESET AT A PRINTSHOP THE COST = *200 + 
2). CREATE AND RUN REAL CARTOONS WITH CRAYON AND THEN 
RUN YOUR CARTOONS FROM BASIC AT ASSEMBLY LANGUAGE 
SPEEDS. SPEEDS OF 35 FRAMES/SECOND POSSIBLE. USE IT 
TO DESIGN DISPLAYS FOR USE IN BASIC 8, ASSEMBLY PROG'S 
3). MANAGE DISKETTE DIRECTORIES, PRINT THEM, SEARCH THEM, 
COMMENT THEM. MOD 3 DIR. WORKS ON TRSDOS OR LDOS ONLY 
4). DRAW ANYTHING YO'I DESIRE ONTO THE SCREEN AND PRINT IT 

OUT OB SAVE IT TO DliK/ TAPE - UP TO Sli SCREENS/FILE. 
5). SCREEN FORMAT MAKES CRAYON AN EASY WAY TO KEEP AN 

ELECTRONIC NOTEBOOK. FAST+EASY INFORMATION RETREIVAL. 
o). PREFORM ALL VIDEO WORKSHEET FUNCTIONS RIGHT ON SCREEN 






1). USER FRIENDLY / 42 PAGE DOC'S, OFFSET PR INTED, INDEXED 

2). NINE CHARACTER USER DEFINED CURSOR. 

5>. 16 LETTER COMMANDS FOR GRAPHICS ENTRY. 

4). COPY CHARACTERS IN ANY DIRECTION FAST. 

5>. UPPER/LOWER CASE SUPPORT WITHOUT DRIVERS. 

6). DO ALL OF THE FOLLOWING ON VARIABLE LENGTH LINES-> 
COPY-FILL-DELETE-EXCHANGE-MOVE-PULL-UC/LC- INVERT 
GRAPHICS-PRINT -JUSTIFY TEXT-BUFFER/RES TORE TO SCREEN. 

7r. UTILITIES INCLUDE — > MASK - AUTOMATIC PRINTS NUMBERS 
CURSOR LOCATION AND VALUE-3 SELECTIVE CLS' S-PATTERN- 
EXTRA BUFFERS-SCREEN OVERWR I TE-HEX DUMP -SEARCHES. MORE 

8). FULL DISK / CASS I/O DIR-WRI TE-LOAD-APPEND-COPY-KILL 
SCREENPRINT- OUTPUTS CODES TO DRIVE ANY PARAI I Ft. PRINTER 
PROFESSIONALLY WRITTEN S. SUPPORTED-NO BUGS-2 YRS. IN DESIGN 
OVER 90 COMMANDS -> FAST / EASY / FUN <- ALL MACHINE LANG. 
CASS MOD l+3=*35.00 / DISK MOD 1 OR 3=*45.00 1 0K PROGRAM 
WORKS IN 16K. OR MORE AND ADJUSTS TO MEMORY SIZE CHANGES. 
ESPECIALLY FOR MX-80, MICROLINE80 AND OTHER BLOCK GRAPHIC 
PRINTERS. PRINTER NOT REQ. FOR FILE HANDLING * CARTOONS. 
^_ LIBERAL DEALER TERMS AVAILABLE - INQUIRIES INVITED J 



xc 



^ 160 



■See List of Advertisers on Page 435 
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substitute RETI with RET (return 
from subroutine), which has no 
effect on the interrupt flags. 

With a clearer understanding 
of the Z80's three interrupt 



modes and how to use them, 
many new doors should be 
opened for applications of the 
TRS-80. The small interface de- 
scribed to test the interrupt in 



Mode Two also allows experi- Douglas Fisher is a micropro- 

ments with interrupt software to cessor systems design engi- 

gain a clearer understanding of peering supervisor for a manu- 

the possibilities of an interrupt- facturer of computer-controlled 

driven computer. ■ newspaper inserting systems. 



S2=RADI0 SHACK #275-1301 

8 POSITION DIP SWITCH OR EOUIV. 

CI = IOOOpF 

ALL RESISTORS ARE 4.7K, I/4W, 5% 

Ul =74LS00 

U2=74LS244, TWO 74LS367's MAY 

BE SUBSTITUTED 

U3 = FULL WAVE 8RID6E 

RADIO SHACK 276-1161 OR EOUIV. 

U4=5 VOLT REGULATOR 

RADIO SHACK 276-1770 OR EQUIV. 

Tl =12 VOLT SECONDARY 

RADIO SHACK 273-1505 OR EOUIV. 



SI IS A MOMENTARY 
PUSH BUTTON SWITC 




+ SV 



>INT 













+ 5V 
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U3 




U4 
7805 


II7VAC } 
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I 


OPTIONAL POWER SUPPLY IF 
IS NOT AVAILABLE 


+ 5VDC 


POWER SUPPLY 
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Figure 8 



MAIN PROGRAM 



4C00 
4D00 
4E05 



MEMORY 
MAP 



4500 I 
TO 450C J 



4800 
TO 4805 



MAIN 
PROGRAM 



INTERRUPT 
VECTOR TABLE 



INTERRUPT 

SERVICE 

ROUTINE 



4FFF STACK POINTER 



SET STACK 
POINTER® 
4FFF H 










LOAD I 
REGISTER 










SET INTERRUPT 
MODE 2 










ENABLE 
INTERRUPTS 






« 










WAIT FOR 
INTERRUPT 











LD A 
REG. WITH 
ASCII 



LD VIDEO 
MEMORY 
WITH A REG. 




INTERRUPT SERVICE ROUTINES 



LD A 
REG. WITH 
ASCII 2 



I 



LD A 
REG. WITH 
ASCII 4 
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Figure 9 



WE WILL NOT BE UNDERSOLD 



SOFTWARE 



APPLE SOFTWARE 



COMPUTERS 



MICROPRO 




Wordstar 


$239.00 


Mailmerge 


$89.00 


Customization Notes 


$359.00 


Spellstar 


$239.00 


Datastar 


$199.00 


Calcstar 


$199.00 


MICROSOFT 




Basic Interpreter 


$349.00 


Basic Compiler 


$389.00 


Fortran 80 


$499.00 


Cobol80 


$695.00 


DATA BASE 




dBase II 


$599.00 


IBM PC SOFTWARE 


INFORMATION UNLIMITED 




Easy Writer 


$289.00 


Easy Speller 


$149.00 


Easy Filer 


$319.00 


VISICORP 




VisiCalc 256K 


$199.00 


VisiDex 


$209.00 


VisiFile 


$219.00 


VisiTrend/VisiPlot 


$259.00 


VisiTerm 


$99.00 


MICROPRO 




Mailmerge 


$119.00 


Wordstar 


$239.00 


MISCELLANEOUS 




Supercalc by Sorcim 


$229.00 


Superwriter by Sorcim 


$289.00 


Home Accountant Plus 


$139.00 


ENTERTAINMENT 




Deadline 


$39.00 


Temple of Apshai 


$29.00 


Curse of Ra 


$15.99 


Call For More IBM Software And Accessories 



DISK DRIVES 



CCI 100 for the TRS-80 Model 1 

5 1 A 40 track 

CCI 189 for the Zenith Z-89 

S'A 40 track 

CORVUS 5M with Mirror 

CORVUS 10Mwith Mirror 

CORVUS 20M with Mirror 

CORVUS Interfaces 

RANA SYSTEMS add-on Disc Drive 

Elite Two 80 Track 

Elite One 40 Track 

Elite Controller 

Elite Two 80 Track 

Elite Three 80 Track double-sided 



$299.00 

$379.00 

$3089.00 

$4489.00 

$5389.00 

CALL 

for the Apple II 

CALL 

CALL 

CALL 

CALL 

CALL 



DISKETTES 



Maxell 5 1 A single side 
Maxell 8 single side 
Maxell 5V* double side 
Maxell 8 double side 
BASF 5 1 A 
BASF 8 
Verbatim SV* 
Verbatim 8 
Wabash S'A 



$39.00 
$49.00 
$45.00 
$55.00 
$26.95 
$36.00 
$26.95 
$36.00 
$21 .95 



IBM PC ACCESSORIES 



64K Card by Microsoft 

Joystick by T & G 

128KCard 

192K Card 

256K Card 

Combo Card by Apparat 

Call for more IBM PC add-ons 



$435.00 
$49.00 
$579.00 
$629.00 
$699.00 
$249.00 



For fast delivery, send certified checks, money 
orders, or call to arrange direct bank wire 
transfers. Personal or company checks require 
one to three weeks to clear. All prices are 
mail order only and are subject to change 
without notice. Call for shipping charges. 



MICROPRO 

Wordstar 

Mailmerge 

Spellstar 

DataStar 

CalcStar 

VISICORP 

VisiCalc 

VisiTerm 

VisiDex 

VisiPlot 

VisiFile 

VisiSchedule 

VisiTrend/Plot 

MISCELLANEOUS 

Micro Courier 

Screen Director 

Executive Briefing System 

Supercalc 

Personal Filing System 

PFS Report Writer 

Word Handler 

ENTERTAINMENT 

Beer Run 

Zork I, II 

Deadline 

Chop Lifter 

Cannonball Blitz 

Knights of Diamonds 

Midnight Magic 

Wizardry 

Tuesday Morning Quarterback 

Crush, Crumble & Chomp 

Datestones of Ryn 

Morloc's Tower 

Snack Attack 

Star Blazer 



$199.00 
$89.00 
$149.00 
$199.00 
$189.00 

$199.00 
$79.00 
$199.00 
$169.00 
$199.00 
$259.00 
$239.00 

$219.00 
$129.00 
$169.00 
$199.00 
$115.00 
$75.00 
$169.00 

$28.00 
$26.95 
$39.00 
$24.95 
$29.95 
$29.95 
$32.00 
$45.00 
$24.95 
$24.95 
$15.99 
$1 5.99 
$23.95 
$24.95 



APPLE ACCESORIES 



ADVANCED LOGIC 

Add-Ram 16K Card $99.00 

Z-Card CP/M for the Apple II $225.00 
Smarterm 80 Column Board w/Softswitch $249.00 

Z-80 Card by Microsoft $319.00 

16K Card by Microsoft $159.00 

32 K Card by Saturn $199.00 

Keyboard Enhancer II by Videx $125.00 

Videoterm by Videx $259.00 

Game Paddles by TG $49.00 

Joystick by TG $49.00 

Numeric Keypad by Keyboard Co. $139.00 

ALF 9 Voice Board $1 59.00 

ALF 3 Voice Board $229.00 

System Saver by Kensington $75.00 

Microbuffer II 16K w/graphics $259.00 

Microbuffer II 32K w/graphics $299.00 
APPLE INTERFACE CARDS BY CCS 

Serial Asynch . #77 1 $1 39.00 

Centronics #7729 $1 49.00 
Call for other CCS cards 



RAM 



16K Ram Kit for Apple II; TRS80 
200 nano seconds, 41 16 chips 



$17.50 



DEALER INQUIRIES 

PLEASE CALL 

1-800-343-7036 



CALIFORNIA COMPUTER SYSTEM 

Mainframe 2200a $485.00 

Z-80 CPU 2810a $265.00 

64K RAM 2065 $569.00 

Floppy Controller 2422a $359.00 
ZENITH 

Z-89 48K CALL 

Z-90 64K CALL 

Z-100 CALL 

Call For Prices On The Complete Zenith Line 

CASIO FX702P Pocket Computer $179.00 
Sanyo MBC 1000 64K CALL 

Call For Prices On Complete Sanyo Computer Line 



PRINTERS 



NEC 3550 for the IBM PC $21 95.00 

NEC 7710 Serial $2395.00 

NEC 7720 KSR $2749.00 

NEC 7730 Parallel $2395.00 

NEC 351 Serial $1 850.00 

NEC 3520 $2099.00 

NEC 3530 Parallel $1850.00 
Antex "Generic Model of the Prowriter" $479.00 

Epson MX-80 CALL 

Epson MX-80FT CALL 

Epson MX-100 CALL 

IDS Micro Prism CALL 

IDS Prism 80 CALL 

IDS Prism 132 CALL 

Okidata Microline 80 CALL 

Okidata Microline 82A CALL 

Okidata Microline 83A CALL 

Okidata Microline 84 CALL 

Datasouth 180 cps CALL 



MONITORS 



SMD 13" Color 
Sanyo 9" B & W 
Sanyo 9" Green 
Sanyo 12" B&W 
Sanyo 1 2" Green 
Sanyo 13" Color 
Zenith 1 2" Green 
Zenith 13" Color 
Electrohome 13" HI-RES 

Color Monitor 
Electrohome 1 3" Color 
Electrohome 12" B&W 
Electrohome 1 2" Green 
Electrohome 9" B&W 
Electrohome 9" Green 



$329.00 
$135.00 
$140.00 
$179.00 
$189.00 
$359.00 
$95.00 
$339.00 

$829.00 
$349.00 
$179.00 
$189.00 
$149.00 
$159.00 



SPECIAL OF THE MONTH 

SMD 13" 

COLOR MONITOR 

$329.00 



TERMINALS 



ADDS Viewpoint 
Zenith Z-19 
Televideo 910 
Televideo 925 
Televideo 950 
Zenith ZT-100 



$495.00 
$679.00 
$595.00 
$779.00 
$969.00 
$595.00 



TELECOMMUNICATIONS 



Novation Cat Modem 
Novation D-CAT 
Novation AUTO-CAT 
Novation APPLE CAT 
Hayes Smart Modem 
Smart Modem 1200 
Hayes Micro-Modem 
Hayes Chronograph 
Signalman Mark I 



$139.00 
$149.00 
$199.00 
$299.00 
$249.00 
CALL 
$295.00 
$225.00 
$85.00 




The CPU Sh 

TO ORDER CALL TOLL FREE 1 -800-343-6522 



I I 



^ 100 



420-438 Rutherford Ave., Dept. Ml 13, Charlestown, Massachusetts 02129 




Hours 9 AM - 9 PM (EST) Mon.-Fri. (Sat. till 6) 

Technical information call 617/242-3361 

• See List of Advertisers on Page 435 



TWX- 710-348-1796 



Massachusetts Residents call 617/242-3361 
Massachusetts Residents add 5% Sales Tax 
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TECHNIQUE 



/ \ 



LOAD 80 



The Key Box 

Basic Level II 
Model I or III 

16K RAM 



Pardon me, Parson, but your parsing subroutine is rather parsimonious. 



Building a Better Adventure 



Dan Cataldo 
67-14 108th Street 
Forest Hills, NY 11375 



w 



riting an adventure com- 
puter game can be a fas- 



cinating challenge. These pro- 
grams make detailed use of 
arrays, string commands, and 
decision trees. For a novice 
such a challenge can be a night- 
mare. I know of no books or 



10 ' ADVENTURE GAME PARSING SUBROUTINE 

20 ' DEMONSTRATION PROGRAM 

30 ' BY DAN CATALDO 

40 ' PART 1: SET UP ARRAYS — PRINT VERB/NOUN LISTS 

50 VL=4:DIM VBS(VL) 

60 VBS(1)="EAT":VBS(2)="GET":VBS(3)="READ":VB$(4)="HIT" 
70 NL=4:DIM NO$(NL) 

80 NOS(l)="APPLE":NOS(2)="ROCK":NOS(3)="BOOK":NO$(4)="TREE" 
90 CLS • 

VERBS", "NOUNS" 



PRINT TAB (16) 

PRINT 

PRINT TAB(16) 

PRINT TAB (16) 

PRINT TAB(16) 

PRINT TAB(16) 

PRINT 



VBS(l) ,N0$ 
VB$(2) ,N0$i 
VB$(3) ,NO$i 
VB$(4) ,N0$i 



';K 



170 INPUT "WHAT SHOULD I DO"; COS 

180 IF LEN (COS) = GOTO 170 ELSE 190 

190 ' PART 2: COS IS SPLIT INTO VERB AND NOUN 

200 ' STEP 1: COS VERB COMPONENT BROKEN OFF 

210 VBS(0)="":NOS(0)="" 

220 VB=0:NO=0 

230 A=l :K=LEN( COS) : PRINT @ 576, "COS LENGTH IS 

240 VBS(0)=VBS(0)+MIDS(COS,A,1) 

250 PRINT @ 640, "VERB IS ";VBS(0> 

260 A=A+1:IF A=LEN(COS)+l THEN GOTO 520 ELSE 270 

270 FOR N=l TO 300: NEXT N 

280 IF MIDS(CO$,A,l)<>" " GOTO 240 ELSE 300 

290 ' PART 2 CONTINUED 

300 ' STEP 2: COS NOUN COMPONENT BROKEN OFF 

310 IF MIDS(COS,A,l)=" " THEN Q=l ELSE Q=0 

320 A=A+1 

330 IF Q=l GOTO 310 ELSE 340 

340 A=A-1 

350 NO$(0)=NOS(0)+MIDS(CO$,A,1) 

360 A=A+1 

370 PRINT @ 704, "NOUN IS ";NOS(0) 

380 FOR N=l TO 300: NEXT N 

390 IF A=LEN(COS)+l GOTO 4P0 ELSE 350 

400 ' PART 3 : DECISION TREE 

410 FOR VL=1 TO 4: IF VBS (0) =VBS ( VL) THEN VB=VL ELSE NEXT VL 

420 FOR NL=1 TO 4: IF NOS ( 0) =NOS (NL) THEN N0=NL ELSE NEXT NL 

430 ON VB GOTO 450,470,490,510 

440 GOTO 520 

450 ON NO GOTO 540,550,550,550 

460 GOTO 520 

470 ON NO GOTO 540,540,540,550 

480 GOTO 520 

490 ON NO GOTO 550,550,540,550 

500 GOTO 520 

510 ON NO GOTO 550,550,550,540 

520 PRINT "I DON'T KNOW WHAT " ;CHRS (34) ; COS; CHRS (34) ; " MEANS" 

530 GOTO 570 

540 PRINT "THE COMMAND " ;CHRS (34 ) ;CO$;CHRS (34) ; ' 

570 

550 PRINT "THE COMMAND " ;CHRS (34) ;COS;CHRS (34) ; ' 

OTO 570 

560 STOP 

570 INPUT "TRY AGAIN", -Y$ 

580 IF LEFTS(YS,1)="Y" THEN GOTO 90 ELSE END 



IS VALID": GOTO 



IS NOT VALID" :G 



Program Listing 1 



manuals that explain in detail 
how to write such a program. 

The following article attempts 
to help other novices writing 
such a program. Specifically, I 
explain how to enter a two-word 
command into your program, 
such as Shoot Arrow or Take 
Gold, and have your computer 
decipher that command and act 
upon it. 

This deciphering routine is 
also called a parsing subrou- 
tine. Parsing a sentence is the 
act of breaking it down into its 
grammatical parts. Our typical 
two-word command string is 
composed of a verb denoting 
the action, and a noun, which is 
the object of the action, in the 
order: verb-blank space-noun. 
When you design your adven- 
ture, you will prepare a vocabu- 
lary of verbs and nouns that the 
player will use to assemble com- 
mands. The size of your vocabu- 
lary will be limited by the avail- 
able memory size. The number 
of possible commands equals 
the number of verbs times the 
number of nouns. That is, if you 
prepare a vocabulary of twenty 
verbs and thirty nouns for a 
game, you will present the 
player with 600 possible com- 
mands to choose from. 

Not ail such commands either 
make sense or are permissible 
within the context of your ad- 
venture. If you were to use the 
vocabulary listed in Table 1, the 
command Eat Apple would be 
instantly recognizable as a cor- 
rect command. The command 



Eat Horse would seem to be 
nonsense, but that need not al- 
ways be so. You may require 
that your hero eat a horse before 
rescuing the princess. Any com- 
mand may be valid, if you design 
your parsing subroutine to make 
it so. 

A Demonstration 

I have prepared a short 
demonstration program to illus- 
trate the parsing subroutine. 
Program Listing 1 sets up the ar- 
rays that contain the verb and 
noun lists. Our simple vocabu- 
lary (Table 2) consists of four 
verbs and four nouns. This 
means that there are sixteen 
possible commands. Of the six- 
teen, only six are valid within the 
demonstration program. The 
valid commands are listed in 
Table 3. My choices are com- 
pletely arbitrary; the command 
Read Rock could be valid if your 
adventure included writing 
carved on a stone. 

The program follows a simple 
logic sequence. First, the verb 
and noun vocabulary arrays are 
set up. Second, the command 
string (CO$) is entered. Third, 
the command string is broken 
down into its verb and noun 



Verbs 


Nouns 


Eat 


Apple 


Drink 


Horse 


Ride 


Water 


Table 1 
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components. The verb and noun 
components of each command 
are then compared with the pre- 
pared vocabulary list. If both 
verb and noun are within the vo- 
cabulary, the program deter- 
mines if the verb-noun combina- 
tion represents a valid command. 

The verb and noun vocabulary 
lists are set up in Part 1 of the 
program, which begins at line 
40. The lists are single dimen- 
sion string arrays of length VL 
and NL, respectively. To in- 
crease the size of the vocabu- 
lary, increment either value and 
make appropriate additions to 
the arrays in either line 60 or 80. 
Lines 100-150 print the vocabu- 
lary for easy reference during 
the program run. 

After you enter the command 
string (CO$) at line 170, the pro- 
gram really gets interesting. Our 
task is to disassemble the com- 
mand string into its separate let- 
ters and blank spaces, and then 
reassemble it into two new 
strings: VB$(0) and NO$(0), the 
verb and noun respectively. You 
recall that to set up the array 
VB$(VL), you actually set up an 
array with the following ele- 
ments: VB$(0), VB$(1), VB$(2), 
VB$(3), and VB$(4). At line 210, 
we initialize VB$(0) and NO$(0) 
as dummy strings of zero length. 
Take care not to type in a blank 
space between the quotation 
marks. Line 220 sets up the vari- 
ables VB and NO, which are 
used in the decision tree in Part 
3 of the program. 

The length of the command 
string is determined at line 230 
and the result is printed. The 
length of CO$ is equal to all the 
letters and blank spaces typed 
in before you press Enter. Thus, 
the command "Eat Apple" has a 
length of nine, but " Eat Apple" 
has a length of 10. 

Eat Apple 

The dissection of the com- 
mand "Eat Apple" begins at line 
240. First the verb must be split 
off. This is done by use of the 
command VB$(0) = VB$(0) + 
MID$(CO$,A,1). The pointer vari- 
able A had been set as equal to 
one in line 230. At line 240, the 
program breaks off a sub-string 
of CO$ that is one letter in 
length, and which begins at the 



first letter of CO$. This sub- 
string, the letter "E", is added 
(i.e., concatenated) to VB$(0). 
Since the string VB$(0) was in- 
itialized as a dummy string of 
zero length, the concatenated 
V B$(0) = "" + '' E " = 
"E". If VB$(0) had been initial- 
ized with a blank space between 
the quotation marks, the first 
result of concatenation would 
have been " E". Any attempt to 
compare VB$(0) with the other 
members of the VB$(VL) array 
would then fail, since the other 
members do not have a 
preceding blank space between 
the quotation marks. 

After the first concatenation 
the pointer A is incremented by 
one and points to the next letter 
or blank space in CO$. At line 
260, after the increment, a test is 
made to determine if A is equal 
to the length of CO$ + 1. If the 
length of CO$ were three, after 
the third concatenation A would 
be equal to four. Since this value 
exceeds the length of 00$, the 
program would branch to line 
520 and an Invalid Command 
statement would be printed. The 
reason for this is that the 
demonstration program is con- 
cerned only with two-word com- 
mands. There is no reason why a 
one-word command such as 
Help could not be valid in your 
own program. 

The test at line 260 ordinarily 
will not be acted upon. However, 
if you accidently type in "EatAp- 
ple", the program will create the 
verb "EatApple" in VB$(0), and 
then branch to line 520. The pro- 



Verbs 


Nouns 


Eat 


Apple 


Get 


Rock 


Read 


Book 


Hit 


Tree 


Table 2 



Val id Commands 
Eat Apple 
Get Apple 
Get Rock 
Get Book 
Read Book 
Hit Tree 

Table 3 



gram must see at least one 
blank space between verb and 
noun in CO$ in order to contin- 
ue. There is no point in proceed- 
ing to Part 3 of the program, the 
decision tree, since the program 
will not be able to deal with a 
one-word command. 

As soon as the program en- 
counters a blank space within 
CO$, the first part of the disas- 
sembly is complete. VB$(0) now 
contains the verb of your com- 
mand. Step 2 of the disassembly 
begins at line 310. The program 
continues using the MID$ com- 
mand to examine CO$. If more 
than one blank space is encoun- 
tered between the verb and 
noun, the program will ignore all 
of the blank spaces before be- 
ginning the assembly of the 
noun at line 350. 

A simple routine determines 
where to begin building the 
noun. If, at line 310 MID$ 
(CO$,A,1) is a blank space, A is 
incremented by one, and the 
variable Q is also set equal to 
one. As long as Q equals one, 
the program will loop back to 
line 310 to examine the next po- 
sition in CO$. However, when 
the program encounters the first 
letter of the noun, Q is set equal 
to zero and the test at line 330 
fails. 

The program then progresses 
to line 340, where A is decre- 
mented by one. Recall that A is 
designed to point to the next 
position in CO$, and that it has 
been incremented at line 320 to 
point to the second letter in the 
noun. Since the first letter of the 
noun has not been split off from 
CO$, we must back up, so that A 
once again points to the first let- 
ter of the noun. The process of 
noun assembly that follows is 
the same as that used for the 
verb. The assembly process 
continues until A equals the 
length of CO$ + 1. Part 2 is then 
complete, with a verb in VB$(0) 
and a noun in NO$(0). 

A Simpler Way 

A simpler way of stripping the 
noun from CO$ follows: For line 
350, type in: 350 NO$(0) = 
RIGHT$(CO$,K-A + 1) then 
delete lines 360, 380 and 390. 
This is one technique you can 
use in you own parsing subrou- 



tines. The longer method of the 
demonstration program is used 
for illustrative purposes only, 
although you might find it useful 
in another type of program. 

Now that we have the verb 
and noun separated from 00$, 
we can test the validity of the 
command itself. To perform the 
test, we first translate the con- 
tents of VB$(0) and NO$(0) into 
the variables VB and NO. For ex- 
ample, the verb Eat is VB$(1). 
The noun Apple is NO$(3). If we 
can set VB equal to one, and NO 
equal to three, we can perform 
logical tests to determine if the 
combination 1-3 is valid or 
invalid. 

VB and NO are assigned val- 
ues in lines 410 and 420. VB$(0) 
and NO$(0) are compared to the 
other elements in their respec- 
tive arrays. If a match is found, 
VB or NO are assigned values 
that relate to the matched ele- 
ment's position in the array. 

The validity tests themselves 
are then conducted in lines 430 
through 510. The command 
ON. . .GOTO branches to vari- 
ous points in the decision tree. If 
the verb is Eat, that is, VB = 1, 
the program branches from line 
430 to line 450. At lines 450 
through 510, a further branching 
is made depending on the value 
in NL. If the command were Eat 
Rock, the program would first 
branch from line 430 to line 450. 
Since the value of NO is two for 
the noun Rock, the program 
would branch from line 450 to 
line 550, and an Invalid Com- 
mand statement would be 
printed. 

To use this program, load and 
run it. In response to the prompt, 
enter the command Eat Tree. 
The program will first display 
the length of the command 
string. It will then print the verb 
and noun, showing the assem- 
bly of each letter by letter. Final- 
ly, a statement regarding the 
command's validity will appear. 

You will gain a great deal of 
experience by altering the verb 
and noun arrays to your own 
suiting, and by redesigning the 
decision trees in Part 3 to reflect 
the new vocabulary. You should 
be able to develop simpler, 
faster methods once you under- 
stand the basics involved. ■ 
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TECHNIQUE 



Make your favorite programs run faster. 



Optimize Your Code 



Robert W. McTernan 
42 Asp in wall Road 
Red Hook, NY 12571 



If you are like me, you finish 
writing a program with mixed 
emotions. It's a great feeling to 
see your program running exactly 
as you planned. But you probably 
had a lot of fun throughout the 
writing process. 

One way to extend the fun 
and improve your program at the 
same time is by program optimi- 



zation. You can optimize the Ba- 
sic programs you have written 
and those you purchased or 
found in magazines and books. 

Optimization is simply the 
process of reviewing a com- 
pleted program and modifying it 
to make it run faster (of major 
importance for Basic programs) 
and condensing it to save mem- 
ory (for shorter CLOADs and 
CSAVEs). 

I keep a Casio AQ-2000 calcu- 
lator with stopwatch functions 
next to my TRS-80. Although I 
use it to calculate video screen 
POKE addresses, it is mainly for 



timing various program rou- 
tines. By recording the run time 
of each routine, the best one can 
be chosen for each purpose. 

To accurately measure the ef- 
fects of optimization on a sim- 
ple program, enter Program List- 
ing 1 just after powering your 
TRS-80. This ensures that no 
machine language program will 
interfere with the demonstra- 
tion. You will need a timing de- 
vice, such as a stopwatch with a 
sweep second hand. Anything 
more accurate than a sundial 
will do. You will use it to mea- 
sure the running time of the pro- 
gram after each modification. 
Use the Edit function when 









changing lines. Enter program 




10 

20 


CLEAR 300 
A = 
B = 


lines exactly as described; we 
will be keeping track of program 


30 
40 
50 


c=o 

D = 
E = 


bytes as we progress through 
the demonstration. If you have 


60 


F = 


a speed-up feature on your 


70 
80 
90 


G=0 
H=0 
J=0 


TRS-80, set it for normal TRS-80 
operational speed. 


100 


K = 




110 
120 
130 


L = 
M=0 
N=0 


The Program 

Program Listing 1 whitewashes 


140 
150 
160 


P = 

x = o 

Y = 7 


the screen. It is simple and ade- 
quate to demonstrate the advant- 


170 


CLS 




180 


PRINT" WHITEWASH" 




190 
200 


SET(X.Y) :REM *** DRAW SPOT 

IFX = 127THEN X = 0:Y = Y + (200*.005) ELSE X = X + (200*. 005) 










210 


IF PEEK(16320) = 191 THEN PRINT@0, "LAST SCAN"; 




The Key Box 


220 


IFY = 48THEN GOTO 240:REM *** WHITEWASH IS COMPLETE 




230 
240 


GOTO 190 

CLEAR0 :PRINT@0," STOP "; :GOTO 240:REM *** END 




Basic Level II 
Model I 




Program Listing 1 




16K RAM 



ages of program optimization. 
The variables in lines 10-140 
simulate a group of variables 
normally present in a longer pro- 
gram. ClearO in line 240 allows a 
clean byte count after a program 
run. Two spaces follow each line 
number. Spaces throughout the 
program provide better readabil- 
ity. To assist you in stopping your 
watch, a Last Scan warning will 
appear on the upper left of the 
screen followed by a Stop. Line 
180 contains 27 spaces pre- 
ceding the word Whitewash. 
Three spaces precede and two 
spaces follow the word Stop in 
line 240. Line 240 branches to it- 
self to prevent pushing up the 
whitewashed screen; press 
Break to stop each run. 
All set? Let's begin. 

Benchmark Run 

We will check our run time 
and program byte count before 
we start optimizing. Type Run, 
then press the Enter and stop- 
watch start buttons simulta- 
neously. As the whitewash 
nears the bottom of the screen, 
watch for the Last Scan warning 
and stop your watch when Stop 
appears. Use this procedure for 
all subsequent runs. 

The program run time should 
be approximately 5 minutes, 39 
seconds. Enter ?MEM. The dis- 
played number should be 15191 
on a 16K TRS-80. Since our pro- 
gram ends with a ClearO, all re- 
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After three years of selling 
my Model I and Model III 
programs, I've earned back 
my development costs. 

So I can lower the price. 

Now I'm offering my Model I and Model III 
programs for $75 each. 

They've been checked out by thousands of 
TRS-80* users, most of whom get in touch with me, 
Irwin Taranto. Thousands of phone calls later, these 
systems are completely developed, checked out, 
glitch-free. 

When people call, we've heard all the questions 
and we can answer them right off. I don't have to 
get on the phone and work through problems like 
I used to. 

Since I'm getting off so easy, the least I can 
do is drop the price- 50% for General Ledger, 
25 % for the rest. 

These are my Model I and Model III programs : 

Accounts Payable It links to the General Ledger, 

calculates and prints checks and makes reports. 

It's an invoice-linked system. 

Accounts Receivable It keeps track of billed 
and unbilled invoices, open and closed items 
and aging. It prints statements and links to 
the General Ledger. 

General Ledger It keeps track of data by month, 
quarter, year and the previous three quarters. 
It even includes a Cash Journal. 
Inventory Control It gives an immediate read- 
out on any item inquiry, including quantity and 
dollar total. 

• See List of Advertisers on Page 435 



Invoicing It prints your detailed invoices 
and links to Accounts Receivable and the 
General Ledger. 

Payroll It keeps the files, computes pay and 
deductions, prints forms and checks, figures 
taxes, overtime and piecework pay in any state 
tax routine, and prints the 941 -A and W-2 forms. 

They're all yours, for $75 each. You also need 
documentation when you run our systems. The 
Osborne books -one for Accounts Payable and 
Receivable, one for General Ledger, one for Payroll- 
cost $20 each. Our invoicing book costs $10. 

Just send me the coupon, or call us toll free. 
We'll ship within 48 hours. 



Please send me the following programs at $75 


each: 

book El 


Accounts Payable 






Accounts Receivable 




General Ledger 






Inventory Control 




mm 


Invoicing 






Payroll 






Add $4.50 per order for handling 






AMOUNT ENCLOSED 





1 



If you need the books, add $20 each. The invoicing book is $10. 

Mastercharge LI Visa CJ No Expires 

L Please send me information on other Taranto business 
programs, including TRS-80 Model II accounting systems. 

Your name 



Company name. 

Address 

City /State /Zip_ 



Taranto 



& ASSOCIATES, INC. 
The Total System Store," 121 Paul Drive, San Rafael, 
CA 94903. Mail inquiries to P.O. Box 6216, San Rafael, 
CA 94903. Outside California, toll free (800) 227-2868. 
In California, (415) 472-2670. ! 



"A trademark of the Tandy Corporation 
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quests to display available 
memory will show values sub- 
tracted from 15622. Our program 
now resides in 431 bytes of 
memory (15622 minus 15191). If 
the result of a Print Memory 
query is off by just a few 
numbers, you probably left out a 
few spaces. List the program 
and correct it. If the value is 
much lower, you probably did 
not enter the program after a 
power-on and have a machine 
language program resident in 
memory. Save the program on 
tape, perform a power of f-on cy- 
cle and load the program. 

Variables vs. Constants 

Notice the values within the 
parentheses in line 200. The 
product of 200 times .005 equals 
1 . What a dumb way to express a 
one! To demonstrate the first 
optimization, change these 
lines as follows: 

10 A = 200 
20 B = .005 

200 IFX = 127THENX = 

:Y = Y + (A*B)ELSEX = X + (A*B) 

Enter Run and start the stop- 
watch. The run time is 4 min- 
utes, 6 seconds, and the byte 
count is 426. Quite an improve- 
ment in run time, right? 

This demonstrates the impor- 
tance of using variables rather 
than constants in your pro- 
grams. The TRS-80 normally 
operates with floating point val- 
ues. It takes a lot of time to con- 
vert constants to floating point 
values every time they are refer- 
enced; accessing a variable 
which has been converted when 
initially defined is much faster. 

Defining Variable Types 

Most program variables only 
simulate those used in a typical 
program. Even though we don't 
use many of them, they are still 
placed in the variable table. 
Let's swap the lines in which we 
define our most heavily used 
variables with ones we use less. 
Change these lines as follows: 



10 


X = 


20 


Y = 7 


150 


A = 200 


160 


B = .005 



Start the program and stopwatch. 
Run time has improved to about 3 
minutes, 30 seconds. The byte 
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count remains the same. Another 
good improvement! 

Define your most heavily used 
variables first in the program. 
When running a program, each 
variable is placed in a table the 
first time it is referenced. The 
first defined variable will be at 
the top of the table, the second 
defined variable will be second, 
and so on. When a variable is 
again referenced the table must 
be scanned, starting at the top, 
until the variable is found. The 
closer variables are to the top, 
the quicker they will be found. 

Variable Type Definition 

If a variable type is not de- 
fined in a program, the TRS-80 
assumes the variable to be a 
single precision number. 

Change this line as follows: 

CLEAR 300 :DEFINTX,Y,C 

Start the program and clock it. 
Run time should be about 3 min- 
utes, 22 seconds. Program byte 
count is 434. 

This speedup is not signifi- 
cant in this short program. The 
Defint statement is significant 
in a larger or busier program 
where most numeric variables 
are integers. Whenever possi- 
ble, use integer variables in 
For... Next loops. 

Program Clean-up 

Although extra spaces and 
unnecessary words make a pro- 
gram listing more readable, they 
waste memory and slow a run- 
ning program. Make the follow- 
ing changes: 

• Using the Edit function, de- 
lete the extra spaces following 
the line numbers and remove all 
spaces in the following lines: 
line 0, 190 (except in the REM 
statement), 200, 210 (except 
within quotes), 220 (except in 
REM statement), 230, 240 (ex- 
cept in REM statement and 
those within quotes); 

• Change line 180 to 
PRINT® 27,"WHITEWASH"; 

• In line 210, remove the word 
THEN; and 

• In line 220, remove the word 
GOTO. 

Start the program and time. Run 
time is about 3 minutes, 21 sec- ; 
onds. Progam byte count is 
down to 364. 



The biggest savings here is 
memory space. Eliminate all 
useless spaces and words since 
the TRS-80 is a serial byte ma- 
chine and must read these un- 
necessary bytes during a run. 

REM Blemish 

Although useful in program 
listings, remarks have no place 
in a running program. Remove 
the REM statements in lines 
190, 220 and 240. Run the dem- 
onstration and time it. Run time 
is now 3 minutes, 9 seconds. 
Byte count is 310. 

Before removing REM state- 
ments, make a duplicate tape of 
your program for future refer- 
ence and use the optimized 
copy for execution. 

Although it is easier to key in 
the apostrophe abbreviation in 
lieu of REM when entering a pro- 
gram, the abbreviation uses two 
additional bytes. Use REM. This 
is not true for the ? abbreviation 
for Print. 

POKE It 

Another optimization method 
is alternate routines. It is no ac- 
cident that I chose a simple 
graphics program to demon- 
strate optimization. Although 
we get the job done with our 
present program, we can really 
get it going with POKEs. Of 
course, we are only doing a sim- 
ple whitewash. Your future 
graphics endeavors will not be 
as simple, but the principle is 
the same for complex routines. 

Change these lines and de- 
lete line 220: 

10 X=15488 

20 Y = 1 

30 C = 16383 

190 POKEX.191 

200 IFXOCTHENX = X + 1ELSE240 

Run and time it. Run time is about 
21 seconds! Byte count is 289. 

The POKE statement draws an 
area six times larger than the Set 
statement and consequently 



whitewashes the screen much 
quicker. We are using ASCII code 
191 , but complex graphics can be 
drawn with combinations of 
ASCII codes 129-191. 

We can improve the routine 
even more with a For... Next 
loop. Change these lines and de- 
lete line 200: 



185 
230 



FORX = XTOC 
NEXT 



Run time is now about 1 1 sec- 
onds. Byte count is 276. 

Multi-Statement Lines 

A lot of memory can be saved 
by combining statements into 
single lines. Make the following 
changes: 

• Put all statements from 
lines 0-180 in line 0. Separate 
each statement with a colon; 

• Delete lines 10-180; 

• Put all statements from 
lines 185-210 in line 10— do not 
forget the colons; and 

• Delete lines 185-210. 

Run time is about the same, 
but the byte count has de- 
creased to 196. 

Each program line in memory 
has the following format. Starting 
in memory address 17129 (the 
starting address of all Basic pro- 
grams), the first two bytes contain 
the address of the next line. The 
next two bytes contain the current 
line number. Immediately follow- 
ing is the statement itself. A zero 
byte completes the format. 

When we put multiple state- 
ments in a single line, only the 
first statement in the line is pre- 
ceded by the four bytes contain- 
ing the next line address and 
current line number. The zero 
byte mentioned above is re- 
placed by the colon (statement 
separator). For every line above 
placed in an existing line, we 
saved four bytes. 

Print® Graphics 

A still quicker way to white- 
wash the screen is by using the 



0CLEAR300:DEFINTX,Y,C:X = 15488:Y = 1:C = 16383:D = 0:E = 0:F = 0:G 

= 0:H = 0:J = 0:K =0:L = 0:M = 0:N = 0:P = 0:A = 200:B = .005:CLS: 

PRI NT@27,"WH ITEWASH" 

10 FORY = 128T0895STEP179:PRINT@Y, STRINGS (179,191);:NEXT:POKE 

16383,191 

240 CLEAR0:PRINT@0,:: STOP ";:GOTO240 

Program Listing 2 






; : 




I've paid off 
the costs on my 

Model II TRSDOS* 
systems, too. 

So now they're 50% 
cheaper. 

A couple of months ago, I realized I'd paid 
off the development costs on my Model I and 
Model III programs. I could lower the price 
without cutting back one bit on my support. 

The response was fantastic. Enough so that 
I can do the same for the TRSDOS versions 
of my Model 11/16 programs. 

These are my systems, and my new prices. 

General Ledger 

It gives year-to-year comparisons in dollars 
and percentages. It figures budgets and even 
has a report generator. It was $299, it's now $150. 

Accounts Payable/Purchase Order 

It generates purchase orders and posts the items 
to payable when the goods come in. It calculates 
and prints checks and aged ledger reports, 
linking fully to the General Ledger. Was $349, 
now $175. 

Accounts Receivable 

You can choose either an open item system or 
a balance forward system which works on a cash 
or an accrual basis. The open item system does 
invoicing and sales analysis by product code and 

sSee List of Advertisers on Page 435 



figure in salesmen's commissions. They both 
generate mailing lists by customer code and 
zip code for up to 2000 customers. Open Item/ 
Invoicing was $349, it's now $175. Balance 
Forward was $399, it's now $200. 

Payroll/Job Costing 

A huge capacity. It accommodates up to 300 
employees in multiple departments, with any 
state tax routine. It also figures piecework, 
overtime and tips. Was $299, now $150. With job 
costing option, was $399, now $200. 

Inventory Control 

It stores up to 5000 items. It reports by vendor, 
tells you when you're out of stock, or when you 
need to reorder. It updates price or cost automat- 
ically and integrates fully with my invoicing 
system. Originally $399, now $200. 

These programs all work with one, two, three 
or four-drive and hard disk systems. They're 
designed to integrate with the General Ledger, 
and, where it helps, with each other. 

They also get what I firmly believe is the 
most thorough support in the microcomputer 
industry. If you have a problem, call us and 
we'll straighten it out. Even if I have to do it 
myself, personally, right there on the phone. 

Michael Tannenbaum, the "80 Accountant" 
thought my systems were "a very impressive 
product at a very reasonable price." Even when 
they cost twice as much as they do now. 

Just call, and take advantage of me. 



Taranto 

& ASSOCIATES, INC. 



121 Paul Drive, San Rafael CA 94903 

Outside California, toll free (800) 227-2868. In California, (415) 472-2670. 

"A trademark of the Tandy Corporation 
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Print® statement in lieu of the 
POKE statement. 

Make the following changes 
and delete line 230: 

10 FORY = 128T0895STEP179:PRINT@Y, 
STRING$(179,191);:NEXT:P0KE16383,191 

Whew! As best as I can de- 
termine, run time is about .7 sec- 
onds. Byte count is 190. 

The Print® statement draws 
the same graphic symbol at con- 
secutive video screen address- 
es very rapidly. 

Optimization Score Card 

Program Listing 2 illustrates 
the optimization so far. Compare 
it with Listing 1. Look at what our 
optimization has accomplished. 



Program 


RunTime 


Byte Count 


Original 


5'39" 


431 


Optimized 


0'.7" 


190 



The extra optimization effort is 
well worth it. Of course, White- 
wash was set up to show the 
benefits of program optimiza- 
tion. You may not get results as 
dramatic as these when you op- 



timize your programs, but you 
will greatly improve them. 

Some More Tips 

The power off/on cycle purges 
the memory of any resident ma- 
chine language monitor pro- 
gram. These programs slow a 
running Basic program because 
they use time to spy on your pro- 
gram. When needed, these moni- 
tors are invaluable. When they 
are not needed but remain in 
memory, they are worse than 
useless. If I activate my ESF 
Stringy-Floppies and run the 
original program, time increases 
to over six minutes. If you are 
not using a monitor program for 
the program you are running, 
purge it. 

Most programmers assign 
variable names similar to the 
data they represent. A row point- 
er may be assigned the name 
RP, a variable Print® address 
may be called PA. This is fine if 
the values are saved for future 
use. If variable values are not 
saved, use the same variable 
names for other data. 



INPUP'ENTER RESISTANCE";R 

1 INPUP'ENTER CURRENT";! 

2 PRINT"VOLTAGE = "l*R 

3 INPUP'ENTER LENGTH";L 

4 INPUP'ENTER WIDTH";W 

5 PRINT"AREA = "L"W 



Assuming the above variables 
are not used later in the program, 
the variable in line 3 could be 
named R, the one in line 4 could 
be named I, and the variables in 
line 5 changed correspondingly. 
This would shorten the variable 
table and table scanning time 
would decrease. 

Many programs use the Print 
statement with a string constant 
full of spaces preceding the first 
word to be printed. This displays 
the word at a specific screen loca- 
tion (like we did in line 180 of 
Whitewash). Use the Print® or 
PRINTTAB statements instead. 

To decrease run time during 
cassette input/output opera- 
tions, create larger blocks of 
data before writing it on tape. Do 
this by linking strings. If your 
data is numeric, convert it to 
strings within your concatena- 
tion loop. Monitor your con- 



catenating string length and 
limit it to the maximum allowed, 
then write it on tape. When read- 
ing it back, the string must be 
disassembled and distributed to 
the proper locations. This meth- 
od takes a little more program- 
ming but it saves time. You will 
decrease the number of records 
written to and read from tape. 

Purchase a good line renum- 
bering program. When your pro- 
gram is completed, renumber 
your program lines zero in in- 
crements of one. This decreases 
the length of referenced line 
numbers in your program by one 
or more digits. For example, 
look at the following routine: 

100 A$ = INKEY$:IFA$ = ""THEN100 

ELSEIFA$ = "X"THEN110ELSE120 
110 B = B + C:GOTO100 
120 B = B + D:GOTO150 

Assuming that line 100 is the first 
line of a program, the routine will 
look like this after renumbering: 



A$ = INKEY$:IFA$ = ""THEN0ELSEIFA$ 
= "X"THEN1ELSE2 

1 B = B + C:GOTO0 

2 B = B + D:GOT05 



I |^ MODEL III 48K ^Lt 
m 2 DRIVES $1600 M 
W 1 DRIVE $1400 ^ 

P31 Green Phosphor CRT $85 
RS232 $65 
FDC Card $130 
40 Track TAND0N DRIVE (SS)$195 
TAND0N DRIVE PARTS CALL 


* MODEL III TECHNICAL MANUAL 

Written by factory technician 
to accompany Radio Shacks Tech. 
Reference Manual* Packed with rare 
Hardware information. 25Pages $10 

RADIO SHACKS TECH. REFERENCE MANUAL 

$11 


* SERVICES j 
We repair all Model III boards 
and Model III systems - overnight - 
in most cases. Tandon drive repair. 
Gall for details. 


* NO CHARGE TO INSTALL GREEN SCREEN 

OR RS232 IN NEW COMPUTER 

NEXT DAI SHIPMENT. 

120 DAI GUARANTEE ON ALL ITEMS 

PRICES REFLECT CASH DISCOUNT j 

SHIPPING EXTRA 

VISA MASTERCHARGE AMER. EXPRESS 


ft ft it it it ftftftftft ft ft 

ALAMO COMPUTER 00. 

1234 AVANT 

SAN ANTONIO, TEXAS 78210 

j (512) 534-7782 

ftftftftft ftftftftft ft ft 
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Look at the bytes you saved. For 
multi-statement lines you may 
save enough so that additional 
statements may be moved up a 
line, resulting in more memory 
savings. Your program will run 
even faster. 

Summary 

Let's review the procedures 
covered to optimize a Basic 
program: 

• Use variables instead of 
constants; 

• Define the most heavily 
used variables first; 

• Use the Def int statement to 
define all integer variables; 

• Use POKE and Print® 
statements in graphics 
routines; 

• Remove REMs and un- 
necessary spaces from state- 
ments; 

• Use For.. .Next loops in- 
stead of increment and test 
loops; 

• Use multi-statement lines; 

• Purge unused monitor pro- 
grams before running programs; 



• Use as few variable names 
as possible; 

• Create larger blocks of 
data to be written on tape; and 

• Renumber your programs 
starting in line and increment 
by one. 

One last tip to make it an even 
dozen: The more you program, 
the smarter you get. Review 
your earlier programs every six 
months or so. You will find rou- 
tines that can be improved; that 
apply the optimization rules and 
keep your programs as "smart" 
as you are. You can almost al- 
ways optimize your programs 
further. 

There are, no doubt, many 
more ways to optimize your pro- 
grams: Clear only the number of 
bytes required by your program; 
use subroutines for routines 
that are the same in different 
parts of your program and use 
the zero subscripted array vari- 
able name, to name a few. The 
more you optimize your program 
the more efficiently it will work 
for you. And program efficiency 
always pays off. ■ 



TM 






RADIO 
SHACK 

TRS-80'S 
Full Line 

WE PAY SHIPPING in the 48 continental states on prepaid 

orders of $100.00 or more. 
NO TAXES are collected on out-of-state shipments. 
WE ACCEPT Visa, MasterCard and American Express, or 

you can save additional money by paying cash. 

TOLL FREE ORDER NUMBER 800/531-7466 

Pan American 
Electronics 



1117 Conway • Department B 

Mission, Texas 78572 

Phone: 512/581-2766 

Telex Number 767339 

TM — Trademark of Tandy Corporation 




Hello thayuh. This is Eben Flow, proprietor 
of the Fish or Cut Bait Company, buyer and 
seller of lobstah bait for 49 years. My hobbies 
are collecting linoleum samples, squashing flies 
and playing pac-person on my home computer. 

But here on Martinicus Rock, off the coast of 
Maine, the power can be a tad erratic. So, to 
cure the brownout and blackout problems, 
and to keep them spikes and surges off my 
picture tube, I got me a MAYDAY 
Uninterruptible Power Supply from SUN 
RESEARCH. Them fellas fixed me up real good 
and real light on my pocketbook, too. Got me 
a MAYDAY for my mini-calcaputer with a 
voltage regulator and everything for only 325 
clams. They even included the battery in a nice 
waterproof box. Handy out here, you know. 
Now, if MAYDAY would only keep them sea 
dogs out of my barrel. . . 

MAYDAY - Protection even you can afford! 



SUN RESEARCH, INC. 

Box 210 

New Durham, NH 03855 

603/859-7110 

TWX 5102974444 .285 




-See List of Advertisers on Page 435 
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UTILITY 



•) 



LOAD 80 



Electric Pencil-like editing of RAM. 



PENRAM 



Roxton Baker 
Box 8272 APO 
San Francisco, CA 96555 



I recently needed a program 
that would allow me to quickly 
examine large portions of RAM 
and easily change what I found 
there, working either in ASCII or 
hex. This ability would allow me 
to edit data or text in memory, 
without being concerned over 
actual addresses. In particular, I 
wanted to scan and modify 
whole disk tracks which had 
been read into RAM. Tracks 
never read the same way twice 
so the locations in memory of ID 
packs, sector boundaries, etc. 
are unpredictable. 

The available monitors for the 
TRS-80 are written with the in- 
tention of editing hex machine- 
language programs, in which 
byte locations are well defined. 
These monitors require specifi- 
cation of the addresses to be 
edited, and generally allow 
editing only in hex and scanning 



The Key Box 

Model I 

16K RAM Cassette 
32K RAM Disk 
Assembly Language 
Editor/ Assembler 



only in one direction. Bi- 
directional scanning would im- 
prove matters, but you still must 
read off addresses of interest 
and reenter them under the edit 
command. The Electric Pencil's 
editing action not only provides 
true scrolling in both directions, 
but its blinking cursor can be 
positioned with the arrow keys 
and anything typed at the cursor 
location replaces what's there. 
The pencil, however, is not used 
for editing RAM. It works on its 
own text files. 

PENRAM 

PENRAM is a machine-lan- 
guage utility that provides edit- 
ing in RAM and is similar to the 
Electric Pencil. Two-way scroll- 
ing is available at low or high 
speed and the moveable edit 
cursor allows direct type-in of 
hex bytes or ASCII characters 
(the mode can be toggled at a 
keystroke). A continuous dis- 
play of the edit cursor's address 
is maintained as well as its dis- 
placement from a reference ad- 
dress that you may fix. Users of 
Electric Pencil should under- 
stand that PENRAM does not al- 
low true insertion or deletion of 
bytes of code; it merely lets you 
write over what's already there. 
However, see the note at the end 
of this article concerning an 
upgrade to PENRAM. 

PENRAM can be used alone 
as a utility, called from Basic via 
USR or System, or patched onto 
your favorite monitor as a re- 



placement for its editing func- 
tion. Instructions for appending 
it to RSM-2 and T-Bug are given 
later. Furthermore, PENRAM is 
in the public domain. You may 
incorporate it into any program 
you write, commercial or other- 
wise, without royalty arrange- 
ments. Author credit is re- 
quested. 

Creating the Problem 

The source code for PENRAM 
is given in the Program Listing. 
By omitting most of the com- 
ments (and using tab to space 
right) the program will fit into 
a 16K machine using Radio 
Shack's Editor/Assembler. It 
may also be entered into any of 
the disk assemblers. To avoid 
the typing, contact The Alter- 
nate Source. They have kindly 
offered to make the uncom- 
mented source code available 
on tape at cost. 

PENRAM may be assembled 
at any location by changing the 
StartP address near the begin- 
ning. Allow 1100 bytes for the 
code. PENRAM also uses some 
stack space in the program that 
calls it; this is normally of no 
concern. 

Once assembled, PENRAM 
may be used by itself or it may 
be called by another program. 
The StartP address is also the 
entry point. When exited, 
PENRAM executes a Return in- 
struction so it should be called 
in such a manner that this return 
is meaningful. This will always 



be the case if PENRAM is called 
as a subroutine or if it is entered 
from DOS. 

When calling PENRAM via the 
System or USR commands in 
Basic it may be preferable to 
jump on return to addresses 
06CCH or 0A9AH, respectively. 
To achieve this, change the in- 
struction at RETLBL near the be- 
ginning of the source code from 
RET Z to JP Z,nn, for example, 
where nn might be 06CCH. This 
jump takes three bytes as op- 
posed to the one-byte RET, so 
omit the two NOPs immediately 
afterwards. The code will still be 
1100 bytes long. You may add 
more code at this return point to 
clear the screen before return- 
ing. Assume that PENRAM has 
modified all registers except IY. 

Using PENRAM 

On entry, or whenever you 
press shift/left-arrow, PENRAM 
will request an address to start 
the display. Enter a four-digit 
hex address (or just press Enter 
to quit). A hex display of the 256 
bytes of memory beginning at 
that address will appear on the 
screen. You may change this to 
an ASCII display by pressing 
Clear. Another Clear takes you 
back to hex. 

The blinking edit cursor will 
be in the upper left corner. You 
move it using the four arrow 
keys — scrolling is automatic. At 
any time you may enter data at 
the current cursor position. In 
the hex mode two hex charac- 
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ters (0-F) are required; in the 
ASCII mode any printable char- 
acter may be entered (except ar- 
rows). These characters will re- 
place the current byte at that lo- 
cation. You may Break after en- 
tering only one hex character in 
which case the original byte is 
restored. All data changes are 
seen instantly on the screen. 
Most keys repeat so that you 
may easily fill memory with a 
value, and high-speed scrolling 
is provided with the shift/up ar- 
row and shift/down arrow keys. 

On the right, you will see 
<nn> displayed as the actual 
address of the byte next to the 
edit cursor. This makes it easy 
to read off addresses of interest, 
without counting. Below that 
the value of the current refer- 
ence address is shown (in 
decimal) and the displacement 
of the edit cursor from it. 

The reference address is up- 
dated to the current edit cursor 
position whenever you press 
shift/Break. To understand the 
use of the reference address 
feature imagine that you wish to 
move the cursor 287 decimal 
bytes beyond where it is. You 
would press shift/Break to set 
the reference address to the cur- 
rent position of the edit cursor, 
and then you would move the 
cursor downwards while watch- 
ing the displacement value to 
see when you have reached 287. 



Attaching PEN RAM to a Monitor 

The addition of PENRAM will 
complement the editing fea- 
tures of any good monitor pro- 
gram. Patching PENRAM to a 
monitor program is easily done. 
For example, RSM-2 provides a 
U (user-definable) command 
that will access PENRAM. Un- 
der T-Bug the normal M editing 
command is replaced. In the fol- 
lowing instructions all addres- 
ses and values are in hex. 

The 48K version of RSM-2 is 
assumed. For 32K, subtract four 
from the first hex digit of each 
address or value marked "*". 
Thus *E7B3H for 48K becomes 
A7B3H for 32K. Similarly, *FFH 
becomes BFH. For 16K, sub- 
tract eight instead of four. As- 
semble PENRAM at *E7B3H by 
setting STARTP in the source 
code to this value. Load the re- 
sulting object code into 
memory. Load and run RSM-2. 
Using the E command of RSM-2, 
change the code at address: 



•EEA6Hfrom00 to 7F 

*EEB1H from 32 80 "FF to 00 00 00 
•FF80H from C9 00 00 to C3 B3 "E7 



At this point the new monitor 
program PENRSM resides from 
*E7B3H to *FFFFH, with entry 
point *EE94H. You may write it 
out to tape with the P command, 
or on a disk system you may go 
to DOS with G402D and use 







Program Listing 




00010 


.******************************************* 


************* 


00020 






00030 


} »>>> PENRAM <<<<< 




00040 






00050 


f A SCROLLING RAH EDITOR UTILITY 




00060 






00070 


! SOFTWARE IN THE PUBLIC DOMAIN 




00080 






00090 


.******************************************* 


************* 


00100 






00110 


; BY ROXTON BAKER 




00120 


; BOX 8272, APO SAN FRANCISCO 96555 




00130 


; 




00140 


; 




00150 


; VERSION 2.0 




00160 




' 




00170 






00180 


; COMMANDS: 




00190 


; 'CLEAR' CHANGES TYPE OF DUMP (HEX/ASCII). 




00200 


; 'BREAK' BREAKS FROM ERRONEOUS HEX ENTRY. 




00210 


; 'SHIFT/BREAK' SETS REF. ADDRESS = CURRENT 


ADDRESS. 








00220 


,- 'SHIFT/UP- OR DOWN-ARROW SCROLLS RAPIDLY. 




00230 


'SHIFT/LEFT-ARROW' ALLOWS NEW STARTING AD 


DRESS. 








00240 


; (REPLY <ENTER> TO LEAVE PENRAM) 




00250 






00260 


; 




00 27 




* 




00280 


; PENRAM CAN BE RELOCATED BY CHANGING THE VA 


LUE OF 




Listing continues 



TapeDisk or the Dump com- 
mand to put PENRAM/CMD 
on disk. 

Adding PENRAM to T-bug is 
very easy. (A Level II non-disk 
machine is assumed.) Assemble 
PENRAM at 4980H and load the 
object code into memory there. 
Load and run T-Bug. Use its M 
command to carefully change 
the two bytes at address 440EH: 

from 32 45 
to 80 49 

Use X to break from the editing 
mode. The new monitor program 
PENBUG now resides from 
4380H to 4D09H, with entry 
point 43A0H. Immediately, be- 
fore doing anything else, punch 
it out to tape with the P com- 
mand. Under PENBUG the M 
command will access PENRAM; 
shift/left arrow; Enter returns 
from it. It may also be necessary 
to press X on return to get the # 
prompt. 

To attach PENRAM to other 
monitors locate the call or jump 
used when the edit command is 
invoked and replace it with a call 
to PENRAM. 

How PENRAM Works 

Those interested in modifying 
or extending PENRAM will need 
to know something of the pro- 
gram structure. Refer to the 
source code listing in Listing 1. 
PENRAM operates by keeping 
track of three important address- 
ses, which will be referred to by 
the names of their storage loca- 
tions (which are unimportant). 

HOMADD, the address that is displayed 

in the upper left (home) corner. 

EDCUR, the current location in video 

memory (3C00H-3FFFH) of the edit 

cursor. 

BYTED, the actual address of the byte 

pointed to by the edit cursor. 

Initially the screen is filled 
with 256 bytes of memory start- 
ing at the hex address input by 
the user. This address is the first 
value of HOMADD. The edit cur- 
sor is positioned at the first byte 
displayed. From there it can be 
moved 1 5 spaces to the right and/ 
or 15 lines down, without caus- 
ing any scrolling. A count (stored 
in RGTCUR) is kept of how many 
spaces to the right the cursor is 
moved. A similar count (in 
DWNCUR) is kept of how many 
lines down it is moved. PENRAM 



begins each cycle of its opera- 
tion at UpDate by calculating, 
from RGTCUR and DWNCUR 
the present address, EDCUR, of 
the edit cursor. It simultaneous- 
ly calculates (from HOMADD, 
RGTCUR, and DWNCUR) the val- 
ue of BYTED so that it knows to 
which byte in memory the edit 
cursor is pointing. 

Once these values have been 
found, PENRAM displays the 
address stored at BYTED as the 
<nn> value mentioned earlier. It 
also displays the current refer- 
ence address, called ATADD, 
and subtracts it from the BYTED 
address to find the present dis- 
placement. Available ROM rou- 
tines are used to convert this 
displacement to decimal, and it 
too is displayed. 

With this done, PENRAM 
goes into a keyboard scan loop 
at KBDSCN. It remains in this 
loop, blinking the edit cursor, 
until a key is pressed. The cursor 
blink rate is determined by 
BDELAY, and the graphics char- 
acter used for the cursor is de- 
fined by CURCHR. Either of 
these may be changed before 
assembly. 

When a key is pressed, PEN- 
RAM goes to KPRESS and takes 
the following actions: 

• If a shifted up- or down- 
arrow key, PENRAM immediate- 
ly checks the value of DWNCUR 
and modifies it or scrolls the 
screen, as appropriate. 

• If the shift/left arrow key, 
PENRAM reinitializes by jump- 
ing back to the ENTRY2 point. 
This is almost a full restart. 

• If the shift/Break key, 
PENRAM immediately sets 
ATADD equal to BYTED, thus 
updating the reference address, 
and returns to UpDate so that 
the new value will be displayed. 

• If an unshifted arrow key, 
PENRAM enters a debounce de- 
lay loop and then processes the 
key by updating RGTCUR or 
DWNCUR and scrolling the 
screen if necessary. 

• If the Clear key, PENRAM 
changes the type of display flag 
HATYPE from hex to ASCII or 
vice-versa, redraws the screen 
and restarts the cycle. 

• If a valid hex character in 
the hex mode, PENRAM remem- 
bers the entry, delays briefly for 
debounce, and awaits the next 
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hex character. When that is 
received PENRAM forms the 
new byte and writes it into 
BYTED. Then it steps the edit 
cursor right one space by jump- 
ing to same place (DORT) that a 
right-arrow would have taken it. 

• If a valid ASCII alpha-nu- 
meric and in the ASCII mode, 
PENRAM writes it into BYTED 
and then steps the edit cur- 
sor right. 

The delay values used for the 
debouncing are specified as 
KDELAY1 and KDELAY2. You 
may wish to increase them if 
you experience keybounce. 

The cursor movement re- 
ferred to above as resulting from 
the arrow keys is coded in rou- 
tines DOUP, DODN, DOLF, and 
DORT. For example, if the user 
is not attempting to move the 
cursor off-screen, then these 
routines just translate the arrow 
keystrokes into appropriate 

changes in RGTCUR and 
DWNCUR, and return to UpDate 
to begin the next cycle. 

When the cursor is moved be- 
yond the edge of the screen, 



scrolling must take place. This 
is done by shifting the current 
contents of the screen up (or 
down) by one line, updating HO- 
MADD, and writing one new line 
at the bottom (or top). Note that 
this scrolling affects only the 
first 55 characters of each line. 
The BYTED and ATADD loca- 
tions displayed on the right are 
not moved. RGTCUR and DWN- 
CUR are also changed as re- 
quired. PENRAM then returns to 
UpDate to begin the next cycle. 
The detailed comments in the 
source code may be referred to 
for further information. ■ 

Note: Since this was written, 
a greatly improved version of 
PENRAM has become available. 
It allows true insert/delete, 
block move, fill and search, etc. 
However, the object code now 
requires 4K of RAM, and the 
source code can be assembled 
only on a disk system using 
MISOSYS' EDAS assembler. 
Contact The Alternate Source, 
1806 Ada St., Lansing, Ml 48910 
for more information. 





FC//M™ 
Food Co-Op/ 
Management 

For Model I, II and III 

Put the purchasing power of a Food Co-Op to 

work for your group, church, office — even your 

computer club. Our complete system teaches you how to: 

• Set up a Co-Op • Use wholesale buying power 

• Save money, eat better • Administer the operation 

In addition, our tested software will simplify the paperwork 
and recordkeeping. 

Twn wAYST ° 

I WW GET STARTED. 

1 Order the manual and you'll 
learn how to set up your 
Co-Op. Our instructions are so 
complete you can create your 
own program or start without 
our software. $35.00 (credited 
to software purchase) 

8>^ 
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2 Order the complete sys- 
tem, including FC/M ,U pro- 
gram and RS COBOL Run Time 
Package and be on your way 
to saving money for your 
group. $150.00 (Mod I/III) 
$200.00 (Mod II) 

cu<&faasi*v Jo cwAtift&JiGsv 
P.O. Box 265, Mid City Station 
Dayton, Ohio 45402 

Need More Information? Use CompuServe. GO PCS-46, TYPe or 
DOWnload FCM/TXT (70200,123) from ACCESS prompt. Or use Reader 
Service Card. 

REQUIREMENTS: Mod I— 48K, 3 drives, Mod II— 64K, 1 drive, Mod III— 
48K, 2 drives, all require 132 character printer. Specify Model Number 
When Ordering. Add $5.00 for shipping. Ohio residents add 6% State Tax. 
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00290 


; ' STARTP ' . 


ALLOW 1100 (044CH) BYTES TOT 


AL. 


00300 










E7B3 


00310 


STARTP 


EQU 


0E7B3H 


FOR LINKING 


WITH RSH4 8. 


00320 
00330 

00340 


; 




















00350 


; SYSTEM ROUTINES AND LOCATIONS - 





002B 


00360 


KI 


EQU 


002BH 


INPUTS ASCI 


I BYTE 












01C9 

EN 


00370 


CLS 


EQU 


01C9H 


CLEARS SCRE 


4020 


00380 


CURPOS 


EQU 


4020H 


POS'N OF ST 


D. CURSOR 












4036 


00390 


KIBUF 


EQU 


4036H 


WORKSPACE F 


OR KI 












05D9 


00400 


LINEIN 


EQU 


05D9H 


INPUTS WHOL 


E LINE 












0033 


00410 


BYTDIS 


EQU 


0033H 


PRINTS ASCI 


I BYTE 












0060 


00420 


DELAY 


EQU 


0060H 


14.6 USEC P 


ER COUNT BC 












0A9D 


00430 


NTF2 


EQU 


0A9DH 


DENOTES INT 


EGER VALUE 












0PBD 


00440 


NUMSTR 


EQU 


0FBDH 


CONVERTS NU 


H. TO STRING 


00450 












00460 


; CONSTANTS — 






2500 


00470 


KDLAY1 


EQU 


2500H 


MAIN INTER- 


KEY DELAY 












1200 


00480 


KDLAY2 


EQU 


1200H 


AUX DELAY R 


EGULAR CHAR. 












00A0 


00490 


BDELAY 


EQU 


0A0H 


SPEED OF CU 


RSOR BLINK 












0080 


00500 


BLANK 


EQU 


80H 


BLANK GRAPH 


ICS BLOCK 












008A 


00510 


CURCHR 


EQU 


8AH 


DEFINES CUR 


SOR CHARACTER 


00520 


t 










00530 


; KEYBOARD INPUT VALUES 




001F 


00540 


CLEAR 


EQU 


1FH 




0004 


00550 


BREAK 


EQU 


4 




0005 


00560 


SHFBRK 


EQU 


5 




0009 


00570 


SHFTUP 


EQU 


9 




0011 


00580 


SHFTDN 


EQU 


17 




0021 


00590 


SHFLFT 


EQU 


21H 




005B 


00600 


UPAROW 


EQU 


5BH 




000A 


00610 


DNAROW 


EQU 


0AH 




0008 


00620 


LFAROW 


EQU 


08 




0009 


00630 
00640 


RTAROW 


EQU 


09 






00650 


,- KEYBOARD SCAN 


ADDRESSES 




3801 


00660 


KEYS1 


EQU 


3801H 


@-G KEYS 


3840 


00670 


CNTL 


EQU 


3840H 


DETECT CONT 


ROL KEYS 












38C0 
IFTED 


006 80 


SHCNTL 


EQU 


38C0H 


SAME BUT SH 


3880 


00690 


SHIFT 


EQU 


3880H 


HERE MEAN 


S NO SHIFT 


00700 












00710 


; STORAGE LOCATIONS 




E7B5 


00720 


STRPLC 


EQU 


STARTP+2 


STORES STRI 


NG TO PRINT 












E7F5 


00730 


STORAG 


EQU 


STARTP+66 




E7F5 


00740 


ADDR 


EQU 


STORAG 


ADDRESS TO 


PRINT NEXT 












E7F7 


00750 


HOHADD 


EQU 


STORAG+2 


ADDRESS AT 


TOP LEFT 












E7F9 


00760 


ED CUR 


EQU 


STORAG+4 


LOC'N OF ED 


IT CURSOR 












E7FB 


00770 


BYTED 


EQU 


STORAG+6 


BYTE AT EDI 


T CURSOR 












E7FD 


007 80 


RGTCUR 


EQU 


STORAG+8 


t TIMES MOV 


ED RIGHT 












E7FE 


00790 


DWNCUR 


EQU 


STORAG+9 


* TIMES MOV 


ED DOWN 












E7FF 


00800 


HATYPE 


EQU 


STORAG+10 


TYPE OF DUM 


P FLAG 












E800 


00810 


KEY 


EQU 


STORAG+11 


KEY INPUT S 


TORAGE 












E801 


00820 


KEYH 


EQU 


STORAG+12 


USED IN HEX 


ENTRY 












E802 


00830 


LSTARW 


EQU 


STORAG+13 


DIRECTION 


F LAST SCROLL 












E803 


00840 


ATADD 


EQU 


STORAG+14 


HOLDS REFER 


ENCE ADDRESS 


00850 












00860 


; VIDEO 


LOCATIONS 




3C00 


00870 


LINE01 


EQU 


3C00H 




3C40 


00880 


LINE02 


EQU 


3C40H 




3000 


00890 


LINE05 


EQU 


3D00H 




3FC0 


00900 


LINE16 


EQU 


3FC0H 




3C00 


00910 


VIDFST 


EQU 


3C00H 




3FFF 


00920 
00930 
00940 
00950 


VIDLST 


EQU 


3FFFH 






00960 


; START 


OF MAIN 


PENRAM ROUTINE 






00970 










E7B3 


00980 




ORG 


STARTP 




E7B3 1850 


00990 
01000 




JR 


ENTRY 




0050 


01010 




DEFS 


80 


WORK AND ST 


ORAGE SPACE. 


01020 










E805 F3 


01030 


ENTRY 


DI 






E806 CDC901 


01040 




CALL 


CLS 




E809 21383E 


01050 




LD 


HL,3E38H 


PROMPT FOR 


ADDRESS . 












E80C 222040 


01060 




LD 


(CURPOS) ,HL 




E80F 21EEEB 


01070 




LD 


HL.INMSG 

Lis 


ing continues 
... 
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COMPUTES 



EF- R ACET computes mrq cr- RACET computes lto-^ 

L. integrity '" Software mJ !■ Integrity in Software _J 



Give Your TRS-80 * a Tremendous Boost 

with RACET COMPUTES Software 

RACET computes Utility Software makes the TRS faster, more efficient, 
and easier to use. Our programming aids improve your productivity. 
Our reputation is for products that are professional in design and work 
as advertised!!! 

• NEW SPEED-UP KIT FOR TRSDOS • 
V2.0a & 2.0b MODEL 11 & 16 * S99.95 

This software fix' to TRSODS 2.0 is a MUST to users impatient with the speed of 
TRSDOS 2.0. Important features include: Boot speed improved by a factor of 2 
1 ,2 times. Time and Date need only be entered once at power on . Data reads up to 
five times faster than in standard configuration. The system runs faster then when 
verify detect feature has been turned off, but still retains the reliability of the verify 
detect function. 

Special Note for SCRIPSIT users — Scripsit turns off the verify detect feature. The 
Speed-Up Kit turns it back (^at.'hbtoss'.Tn disk l.!0 time. The Speed-Up Kit should 
dramatically reduce blown" directories and garbled data 

• SUPSRZAP lor CP/M-80 * $99.95 * 

You asked for it ! I ! And now.it's here! ! ! Runs oft any CP<'M version 2,X:System run- 
ning on a Z80 CPU and 8- inch diskettes!!! Recover Blown Files! Access, modify. 
copy, zero;* and print any sector on disk or inmemeory -^. tri Hex or ASCII . Full 
screen editor. Fife edit mode; ■ 

• SUPERZAP for TRSBQS It lor Models II and 16 * $99.95 * 
Recover Blown Files!! Now you can directly access, modify, copy, zerrj, or print 
any sector on your diskette or Radio Shack Hard Drive: Also included in this pack- 
age is a SCAN utility to facilitate a disk search for a specified string. Documenta- 
tion includes a description of the TRSDOS It directory structure. 
* * Wotiel || Fast Backup Utility * * $75 
5 TO 10 times faster backupsi!! Full disk backup (including verify) in 
55 seconds!!! on two drive system — 2:T5on single drive system. In 
business, time is money, and one BACKUP is worth TOGO tears! ! 

RACET computes Utilities & Programmer Aids 

Generalized Subroutine Facilities (GSF) Mod I $25, Mod III $30, 
Mod II $50 The STANDARD against whicti:3ll ottier sorts are compared! 
And. then compare price!! Multi-key' multi-variable and multi-key 

character string sorts. Includes zero and : move arrays and sample 

programs. 

Basic Link Facility 'BUNK' Mod I and III $30 Mod II $50 

Link from one BASIC program to another saving all variables! The new program 

can be smaller or larger than the original program. The chained program may 

either replace the existing program, or can be merged by statement number. The 

statement number where execution is to start can be specified! 

Infinite BASIC Mod I $50, Mod III $60 Extends Level II BASIC with 
complete Matrix Functions and 50 more string functions. Includes 
RACET in-memory sorts!! Select only those functions you want to 
optimize memory. 

Infinite BUSINESS (Requires Infinite BASIC) Mod I and III $30 Complete 
printer pagination controls, hash codes, binary array search, and 
packed decimal arithmetic (127-digit accuracy). 
C0MPR0C Command Processor Mod I and Mod III $30 Auto your disk 
to perform any sequence of instructions that you can give from the 
keyboard!! Ideal for setting up dedicated applications. 
Disk Sort/Merge (DSM) Modi $75, Mod III $90, Mod II $150 All 
machine language stand-alone Random file sort package. Establish sort 
specification in simple BASIC command file. Sorts multiple-diskette 
files. Only operator action is to switch diskettes when instructed. Super 
fast sort times - improved disk I/O makes this the fastest Disk Sort/ 
Merge available. 

KFS-80 Keyed File System Mod I and III $100, Mod II $175 Machine 
language BASIC ISAM utility provides keyed and sequential access to 
multiple files. Simple interface to BASIC. Binary tree index system 
provides rapid access to records. 

Utility Package Mod II $150 Recover blown diskettes. Includes 
Superzap, bulk copies, and other utilities for repair of blown diskettes. 
Complete documentation on diskette structure and guidance for repair. 
Other utilities include Dynamic DEBUG (with single-step, trace, sub- 
routine calling, program looping and more), XCR, DISKID, Directory 
Catalog System, XPURGE. 



Development Package Mod II $125 Includes RACET Superzap, 
Apparat Disassembler and Model II interface to Microsoft 'Editor 
Assembler + and documentation for Mod I and uploading service. 
Assemble directly into memory, MACRO facility, save all or portions of 
source to disk, extended editor commands. 

Basic Cross Reference Utility Mod II $50 SEEK and FIND functions for 
variable, line numbers, strings, keywords. 'All' options available for 
line number and variables. Load from BASIC - call with control 'R'. 
Output to screen or printer. 

FIELD PROVEN 

5 to 140 MEGABYTES On Line for the TRS-80" Model II 

Winchester and Cartridge Disk Drives available for immediate delivery! ! 
5 MEGABYTE Winchester Disk Drive — CALL for PRICING 

LOWEST PRICES AVAILABLE ANYWHERE!! 




14 + Megabyte (formatted) ARM Winchester Disk Drive $3595 

§| includes ECC error detection and correction FAST. Service Contract Available 
($30/month/drive) Multiplexor Available. 

20 Megabyte CM Honeywell Bull Cartridge Drive $7995 

10 Megabytes fixed, 10 removable for the professional installation 
requiring Removable Media BACKUP. 60 and 120 Megabyte add-on 
Winchester drives available. 

10 Megabyte Cameo - Western Dynex Cartridge Drive $5995 

pji 5 Megabytes fixed. 5 removable for the smaller professional installation. 
Removable Media BACKUP. Multiplexor available for up to four users!! 



HARD /SOFT DISK SYSTEM (HSDS) SOFTWARE 

HSDS is available for the Radio Shack (2.0{A} compatible), Cameo, 
Cynthia Bull. ARM, Corvus, QCS, Data Peripherals, and Santa Clara 
Systems hard disk systems and others! ! ! 

Compatible with your Version 2.0(a) TRSDOS files. Compatible with 
your existing BASIC programs and files. Compatible with most machine 
language programs that use the standard calling sequence. You can 
access both your floppy disk drives and HSDS files interchangeably!! 
Complete utilities include HZAP (Hard Disk SUPERZAP), Directory 
Catalog System, Parameterized FORMAT, HPURGE (Bulk Copy/Purge 
Utility) and others. 

The Hard/Soft Disk System (HSDS) Software has more than One Year's 
FIELD Experience. The latest HSDS version adds several enhancements 
including maintenance of system files on the hard drive, files as large 
as the disk, the ability to segment the disk as logical drives, and defin- 
able directory size. Uses 3.2K memory. Mixed floppy and hard drive 
operation is supported. 
HSDS for Radio Shack $500 
HSDS for Other Drives $400 

c- RACET computes LTD-rq 

!_« Integrity in Software __ J 

1330 N. Glassell, Suite M, Orange, CA 92667 (714) 997-4950 

CALL FOR COMPETITIVE PRICING ON HARD DRIVE SUBSYSTEMS - 
BUY WHERE YOU CAN GET SOFTWARE SUPPORT!! 

CHECK. VISA. M/C COD. ON CERTAIN HARDWARE 

TELEPHONE ORDERS ACCEPTED (714) 997-4950 

♦TRS-80 IS A REGISTERED TRADEMARK OF TANDY CORPORATION 

CP/M IS A TRADEMARK OF DIGITAL RESEARCH 

• 41 CIRCLE READER RESPONSE FOR FREE CATALOG 



■ See List ol Advertisers on Page 435 
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DEVELOPMENT 
HARDWARE/SOFTWARE 

GTEK MODEL 7128 
EPROM PROGRAMMER 

Compare the features: 

• Microprocessor based intelligence for ease 
of use and interface. 

• RS-232 interface and ASCII data formats 
make the 7128 compatible with virtually 
any computer with an RS-232 interface 
port. 

• Auto-select baud rate, Xon/Xoff and DTR, 
CTS are supported. 

• Program and read the following: 

2508, 2758, 2516, 2716, 27C16, 2532, 2732, 
2732A, 27C32, MCM68766, 2564, 2764, 
27C64, 27128, (8748, 8749, 8741, 8742, 8751 
with socket adapter) 

• Automatic use of proper program voltage 
based on type selected. 

• Optional support for EEPROMS 

• Menu driven eprom type selection, no 
personality modules required. 

• Supports Intel and Motorola data formats 
as well as conversational hex formats. 
Formatted screen dump and block read 
commands. 

• Interupt driven type ahead, program and 
verify real time while sending data. 

• Program single byte, block, or whole eprom. 

• Intelligent diagnostics discern between 
eprom which is bad and one which merely 
needs erasing. 

• Erasure check command. 

• Busy light indicates when power is being 
applied to program socket. 

• Complete with zero insertion force socket 
and integral 120 VAC power supply. 
(240 VAC/50HZ available at slight addi- 
tional charge) 

• High Performance/Cost ratio. 

Model 7128 PRICE $389.00 

MODEL 7128/24 - budget version of the 
7128. Supports 24 pin parts thru 32K 
only. Upgradable to full 7128 capacity. 
Model 7 1 28/24 PR ICE $289.00 




Accessories 



Erasers, Eproms, Cables 



Gtek 



INC. 



GTEK MODEL 9000 SERIES COMPUTERS 

• Two user operating system available. 
•4 MHz Z80 CPU, no wait states 

• 128K byte RAM with bank select 

• DMA floppy disk operation with track buf- 
fering for fast disk I/O. 

• 2 serial ports with type ahead, speeds to 
76.8K baud. 

• Parallel printer port, with 47K interrupt 
driven spooler. 

• Winchester interface port. 

• Dual mini-floppies, FORMATTED storage 
to 1.6 Megabyte. 

• Eight inch drives available also. 

• One year warranty (90 days on drives) 

Highest Performance/Cost ratio 
Prices start at $2390.00 including CP/M* 

Contact GTEK direct for quotation on 
Series 9000 tailored to your specific needs. 

CROSS ASSEMBLERS by Avocet Systems, 
Inc. (For CP/M* based machines) 
For the following families: 
6805, 6809, 1802, 8048, 8051, 6502, 
6800, NEC7500, F8, COP400. Z8 

Cross Assembler price $200.00 each except 
NEC7500 price $500.00 



* Trademark of Digital Research, Inc. 

Post Office Box 289 

Waveland, Mississippi 39576 

(601)467-8048 



The Easy MANHATTAN Way To Handle 
EXPENSES, LISTS & MAILINGS 

EXPENSE LEDGER — Files entries and generates 
reports on business or personal expenses. Sorts by date, 
finds and displays on-screen or prints out all expenses, 
month summary, or selection by payee, purpose or 
category. 15 categories assigned by user, displayed on 
screen when entering, editing or deleting. 48K version 
holds 470 entries, 32K holds 200 — use for year, 
quarter or month. $35. 

MAIL LIST MANAGER — Holds 1 ,000 names and 
addresses in 48K two-disk version or 400 in one-disk 
32K version. Sorts by zip code or name [lightning fast in 
machine code], prints labels one-up or two-up, selectable 
by any combination of user-entered Print Key or 
geographic area. Prints full list in notebook format. Two- 
disk version $50, one-disk $45. 

DISK LISTMAKER — User-friendly simple database, 
holds 1 ,000 names or items plus 5-digit codes in 48K, 
500 in 32K. Displays on-screen and prints out lists and 
sub-lists. Full editing, sorts by name. Disk version of 
original cassette program in use by schools, real estate 
firms, many individuals. $20. 

For Models I or III [with DOS conversion] 

Write for full catalog of disk & cassette programs 

California residents add 6% tax 

MANHATTAN SOFTWARE 

Box 1 063, Woodland Hills, CA 91 365 ^ 259 
24-hour Visa/MC Order Line [213] 704-8495 
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E812 CDC0EB 


01080 
01090 ; 


CALL 


OUTSTR 


; DISPLAY IT. 




01100 ; 


TAKE IN 


4-DIGIT HEX 


ADDRESS. BREAK 


FROM PENRAM 












01110 ; 


IF ONLY 


<ENTER> WAS 


PRESSED. 


E815 21783E 


01120 ENTRY2 


LD 


HL,3E7 8H 


; CLEAR ANY P 


REV. ADDRESS 










E818 222040 


01130 


LD 


(CURPOS) ,HL 


; AND TAKE 


IN NEW ONE. 










E81B 3E1E 


01140 


LD 


A,1EH 


; ERASE TO EN 


D OF LINE. 










E81D CD3300 


01150 


CALL 


BYTDIS 




E820 0604 


01160 


LD 


B,4 


; ALLOW ONLY 


4 DIGITS 










E822 21B5E7 


01170 


LD 


HL,STRPLC 




E825 CDD905 


01180 


CALL 


LINEIN 




E828 78 


01190 


LD 


A,B 


,-B HAS t CHA 


R. TYPED. 










E829 A7 


01200 
01210 ; 


AND 


A 




E82A C8 


01220 RETLBL 


RET 


Z 


; LEAVE PENRA 


M IF NO CHAR. 










E82B 00 


01230 


NOP 




; ENTERED. 


CHANGE THIS 










E82C 00 


01240 


NOP 




f TO A JUMP 


IF DESIRED. 


01250 ; 








E82D FE04 


01260 


CP 


4 




E82F 20E4 


01270 


JR 


NZ, ENTRY 2 


;DO AGAIN IF 


< 4 CHAR. 


01280 ; 










01290 ; 


IS INPUT VALID HEX? 


IF NOT, BACK TO 


PROMPT. 










E831 21B8E7 


01300 


LD 


HL,STRPLC+3 




E834 CD80EA 


01310 


CALL 


FRMBYT 


; MAKES ASCII 


CHAR AT HL 










E837 38DC 


01320 


JR 


C, ENTRY 2 


; INTO VALI 


D HEX IN A. 










E839 32F7E7 


01330 


LD 


(HOMADD) ,A 


; RETURNS C 


ARRY SET IF 










E83C CD80EA 


01340 


CALL 


FRMBYT 


} NOT VALID 


HEX. 










E83F 38D4 


01350 


JR 


C, ENTRY 2 




E841 32F8E7 


01360 


LD 


(HOMADD+1) ,A 




01370 ; 










01380 ; 


STARTING ADDRESS IS 


AT HOMADD. NOW 


INITIALIZE 












01390 ; 


SCROLLING DUMP ROUTINE AND BEGIN. 


E844 AF 


01400 


XOR 


A 




E845 32FFE7 


01410 


LD 


(HATYPE) ,A 


; ASSUME HEX 


DUMP. 


01420 ; 








E848 32FEE7 


01430 


LD 


(DWNCUR) ,A 


;EDIT CURSOR 


IS AT 










E84B 32FDE7 


01440 
01450 ; 


LD 


(RGTCUR) ,A 


; TOP LEFT 


E84E 2AF7E7 


01460 


LD 


HL, (HOMADD) 


;THIS IS FIR 


ST REFER- 










E851 2203E8 


01470 


LD 


(ATADD) ,HL 


; ENCE ADDR 


ESS. 


014 80 ; 








E854 21783C 


01490 


LD 


HL,3C78H 


;SET UP CURS 


OR AND 










E857 222040 


01500 


LD 


(CURPOS) ,HL 


; PRINT LOG 


AND 










E85A 21F7EB 

KS. 

E85D CDC0EB 


01510 


LD 


HL,PENMSG 


; OTHER MAR 


01520 


CALL 


OUTSTR 




E860 3E3E 


01530 


LD 


A, •>' 




E862 32F83C 


01540 


LD 


(3CF8H) ,A 




E865 3E3C 


01550 


LD 


A,'<' 




E867 32FF3C 


01560 


LD 


(3CFFH) ,A 




E86A 3E3D 


01570 


LD 


A, ' = ' 




E86C 32783D 


01580 


LD 


(3D78H) ,A 




E86F 3E48 


01590 


LD 


A,'H' 




E871 327E3D 


01600 
01610 ; 


LD 


(3D7EH) ,A 




E874 2AF7E7 


01620 REINIT 


LD 


HL, (HOMADD) 


; START WITH 


REQUESTED 










E877 22F5E7 


01630 


LD 


(ADDR) ,HL 


; ADDRESS. 


E87A 0610 

S. 

E87C 21FF3B 


01640 


LD 


3,16 


;F0R 16 LINE 


01650 


LD 


HL,VIDFST-1 


; INITIALIZE 


CURSOR. 










E87F 222040 


01660 
01670 ; 


LD 


(CURPOS) ,HL 




E882 D9 


016 80 INITLP 


EXX 




; REPAINT SCR 


EEN BY PRINT- 










E883 2A2040 


01690 


LD 


HL, (CURPOS) 


; ING 16 LI 


NES. 










E886 23 


01700 


INC 


HL 




E887 222040 


01710 


LD 


(CURPOS) ,HL 




E88A 2AF5E7 


01720 


LD 


HL,(ADDR) 




E88D CD55EB 


01730 


CALL 


MAKSTR 


; CREATES DUM 


P STRING FROM 










E890 21B5E7 


01740 


LD 


HL.STRPLC 


; ADDR AND 


THE 16 BYTES 










E893 CDC0EB 


01750 


CALL 


OUTSTR 


; THERE. P 


RINT STRING. 










E896 011000 


01760 


LD 


BC,16 




E899 CDCAEB 


01770 


CALL 


AADDR 


(POINT TO NE 


XT ADDRESS. 










E89C D9 


017 80 


EXX 






E89D 10E3 


01790 
01800 ; 


DJNZ 


INITLP 




E89F 3E01 


01810 


LD 


A,l . 


; CURSOR MOVE 


D DOWN LAST. 










E8A1 3202E8 


01820 
01830 ; 


LD 


(LSTARW) ,A 




E8A4 2AF9E7 


01840 UPDATE 


r.D 


HL,(EDCUR) 


; ERASE OLD E 


DIT CURSOR. 










E8A7 3680 


01850 
01860 ; 


LD 


(HL) , BLANK 






01870 ; NOW CALCULATE 


NEW EDIT CURSOR POSITION (ED 


CUR) AND EDIT 
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01880 


BYTE ADDRESS 


(BYTED) FROM 


NEW VALUES OF DW 


NCUR AND 


01890 


RGTCUR. 






E8A9 3AFEE7 


01900 


LD 


A, (DWNCUR) 


INITIALIZE 


FOR BEING 










E8AC 3C 


01910 


INC 


A 


; COUNTED. 


E8AD 47 


01920 


LD 


B,A 




E8AE 21C33B 


01930 


LD 


HL,VIDFST-61 




E8B1 114000 


01940 


LD 


DE,64 




E8B4 D9 


01950 


EXX 




; COUNT ADDRE 


SEES IN ALT 










E8B5 2AF7E7 


01960 


LD 


HL,(HOMADD) 


; REGISTER.':! 


E8B8 011100 


01970 


LD 


BC,17 




E8BB AF 


01980 


XOR 


A 




E8BC ED42 


01990 


SBC 


HL,BC 




E8BE 111000 


02000 


LD 


DE,16 




E8C1 D9 


02010 
02020 


EXX 






E8C2 19 


02030 


L1NEDN ADD 


HL,DE 


; FOR EVERY L 


INE DOWN, ADD 










C8C3 D9 


02040 


EXX 




; 64 TO EDC 


UR AND 16 










E8C4 19 


02050 


ADD 


HL,DE 


, TO BYTED. 


E8C5 D9 


02060 


EXX 






E8C6 10FA 


02070 
02080 


DJNZ 


LINEDN 




E8C8 3AFDE7 


02090 


LD 


A, (RGTCUR) 




E8CB 3C 


32100 


INC 


A 




E8CC 47 


02110 


LD 


B,A 




E6CD 110300 


02120 
02130 


LD 


DE,3 




E8D0 19 


02140 


SPCRGT ADD 


HL,DE 


;FOR EVERY S 


PACE RIGHT, 










E8B1 D9 


02150 


EXX 




; ADD 3 TO 


EDCUR AND 1 










E8D2 23 


02160 


INC 


KL 


; TO BYTED. 


E8D3 D9 


02170 


EXX 






E8D4 10FA 


02180 
02190 


DJNZ 


SPCRGT 




E8D6 22F9E7 


02200 


LD 


(EDCUR) ,HL 


; UPDATE EDIT 


CURSOR POS'N 










E8D9 36 8A 


02210 


LD 


(HL) ,CURCHR 


; AND PRINT 


CURSOR . 










E8DB D9 


02220 


EXX 






E8DC 22FBE7 


02230 


LD 


(BYTED) ,HL 


; UPDATE EDIT 


BYTE POS'N 










E8DF D9 


02240 
02250 


EXX 








02260 


; DISPLAY THE CURRENT 


EDIT BYTE ADDRES 


S ALONG 












02270 


; WITH THE REFERENCE ADDRESS AND OFFSE 


T FROM IT. 










E8E0 21FA3C 


02280 


LD 


HL,3CFAH 


;WILL PRINT 


HERE FIRST. 










E8E3 222040 


02290 


LD 


(CURPOS) ,HL 




E8E6 21B9E7 


02300 


LD 


HL,STRPLC+4 


;PUT IN TERM 


INATOR FOR 










E8E9 3603 


02310 


LD 


(HL),3 


; STRINGS B 


ELOW. 


02320 








E8EB 2B 


02330 


DEC 


HI, 


;MAKE BYTE T 


HAT EDIT 










E8EC ED4BFBE7 


02340 


LD 


BC, (BYTED) 


; CURSOR PO 


I NTS TO INTO 










E8F0 CD98EB 


02350 


CALL 


BSTRNG 


; AN ASCII 


STRING AND 










E8F3 CDC0EB 


02360 
02370 


CALL 


OUTSTR 


; PRINT IT. 


E8F6 217A3D 


02380 


LD 


HL,3D7AH 


; PRINT REF. 


ADDRESS SIH- 










E8F9 222040 


023 90 


LD 


(CURPOS) ,HL 


; ILARLY. 


E8FC 21B8E7 


02400 


LD 


HL,STRPLC+3 




E8FF ED4B03E8 


02410 


LD 


BC,(ATADD) 




E903 CD98EB 


02420 


CALL 


BSTRNG 




E906 CDC0EB 


02430 
02440 


CALL 


OUTSTR 




E909 21B83D 


02450 


LD 


HL,3DB8H 


;TO PRINT OF 


FSET, FIRST 










E90C 222040 


02460 


LD 


(CURPOS) ,HL 


; CLEAR THE 


LINE. 










E90F 3E1E 


02470 


LD 


A,1EH 




E911 CD3300 


02480 


CALL 


BYTDIS 




E914 2AFBE7 


02490 


LD 


HL, (BYTED) 


;NOW CALC. 


FFSET. 










E917 ED5B03E8 


02500 


LD 


DE, (ATADD) 




E91B AF 


02510 


XOR 


A 


; RESET CARRY 


FLAG. 










E91C ED52 


02520 


SBC 


HL,DE 


;GET OFFSET 


IN HL. 










E91E 222141 


02530 


LD 


(4121H) ,HL 


;GIVE IT TO 


THE ROM 










E921 CD9D0A 


02540 


CALL 


NTF2 


; AS AN INT 


EGER. 










E924 CDBD0F 


02550 


CALL 


NUMSTR 


;ROM MAKES I 


T A STRING. 










E927 CDC0EB 


02560 


CALL 


OUTSTR 


; WHICH WE PR 


INT. 










E92A 3E44 


02570 


LD 


A, 'D' 


; FOLLOW WITH 


D FOR DEC. 










E92C 32BE3D 


02580 


LD 


(3DBEH) ,A 




E92F 21B83D 


02590 


LD 


HL,3DB8H 


;NOW SEE IF 


IT WAS A 










E932 7E 


02600 


LD 


A,(HL) 


; NEGATIVE 


NUMBER. 










E933 FE2D 


02610 


CP 


'- ' 




E935 2802 


02620 


JR 


Z,KBDSCN 




E937 362B 


02630 


LD 


(HL),' + ' 


;IF NOT, MAR 


K WITH +. 


02640 










02650 


; THE EDIT CURSOR POSITION AND ALL POI 


NTERS HAVE 
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WILL CHANGE THE WAY 
YOU THINK ABOUT YOUR TRS-80! 



THE MOST POWERFUL WORD PROCESSOR AND ALL PUR- 
POSE COMPUTER PROGRAM AVAILABLE FOR THE TRS-80. 

LOOK AT ALL THESE FEATURES 



1 . INSERT characters, words, lines, paragraphs or other files. 

2. DELETE characters, words, lines, paragraphs. 

3. COLUMNS. CopyArt II can be instructed to print your text from one to 
six columns. Super easy to use! No complicated commands. Great for 
doing newsletters, magazine layouts etc. NO MORE CUT AND PASTE! 

4. SORTING. Sort lines of text by any field. Sorts up to 650 items in less 
then 7 seconds. Sort indices, table of contents, names, words or whatever 
in descending or ascending order. Used with CopyArt's math function it is 
great for small Inventories, Receivables, Payables etc. 

5. Screen widths from 32-255 characters wide. Screen widths can be 
changed to allow formatting your text as you want. 

6. MATH. Built in MATH function for doing calculations on columns or 
rows. Used with the SORT command, CopyArt II can do a small inventory 
of 200-300 items, or keep track of small receivables or payables, general 
ledgers or home financial reports. Super floating point precision up to 32 
digits! 

7. 'GRAPHICS. CopyArt has a built in graphics program that allows in- 
serting graphics within your text. Drawings, graphs, illustrations, car- 
toons etc. may be used within newsletters or company reports. Graphics 
commands include: Plot between points, Circles, Squares, Fill, Erase, 
Draw, Move, Pixel cursor controls and more. 

8. 'GRAPHIC CHARACTERS. CopyArt has a built in graphics character 
generator. Used for typesetting large letters from 3 to 25 times normal 
size! Yes, you can even print characters down the page as well as across. 
Black on white or white on black. 

9. JUSTIFICATION is fully supported. 'Proportional spaced justify is sup- 
ported. 

10. 'SUPER or SUB-SCRIPT. 
11. UNDERLINING. 
12.B0LDFACTING. 

13. 'CHANGE CHARACTER SIZE or PITCH within your document. Charac- 
ter size changes for dot matrix printers with capability. Pitch change for 
daisy wheel printers with capability. 

14. HELP. Help is available for all the commands at the touch of a key 
while using the word processor. Super for training inexperienced sec- 
retaries. Great reminder for experienced people as well. MENU DRIVEN 
Help for over 45 commands. 



Continues on 
the next page . 




COD and Credit Cards 
CALL TOLL FREE to order 
1-800-528-1149 




SIMUTEK 

. 163 Computer Products Inc. 

SIMUTEK COMPUTER PRODUCTS INC., 4897 E. SPEEDWAY BLVD., TUCSON, AZ 8S712, (602) 323-9391 

DEALER. DISTRIBUTOR, & PRINTER/MANUFACTURER INQUIRIES INVITED 

TRS-80 and Scripsil are" TM of Radio Shack a Tandy corp. 

'Indicates printer must have capability to do (unction. 



sSee List of Advertisers on Page 435 
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02660 ; 


BEEN COMPLETELY UPDATED AT THIS POIN 


E9C2 3C 


03410 


INC 


A 


; MOVING CU 


T. ALL 










RSOR DOWN ONE 












02670 ; 


LOCATION INFORMATION HAS 


BEEN PRINTE 


E9C3 FE10 


03420 


CP 


16 


; IF AT EXT 


D. NOW 










REME RIGHT. 












026 80 ; 


BLINK 


THE CURSOR WHILE AWAITING KEYB 


E9C5 32FDE7 


03430 


LD 


(RGTCUR) ,A 




OARD INPUT. 










E9C8 2007 


03440 


JR 


NZ, JUPDAT 


;GO IF NOT A 


E939 06A0 


026 90 KBDSCN 


LD 


B,BDELAY ;BLINK ON CO 


T FAR RIGHT. 










UNTDOWN TO 0. 










E9CA AF 


03450 


XOR 


A 


;ELSE MOVE T 


E93B 3A8038 


02700 HALFCK 


LD 


A, (SHIFT) 


SEE IF SHIF 


FAR LEFT 










T PRESSED. 










E9CB 32FDE7 


03460 


LD 


(RGTCUR) ,A 


; AND SCROL 


E93E A7 


02710 


AND 


A 




L CURSOR DOWN 










E93F 281C 


02720 


JR 


Z, REGKI 


GO IF NO SH 


E9CE CD00EB 


03470 


CALL 


CURSDN 


; ONE ROW. 


IFT 












03480 ; 








E941 3AC038 


02730 


LD 


A,(SHCNTL) 


ELSE CHECK 


E9D1 C3A4E8 


03490 JUPDAT 


JP 


UPDATE 


; ARROW KEY P 


FOR RETURN TO 










ROCESSED. 










E944 FE21 


02740 


CP 


SHFLFT 


ADDRESS P 




03500 ; 








ROHPT OR 












03510 ; 








E946 CA15E8 


02750 


JP 


Z, ENTRY 2 


FOR SHIFT 




03520 ; 


ARRIVE 


HERE IF KEY 


PRESSED WAS NOT A 


ED UP/DOWN 










CONTROL 










E949 FE09 


02760 


CP 


SHFTUP 


ARROWS. 




03530 ; 


KEY. 


THAT SIGNIFIES AN ATTEMPT TO i, 


IF UP OR DOWN 










NTER DATA. 










E94B 2841 


02770 


JR 


Z,DOUP 


ARROW, SC 




03540 ; 


IF IN 


THE HEX MODE, 


CHECK THE DATA F 


ROLL WITHOUT 










OR 0-F. IF 










E94D FEU 


027 80 


CP 


SHFTDN 


DELAY. 




03550 ; 


IN THE 


ASCII MODE, 


JUST ENTER AND DI 


E94F 2848 


02790 


JR 


Z,DODN 




SPLAY IT. 










E951 FE05 


02800 


CP 


SHFBRK 


IF SHIFT/BR 


E9D4 010012 


03560 KEYIN 


LD 


BC,KDLAY2 




EAK, REPLACE 










E9D7 CD6000 


03570 


CALL 


DELAY 


; DELAY FOR D 


E953 2008 


02810 


JR 


NZ, REGKI 


CURRENT R 


EBOUNCE . 










EF. ADDRESS 










E9DA 3AFFE7 


03580 


LD 


A, (HATYPE) 


; CHECK TYPE 


E955 2AFBE7 


02820 


LD 


HL,(BYTED) 


WITH THE 


OF DUMP. 










BYTE POINTED 










E9DD A7 


03590 


AND 


A 




E958 2203E8 


02830 


LD 


(ATADD) ,HL 


TO BY THE 


E9DE 2052 


03600 


JR 


NZ, ASCIN 


;GO IF ASCII 


CURSOR. 




















E95B 1874 


02840 


JR 


JUPDAT 






03610 ; 










02850 ; 








E9E0 3A00E8 


03620 


LD 


A, (KEY) 


;IN HEX MODE 


E95D CD9BEA 


02860 REGKI 


CALL 


KIR 


SCAN REGULA 


. CHECK KEY. 










R KEYS WITH 


02870 






REPEAT. 


E9E3 CD4FEA 
RY SET IF KEY 


03630 


CALL 


VALHEX 


.•RETURNS CAR 


E960 200B 


02880 


JR 


NZ, KPRESS 


GO IF ANY K 


E9E6 DAA4E8 


03640 


JP 


C, UPDATE 


; IS INVALI 


EY DOWN. 










D HEX. 










E962 10D7 


02890 


DJNZ 


HALFCK 


BACK UNLESS 


E9E9 07 


03650 


RLCA 




;ELSE RETURN 


BLINK TIME. 










S VALID HEX 












02900 ; 








E9EA 07 


03660 


RLCA 




; IN A. 


E964 2AF9E7 


02910 


LD 


HL,(EDCUR) 




E9EB 07 


03670 


RLCA 




;PUT HEX 0-F 


E967 7E 


02920 


LD 


A,(HL) 


[ FLIP-FLOP 


IN HIGH 










CURSOR CHAR- 










E9EC 07 


03680 


RLCA 




; NYBBLE OF 


E968 EE0A 


02930 


XOR 


0AH 


ACTER AND 


A. 










GO BACK TO 










E9ED 3201E8 


03690 


LD 


(KEYH) ,A 


;SAVE IT. 


E96A 77 


02940 


LD 


(HL) ,A 


• BLINK IT. 




03700 ; 


















E9F0 2AF9E7 


03710 


LD 


HL,(EDCUR) 


; INCIDENTALL 


E96B 18CC 


02950 


JR 


KBDSCN 




Y REDRAW 












02960 ; 








E9F3 3E8A 


03720 


LD 


A,CURCHR 


; EDIT CURS 


E96D 3200E8 


02970 KPRESS 


LD 


(KEY) ,A 


;A KEY IS DO 


OR SINCE IT 










WN. SAVE IT. 










E9F5 77 


03730 


LD 


(HL) ,A 


; MAY BE OF 


E970 FE1F 


02980 


CP 


CLEAR 




F. 










E972 200B 


02990 


JR 


NZ,DBNC 


;GO IF NOT C 




03740 ; 








LEAR KEY. 










E9F6 3A00E8 


03750 


LD 


A, (KEY) 


; RETRIEVE KE 


E974 3AFFE7 


03000 


LD 


A, (HATYPE) 


;ELSE ON CLE 


Y AND DISPLAY 










AR ONLY, FLIP 










E9F9 CD93EA 


03760 


CALL 


CURINC 


; IT AT EDC 


E977 EE01 


03010 


XOR 


1 


; -FLOP TYP 


UR+1. 










E OF DUMP. 










E9FC CD3300 


03770 


CALL 


BYTDIS 




E979 32FFE7 


03020 


LD 


(HATYPE) ,A 






03780 ; 








E97C C374E8 


03030 


JP 


REINIT 


;AND REPAINT 


E9FF 3A4038 


037 90 WAITNX 


LD 


A,(CNTL) 


;NOW WAIT FO 


SCREEN . 










R NEXT VALID 












03040 ; 








EA02 FE04 


03800 


CP 


BREAK 


; HEX ENTRY 


E97F 010025 


03050 DBNC 


LD 


BC,KDLAY1 


; DELAY TO AV 


. BREAK BACK 










OID BOUNCE. 










EA04 CA7 4E8 


03810 


JP 


Z, REINIT 


; TO MAIN R 


E982 CD6000 


03060 


CALL 


DELAY 




OUTINE IF 












03070 ; 








EA07 CD9BEA 


03820 


CALL 


KIR 


; REQUIRED. 


E985 3A00E8 


03080 


LD 


A, (KEY) 


j RETRIEVE KE 












Y ENTERED. 


03090 ; 








EA0A CD4FEA 
VER CAME IN, 


03830 


CALL 


VALHEX 


; CHECK WHATE 




03100 ; 


NOW CHECK TO SEE IF THE 


KEY WAS AN A 


EA0D 3 8F0 


03840 


JR 


C, WAITNX 


; EVEN IF N 


RROW KEY. 










OTHING DID. 












03110 ; 


GO TO 


THE APPROPRIATE PROCESSING IF 




03850 ; 








IT WAS. 










EA0F 4F 


03860 


LD 


C,A 


j HAVE A VALI 


E988 FE5B 


03120 CKUP 


CP 


UPAROW 




D HEX CHAR1 










E98A 2802 


03130 


JR 


Z,DOUP 




EA10 3A01E8 


03870 


LD 


A, (KEYH) 


j MERGE IT WI 


E98C 1805 


03140 


JR 


CKDN 




TH LAST CHAR. 










E98E CDADEA 


03150 DOUP 


CALL 


CURSUP 


SCROLLING U 


EA13 Bl 


03880 


OR 


C 




P IS EASY - 










EA14 2AFBE7 


03890 


LD 


HL, (BYTED) 


; STORE NEW B 


E991 183E 


03160 


JR 


JUPDAT 


; CURSUP DO 


YTE AT BYTED 










ES IT ALL. 


03170 ; 








EA17 77 


03900 
03910 ; 


LD 


(HL) ,A 




E993 FE0A 


03180 CKDN 


CP 


DNAROW 




EA18 7E 


03920 


LD 


A, (HL) 


J RETRIEVE AN 


E995 2802 


03190 


JR 


Z,DODN 




D DISPLAY IT 










E997 1805 


03200 


JR 


CKLF 




EA19 CD93EA 


03930 


CALL 


CURINC 


; AT THE ED 


E999 CD00EB 


03210 DODN 


CALL 


CURSDN 


; SCROLLING D 


IT CURSOR. 










OWN IS EASY - 










EA1C 4F 


03940 


LD 


C,A 


; THIS VERI 


E99C 1833 


03220 


JR 


JUPDAT 


; CURSDN DO 


FIES THE EDIT 








ES IT ALL. 










EA1D CDA7EB 


03950 


CALL 


ASCII 


; ACTION. 




03230 ; 








EA20 EB 


03960 


EX 


DE.HL 




E99E FE08 


03240 CKLF 


CP 


LFAROW 




EA21 7C 


03970 


LD 


A,H 




E9A0 2802 


03250 


JR 


Z,DOLF 




EA22 CD3300 


03980 


CALL 


BYTDIS 




E9A2 1815 


03260 


JR 


CKRT 




EA25 7D 


03990 


LD 


A,L 




E9A4 3AFDE7 


03270 DOLF 


LD 


A,(RGTCUR) 


fLEFT ARROW 


EA26 CD3300 


04000 


CALL 


BYTDIS 




MAY REQUIRE 












04010 ; 








E9A7 3D 


03280 


DEC 


A 


; MOVING CU 


EA29 010037 


04020 


LD 


BC ,KDLAYl+KDLA't 2 ; DtBOUNCE 


RSOR UP ONE 










DELAY HERE 










E9A8 FEFF 


03290 


CP 


0FFH 


; IF AT EXT 


EA2C CD6000 


04030 


CALL 


DELAY 


; LIKE OTHE 


REME LEFT. 










R PATHS. 










E9AA 32FDE7 


03300 


LD 


(RGTCUR) ,A 




EA2F C3BFE9 


04040 


JP 


DORT 


;AND GO ACT 


E9AD 2022 


03310 


JR 


NZ, JUPDAT 


;GO IF NOT A 


JUST AS IF 










T FAR LEFT. 












04050 






; RIGHT ARR 


E9AF 3E0F 


03320 


LD 


A, 15 


>ELSE MOVE T 


OW PRESSED. 










FAR RIGHT 












04060 ; 








E9B1 32FDE7 


03330 


LD 


(RGTCUR) ,A 


,• AND SCROL 


EA32 3A00E8 


04070 ASCIN 


LD 


A, (KEY) 


;KEY IN SHOU 


L CURSOR UP 










LD BE VALID 










E9B4 CDADEA 


03340 


CALL 


CURSUP 


; ONE ROW. 


EA35 4F 


04080 


LD 


C,A 


; ASCII, BU 


E9B7 1818 


03350 


JR 


JUPDAT 




T CHECK IT 












03360 ; 








EA36 CD72EA 


04090 


CALL 


VALASC 


; TO BE SUR 


E9B9 FE09 


03370 CKRT 


CP 


RTAROW 




E... 










E9BB 2802 


03380 


JR 


Z,DORT 




EA39 3096 


04100 


JR 


NC, JUPDAT 


;GO IF BAD. 


E9BD 1815 


03390 


JR 


KEYIN 




EA3B 2AFBE7 


04110 


LD 


HL, (BYTED) 


;ELSE ENTER 


E9BP 3AFDE7 


03400 DORT 


LD 


A, (RGTCUR) 


; RIGHT ARROW 


INTO RAM AND 










MAY REQUIRE 










EA3E 77 


04120 


LD 


(HL) ,A 


; READ IT B 

Listing continues 
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A Pot Of Gold 
For YOUR Color Computer 

/ buy practically every computer magazine there is. but the RAINBOW is the 
only one t read cover-to-cover as soon as it comes in the mail -A subscriber 

The RAINBOW gels thai son ol response 'or more reasons than one bul Ihe phmaryone is simply it 
is /fie premier magazine tor TRS-80' Color Computer users And. because it devotes every page ot each 
monthly issue exclusively lo the Color Computer it is the single best source ot information for everything 
you want to know 

Tired ot trying to convert other compute' programs lo your Color Computer 9 No worries. Each program 
m the RAINBOW is written exclusively tor your computer — and many take advantage of all the excellent 
graphics commands unavailable on other machines' The nation s leading software authors have contribu- 
tions every month 

The RAINBOW'S Hints. Tips and Pipeline feature give you Ihe besl up-to-the-minute information 
available on the Color Computer If you are looking tor ways to do screen prints, alphabetize disk 
directories, save machine language programs or print Videotex input on your printer the RAINBOW has 
programs tor you 1 And it you want to know when some promised software will really be available tor 
purchase you II get that answered, too 

Our tutorials have been praised for the clear concise way they explain — in detail — various functions 
o* the Color Computer And the RAINBOW'S reviews are an excellent and honest buyer s guide to software 
and other purchases 

Whether your Color Computer is 4K i6Kor32K Whether you have Color Basic or Extended Whether 
you re into assembly language (or want to gel into il) or not Printers Disks. Rom packs The RAINBOW 
surveys the whole world of the Color Computer each month and provides what one reader called. A poi ot 
gold full of fabulous mtormation 

Because it is |Ournalistically-onented the RAINBOW gives fast turnaround to meet its monthly 
deadline So you can expect tresh news when it is news and the latest information available. 

M all this sounds like a lot for S16 per year it may be But we II make one more promise If. after you see 
your first issue you don t agree thai the RAINBOW is the premier monthly magazine for Color Computer 
II happily cheerfully and immediately refund your money 






LEARN VISICALC 

THE EASY WAY 

USING OUR 

TEMPLATES 

First load Visicalc, then load the Template 
diskette and key in the numbers. You will 
enjoy the power of Visicalc instantly! 



DO YOUR: 
ESTIMATING in CONSTRUCTION Job Cost $49.95 

The Building Site • Preliminary Costs • Site Clearing, Excavation, & Fill • Footings • 
Foundation • Floor System • Super Structure • Roofing • Electrical, Plumbing, Heating & Air 
Conditioning • Brickwork • Energy Saving Materials • Interior Wall & Ceiling Finish • 
Exterior Trim • Concrete Floors, Walks, & Terrace • Interior Trim • Painting, Floor Covering 
& Appliances • Gutters, Onsite Improvements & Misc. • Overhead Contingency & Profit. 

• • • 
ANALYSIS in FINANCE $49.95 

Break-Even Analysis --Cash Budget • Pro-Forma P 8 L • Pro-Forma Balance Sheet * Ratio 
Analysis • Depreciation Tables (5) • Net Present Values. 

• • • 
PROJECTIONS in REAL ESTATE $49.95 

NIREB Forms: CID B - Property Analysis • CID C - Comparative Investment Analysis • 
CID D - Individual Tax Analysis • CID G - Excess Depreciation • Net Proceeds • CID l-A 
- Internal Rate of Return. 

• • • 
BUDGETS for the HOME $29.95 

Personal Budget • Shopping List • Mortgage & Loan • Individual Retirement Account • IRS 
Schedule A. 

• • • 
Future Templates — Retailing • Energy Audit 
Marketing. Customize Templates $30. 

• • • 
Specify which one: Apple II • TRS-80 I, II, III • IBM PC 

• • • 



Engineering • Statistics 



ilti-Level 



Atari 400, 800 • Commodore 



INQUIRIES & ORDERS (714) 338-5075 

COD - Cashiers Check or Money Order Only. Prepaid - Personal Check O.K. 
UPS - Add $2.50 shipping or handling, street address required. Calif. - add 
6.5% sales tax. 

SOFTWARE MODELS 

"The Template People" 
P.O. Box 1029 • Crestline, CA 92325 ^ 170 



MORE REASONS YOU SHOULD CONSIDER 
MOVING UP TO OUR COMPREHENSIVE PROGRAM... 

15. SUPER EASY TO LEARN editing features. Logical key choices. 

16. Hyphenation 

17. SPELLING checkers like the 74,000 word Scripsit Dictionary work 
great with CopyArt II. 

18. CHAINING. Chain files together to make books or manuals hundreds 
of pages long. 

19. CENTERING. 

20. HEADERS and FOOTERS. You can even put graphics within headers 
for super page layouts. 

21. PAGE NUMBERING. Page numbers can appear at the top or bottom 
of the page. 

22. DOS COMMANDS from within the editor. Kill files, check free space 
or get directories easily. 

23. CUSTOMIZED PRINTER driver. Since your printer has features that 
other printers don't, CopyArt II will be supplied with the printer driver of 
your choice below. Each printer driver is custom made to provide you 
with commands for each of your printer's fine capabilities. If you have 
more than one printer, order other printer drivers for only $19.95 each. 
Printer drivers are available for: 



Smith Corona Daisy Wheel TP-1 
Brother Daisy Wheel 
C-ftoh Starwriters and 
Prowrilers all. 
PMC P- inter 
Centronics 737, 739 
Diablo 620 



•RadbShackl_PIV,V,VI, 
VII, VIII and Daisy Wheel II 

• Epson MX-80, MX-80/FT, MX-100 
with or without graftrax. 

• Okidata Microline 80, 82a, 
83a and 84 

•NEC 8023 

OTHERS COMING SOON. Call if you don't see your printer! 
24. Unprotected diskette. Unlimited backups can be made. 
25.MAILIST/MAILMERGE INCLUDED. CopyArt II comes with a mailist 
program that stores over 2,000 names on a MOD III diskette. These 
names can be sorted by any field and have a special field for your code. 
You can make PERSONALIZED FORM LETTERS that will take the follow- 
ing codes from the mailist and insert them in your text. FIELDS IN- 
CLUDE: Mr. or Ms., Last name, First name, Business name, City, State, 
up to 9 digit ZIP code and your own special 2 character code. ANY OF 
THESE fields can be inserted within your form letter wherever you want. 
You can print form letters or mailing labels to all the people on your list 
or to specific codes only. CopyArt makes it easy. 



^opvdrfl 



Continues on 
the next page . 




COD and Credit Cards 
CALL TOLL FREE to order: 
1-800-528-1149 






-163 



SIMUTEK 

Computer Products Inc. 



SIMUTEK COMPUTER PRODUCTS INC., 4897 E. SPEEDWAY BLVD., TUCSON, AZ 85712, (602) 323-9391 

DEALER, DISTRIBUTOR. & PRINTER/MANUFACTURER INQUIRIES INVITED 

TRS-80 and Scripsit are TM of Radio Shack a Tandy corp. 

'Indicates printer must have capability to do function. 



^See List ot Advertisers on Page 435 
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The Spelling Bee Is Over 



Listen. We're going to let you in on an 
industry secret: It's not hard to make a good 
spelling checker. 

You see, although spelling checking is new 
for microcomputers, it's been around on big 
computers for years. And when you get past all 
the talk, most spelling checkers work the same 
way. They compare what you've written with a 
dictionary— and report the errors. 

So is there any difference? You bet: the 
dictionary, and the price. 



Who Checks The Checker? 

The hardest part of a spelling checker to 
make is the dictionary. It's hard to pick the right 
words— and spell every one of them perfectly. 
That's why some popular spelling checkers don't 
even contain real dictionaries. They use formulas 
called "hash tables." Which make a hash 
out of your spelling some of 
the time. 

Other spelling 
checkers "borrow" 
their words from 
printed dictionaries 
—or copy them 
from old word 
lists. Or give 
a programmer 
who can't spell 
"programmer" 
a chance to write his 
first dictionary. And 
as though all this 
wasn't bad enough, 
a lot of these 




companies want to charge you $100, or $200 or 
even $300! 

Random House to the Rescue 

The Random House ProofReader is based 
on the famous Random House Dictionary. It is 
the result of decades of careful work. And it was 
adapted for computer spelling checking by 
professional editors, linguists and scholars. So you 
can depend on it. 

Of course, our program is darn good, too. 

It's fast. It doesn't take up too much disk space. It 

shows you the error and the sentence it's in. It 

lets you correct the mistake without reediting. 

And if you don't know how to spell a word, it 

suggests the spelling. It even corrects 

your correction. 

The Random House ProofReader 

comes in sizes to fit all systems: 

20,000 words ( 55K), 32,000 

words (74K), 50,000 words 

( 1 08K) and 83,000 words 

( 180K). You can add your 

own words with a single 

keystroke. And it 

works with all CP/M®, 

IBM Personal 

Computer®, and 

TRS-80® Model I/III 

word processors.* 

How much does 

the Random 

House 

ProofReader 

U cost? Only $50.00. 

J^ Why do we sell it 

for $50 when the 

others want 

up to $300? 

Don't ask us. Ask them. 



For orders or information, call 505-281-1634. VISA, Master Card accepted. Or write Random House ProofReader, Box 339 -M, 
Tijeras, New Mexico 87059. Please enclose $50 and specify your computer model, disk size and memory. Dealer inquiries invited. 

* Random I louse and the House design are registered trademarks of Random House Inc. CP/M is a registered trademark of Digital Research. Inc. TRS-80 is a trademark of Tandy Corporation. 
IBM and IBM Personal Computer are registered trademarks of International Business Machines Corp. Dictionary copyright © 1982 Random House, Inc. Program and advertisement 
copyright © 1 982 Aspen Software, Inc. The TRS-80 versions do not suggest correct spellings. 
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Listing continued 

ACK TO VERIFY 
EA3F 7E 
ACTION. 
EA40 4F 

FOR ASCII 
EA41 CD72EA 
E'RE IN ROM. 
EA44 3006 
EA46 CD93EA 
EA49 CD3300 
Y IT. 



34136 
34146 



04160 
04170 
04180 



LD A,(HL) 

LD C,A 

CALL VALASC 

JR NC,ENDASC 

CALL CURINC 

CALL BYTDIS 



EA4C C3BFE9 
RIGHT-ARROW. 



KS TO SEE IF 

IS NOT, 

F IT IS A 

HAT HEX 

T TO 0. 
EA4F 3200E8 
EA52 4F 
EA53 3E46 
EA55 B9 
EA56 380F 
AR > F. 
EA58 3E2F 
EA5A B9 
EA5B 300A 
AR > /. 
EA5D 3E40 
EA5F B9 
EA6 3 80 A 

AR > e. 

EA62 79 
EA63 FE3A 
EA65 3802 
AR < : 
EA67 37 
-HEX. 
EA6 8 C9 
EA69 D630 
HEX. 
EA6B C9 

BE SET FOR 
EA6C 3A00E8 

THESE. 
EA6F D637 
N VALID HEX. 
EA71 C9 ' 



ECKS TO SEE 



NTABLE, AN 

AG IS RESET. 
EA72 3E7F 
EA7 4 B9 
EA75 3805 
IF CHAR > 7F 
EA77 3E1F 
TOO LOW TO 
EA7 9 B9 

EA7A 7 9 
EA7B D8 
RINTABLE. 

EA7C 3E5F 

POT IN 
EA7E A7 
E AND 
EA7F C9 
RY. 



CI I CODES 
HEX BYTE 

WITH THE 
SCII CHAR 

CARRY FLAG 

EA80 7E 

HAR. 

EA81 CD4FEA 

R 0-F. 

EA84 D8 

OT 0-F. 

EA85 5F 

EEP ITS 

EA86 2B 

E. 



34190 ; 

34200 ENDASC JP DORT 

04210 ; 

04220 ; 

04230 ; END OF MAIN PENRAM ROUTINE. 

04240 «- --------- - - 



; THE EDIT 
[CHECK AGAIN 
IN CASE W 
;GO IF BAD. 
;ELSE DISPLA 

.•PRETEND WAS 



; SUBROUTINES 

; VALHEX TAKES AN ASCII CODE IN A AND CHEC 

; IT IS A VALID HEX CHARACTER (0-F). IF IT 

; VALHEX RETURNS WITH THE CARRY FLAG SET. I 

; HEX VALUE, THE A REGISTER RETURNS WITH T 

; VALUE (0-F) IN IT, AND THE CARRY FLAG RESE 



VALHEX LD 
LD 



04250 
04260 
04270 
04280 

04290 

04300 

04310 

04320 

04330 

04340 

04350 LD 

04360 CP 

04370 JR 

043 80 LD 

04390 CP 

04400 JR 

04410 LD 

04420 CP 

04430 JR 

04440 LD 

04450 CP 

04460 JR 

04470 NOTHEX SCF 



04480 
04490 

04500 

04510 

04520 

04530 
04540 
04550 
04560 

04570 

04580 

04590 

04600 

04610 
04620 
04630 

04640 

04650 

04660 
04670 

04680 
04690 

04700 

04710 

04720 
04730 
04740 

04750 

04760 

04770 

04780 

04790 
04800 

04810 

04820 

04830 

04840 



RET 
ZTHRU9 SUB 

RET 

ATHRUF LD 

SUB 

RET 



(KEY) ,A 

C,A 

A, 'F' 

C 

C, NOTHEX 

A, 1 / 1 
C 

NC, NOTHEX 

A,'@' 

C 

C, ATHRUF 

A,C 

CZTHRU9 



A, (KEY) 

37H 



jC SET IF CH 

;C SET IF CH 

;C SET IF CH 

C SET IF CH 
TO FLAG NOT 

CONVERT TO 
CARRY WON'T 
EITHER OF 
RETURNS 



; SUBROUTINE VALASC TAKES A BYTE IN C AND CH 

; IF IT A PRINTABLE ASCII CHARACTER - EITHER 

; LOWER CASE. IF ALPHANUMERIC IT IS SIMPLY 

; IN A, WITH THE CARRY FLAG SET. IF NON-PRI 

; UNDERSCORE IS SUBSTITUTED AND THE CARRY FL 



VALASC LD 
CP 

JR 

LD 

CP 

LD 

RET 

NOTASC LD 

AND 
RET 



A,7FH 

C 

C, NOTASC 

A,1FH 



A,C 
C 



A,5FH 



;HAVE CARRY 
,-SEE IF ITS 
; BE ASCII. 

.•RETURN IF P 

.-NOT ASCII. 
; UNDERSCOR 
; RESET CAR 



; FRMBYT LOOKS AT (HL), (HL+1) AND IF THE AS 

; THERE ARE BOTH FOR HEX CHAR 0-F, THEN THE 

; THEY DEFINE IS FORMED IN A AND RETURNED, 

; CARRY FLAG RESET TO . IF EITHER OF THE A 

; IS NOT 0-F, THEN A RETURN IS MADE WITH THE 



; SET. 
FRMBYT LD 



CALL 

RET 



A, (HL) 
VALHEX 



E,A 



;GET FIRST C 
(CHECK IT FO 
RETURN IF N 
WAS 0:F. K 
VALUE IN 

Listing continues 
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WILL CHANGE THE WAY 

YOU THINK ABOUT 

YOUR TRS-80! 



26. SIMPLE CURSOR commands. Simply use the arrow keys to move 
your cursor around the text. The screen will scroll both vertically and 
horizontally. Shirt arrows take you to the beginning or end instantly. 

27. SCREEN DUMP. Prints whatever is on the screen to the printer. 

28. COMPLETE MARGINS CONTROL. You tell CopyArt II what margins 
you desire. You can even change margins within the same text. You may 
also have parts of your text with 2 columns, some with one etc. It's 
super easy to use. 

29. BASIC PROGRAMS can be edited easily. CopyArt is really useful for 
inserting graphics within quoted strings to give your programs super 
animation without the hastle of calculating the CHRS of the graphics! 

30. VISICALC files can be loaded into CopyArt II to be manipulated 
easily. Great when you want to accompany your Visicalc reports with 
written reports, GRAPHS and BOLDFACING etc. Visicalc reports up to 
255 wide can be loaded. 

31 . SPECIAL SCRIPSIT FILE LOADER. Allows you to load your old Scrip- 
sit files without having to save them in ASCII. Copyart will also load 
Pencil files and other normal ASCII files. 

32. 'CUSTOM KEYS. Let's you make special keys for special characters. 
Allows for printing Spanish accents etc. 

33. CONTROL CODES. Lets you insert special printer control codes in 
your text. CODES between and 255. 

34. BLOCK MOVE. Simple and powerful block move. Lets you move 
paragraphs or lines of text around easily. No complicated marker set- 
tings required. 

35. FIND/REPLACE/REPEAT. Lets you find a string of characters and 
replace them with any other string of characters up to 20,000 times! 
WILDCARD search also supported. 

36. Professional Manual in easy to understand English. 

Copyart II requires a TRS-80 Model I or III, (or PMC-80 or LNW), 48k 
and 2 disk drives with Newdos-80, Ldos, Multidos, Dosplus or TRSDOS. 
Double density disk drives recommended for the Model I. 

^QU \J^ TT^ L THIS PR0 GRAM DOES IT All! 

PLEASE SPECIFY which COMPUTER and PRINTER 
you have when ordering. 

Copyart II with one printer driver 149.99 

Additional printer drivers 19.95 each 

Scripsit Dictionary 139.95 



■■Bf * " 




COD and Credit Cards 
CALL TOLL FREE to order: 
1-800-528-1149 

Or send check or money 
order to: 

SIMUTEK 

*>** Computer Products Inc. 

SIMUTEK COMPUTER PRODUCTS INC., 4897 E. SPEEDWAY BLVD., TUCSON. AZ 85712, (602) 323-9391 

DEALER, DISTRIBUTOR, 4 PRINTER/MANUFACTURER INQUIRIES INVITED 

TRS-80 and Scripsit are TM of Radio Shack a Tandy corp. 

'Indicates printer must have capability to do function. 



^See List of Advertisers on Page 435 
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take it 



EggtflST^ST 



STES 



.UJA 




The totally PORTABLE, 
totally COMPATIBLE, 

Model III in a 
Briefcase 

ADCOCK & JOHNSON 



P O. DRAWER 8778 PORT WORTH. TEXAS 76112 

ORDERS AND INFORMATION 
^536 (817) 429-5131 



Listing continued 










EA87 7E 


04850 




LD 


A, (HL) 


GET SECOND 


CHAR. 












EA88 CD4FEA 


04860 




CALL 


VALHEX 


IS IT ALSO 


HEX? 












EA8B D8 


04870 




RET 


C 


RETURN IF N 


OT. 












EA8C 07 


04880 




RLCA 




BOTH ARE 0- 


F. FORM 












EA8D 07 


04890 




RLCA 




THE HEX B 


YTE IN A. 












EA8E 07 


04900 




RLCA 






EA8F 07 


04910 




RLCA 






EA90 B3 


04920 




OR 


E 




EA91 2B 


04930 




DEC 


HL 


PREPARE FOR 


NEXT CALL. 












EA92 C9 


04940 




RET 




RETURN W/HE 


X IN A. 


04950 
04960 












04970 


• CURINC POSITIONS THE STANDARD CURSOR AT TH 


E LOCATION 














04980 


• OF THE EDIT 


CURSOR PLUS ONE. 




EA93 2AF9E7 


04990 


CURINC 


LD 


HL,(EDCUR) 




EA96 23 


05000 




INC 


HL 




EA97 222040 


05010 




LD 


(CURPOS) ,HL 




EA9A C9 


05020 
05030 
05040 


; 


RET 








05050 


; KIR SCANS THE KEYBOARD AND RETURNS IN A TH 


E ASCII VALUE 












IT 


05060 


t OF ANY KEY 


THAT IS PRESSED AT 


rHAT INSTANT 




05070 


ALSO 


CLEARS 


THE KEYBOARD INPUT 


ROUTINE BUF 


FER AT 














05080 


• 4036- 


403C. 


THIS MAKES THE KI ROUTINE THIN 


K THAT 














05090 


• THE LAST KEY PRESSED WAS SUBSEQUENTLY RELE 


ASED, SO THAT 














05100 


; IT WILL SCAN AGAIN, THUS GIVING THE EFFECT 


OF REPEATING 


05110 


; KEYS 








EA9B CD2B00 


05120 


KIR 


CALL 


KI 


GET KEY IF 


PRESSED. 












EA9E 57 


05130 




LD 


D,A 




EA9F 1E07 


05140 




LD 


E,7 


WILL PUT 7 


ZEROS IN 












EAA1 213640 


05150 




LD 


HL,KIBUF 


1 BUFFER. 


EAA4 AF 


05160 




XOR 


A 




EAA5 77 


05170 


RPT 


LD 


(HL) ,A 


•CLEAR ONE B 


YTE. 












EAA6 23 


05180 




INC 


HL 




EAA7 ID 


05190 




DEC 


E 




EAA8 20FB 


05200 




JR 


NZ,RPT 




EAAA 7A 


05210 




LD 


A,D 


.•RETRIEVE CH 


AR. 












EAAB A7 


05220 




AND 


A 


;SET FLAG IF 


ZERO. 












EAAC C9 


05230 
05240 
05250 


; 


RET 








05260 


; CURSUP HANDLES ALL MOVEMENT OF 


THE CURSOR 


UPWARDS. 














05270 


; IT CHECKS FIRST TO -SEE IF THE 


TOP OF THE S 


CREEN HAS 














05280 


; BEEN 


REACHED (DWNCUR=0) . IF NOT, IT SIMPL 


Y DECREMENTS 














05290 


; DWNCUR AND 


RETURNS TO THE UPDATE. IF AT T 


HE TOP OF 














05300 


; SCREEN, THE TOP 15 LINES MUST 


BE MOVED DOW 


N ONE, AND 














05310 


; THE 


NEW DUMP LINE (AS FORMED BY MAKSTR) PR 


INTED ON THE 














05320 


; TOP 


LINE. 


SINCE MAKSTR NEEDS 


AN ADDRESS A 


DDR TO FORM 














05330 


; THE 


DUMP STRING, CURSUP MUST ALSO DETERMIN 


E WHETHER THE 














05340 


; LAST 


SCREEN SCROLLING WAS DUE 


TO THE CURSO 


R MOVING UP 














05350 


; (IN 


WHICH CASE THIS IS MERELY 


A CONTINUATI 


ON AND ADDR 














05360 


; IS ALREADY 


CORRECT) OR DOWN (IN WHICH CASE 


THE VALUE OF 














05370 


; ADDR 


WAS LEFT BY CURSDN AT 27? 


BYTES MORE 


THAN WHAT IS 














05380 


; WANTED HERE) . 






05390 


; BEFORE RETURNING, CURSUP SUBTRACTS 16 FROM 


BOTH ADDR 














05400 


; (ANTICIPATING ANOTHER CURSOR-UP SCROLL) AN 


D FROM 














05410 


; HOMADD, BECAUSE 'THE ADDRESS DISPLAYED AT T 


HE TOP LEFT 














5420 


; HAS 


ALSO DECREASED BY 16 BYTES 






05430 


; NOTE 


THAT ONLY THE FIRST 55 CHAR. OF EACH 


LINE ARE 














05440 


f SCROLLED; 


THE LAST 9 CHAR. ARE UNTOUCHED. 


EAAD 3AFEE7 


05450 


CURSUP 


LD 


A, (DWNCUR) 




EAB0 A7 


05460 




AND 


A 




EAB1 280 5 


05470 




JR 


Z,CONTUl 


;GO IF TOP 


F SCREEN. 












EAB3 3D 


05480 




DEC 


A 


(ELSE MOVE E 


DIT CURSOR UP 










EAB4 32FEE7 


05490 




LD 


(DWNCUR) ,A 


;AND RETURN 


TO UPDATE. 












EAB7 C9 


05500 
05510 




RET 






EAB8 3A02E8 


05520 


CONTU1 


LD 


A,(LSTARW) 


;SEE IF LAST 


SCROLL WAS 












EABB A7 


05530 




AND 


A 


;DUE TO CURS 


OR DOWN. 












EABC 2806 


05540 




JR 


Z.CONTUP 


;GO IF NOT. 


EABE 011001 


05550 




LD 


BC,272 


;MUST FIX AD 


DR. 












EAC1 CDDAEB 


05560 




CALL 


SADDR 


.•SUBTRACT 27 


2 FROM IT. 




















Listing continues 
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Listing continued 














05570 












EAC4 2AF9E7 


05580 


CONTUP 


LD 


HL,(EDCUR) 




;ADDR IS COR 


RECT HERE. 














EAC7 36 80 


05590 




LD 


(HL) /BLANK 




; REMOVE OLD 


CURSOR. 














EAC9 2AF5E7 


05600 




LD 


HL,(ADDR) 




;GET ADDR TO 


DUMP. 














EACC CD55EB 


05610 




CALL 


MAKSTR 




;MAKE DUMP S 


TRING OF IT. 


05620 












EACF 3E0F 


05630 




LD 


A, 15 




; SCROLL TOP 


15 LINES 














EAD1 21803F 


05640 




LD 


HL,3F80H 




( DOWN, MOV 


ING ONLY THE 














EAD4 11C03F 


05650 




LD 


DE,3FC0H 




; LEFT 55 C 


HARACTERS . 














EAD7 013700 


05660 


MVLOPS 


LD 


BC,37H 






EADA EDB0 


05670 




LDIR 








EADC 0189FF 


056 80 




LD 


BC,-119 






EADF 09 


05690 




ADD 


HL,BC 




; POINT TO NE 


XT LINE. 














EAE0 EB 


05700 




EX 


DE,HL 






EAE1 09 


05710 




ADD 


HL,BC 




;AND WHERE I 


T WILL GO. 














EAE2 EB 


05720 




EX 


DE,HL 






EAE3 3D 


05730 




DEC 


A 






EAE4 20F1 


05740 




JR 


NZ, MVLOPS 




(BACK IF 15 


NOT DONE. 


05750 












EAE6 21003C 


05760 




LD 


HL,LINE01 




; POINT TO FI 


RST LINE. 














EAE9 222040 


05770 




LD 


(CURPOS) ,HL 






EAEC 21B5E7 


05780 




LD 


HL,STRPLC 






EAEF CDC0EB 


05790 




CALL 


OUTSTR 




; PRINT DUMP 


STRING THERE. 


05800 












EAF2 011000 


05810 




LD 


BC,16 




(ADD 16 TO A 


DDR, HOMADD. 














EAF5 CDDAEB 


05820 




CALL 


SADDR 






EAF8 CDE4EB 


05830 




CALL 


SHOMAD 






EAFB AF 


05840 




XOR 


A 




(NOTE SCROLL 


CAUSED BY 














EAFC 3202E8 


05850 




LD 


(LSTARW) ,A 




( UP-ARROW. 


EAFF C9 


05860 
05870 
05880 


1 


RET 










05890 


; CURSDN IS THE 


MIRROR IMAGE 


OF 


CURSUP IN TH 


AT ALL 
















05900 


( THE SAME ACTIONS ARE INVOLVED 


BUT THE CUR 


SOR IS 
















05910 


; MOVED 


DOWNWARD. IF IT IS 


\LREADY AT THE B 


OTTOK OF 
















05920 


; THE SCREEN, THE BOTTOM 15 


LINES ARE SCROLL 


ED UP AND 
















05930 


; THE NEW LINE 


FORMED BY MAKSTR 


IS PRINTED 


N THE 
















05940 


; BOTTOM . ADDR 


IS CORRECTED 


IF 


THE LAST SCR 


OLL WAS DUE 
















05950 


; TO AN 


UP- ARROW, AND IS LEFT ANTICIPATING A 


NOTHER DOWN- 
















05960 


; ARROW 


COMMAND 


. THAT IS, IT POINTS 16 BYTE 


S BEYOND THE 
















05970 


; ADDRESS DISPLAYED AT THE BOTTOM LINE. HOM 


ADD IS 
















05980 


( UPDATED TO REFLECT THE NEW 


ADDRESS DISPLAY 


ED IN THE 
















05990 


; TOP LEFT CORNER. 






EB00 3AFEE7 


06000 


CURSDN 


LD 


A, (DWNCUR) 






EB03 FE0F 


06010 




CP 


15 






EB05 2805 


06020 




JR 


Z,CONTDl 




(GO IF BOTTO 


M OF SCREEN. 














EB07 3C 


06030 




INC 


A 




(ELSE MOVE E 


DCURSOR DOWN. 














EB08 32FEE7 


06040 




LD 


(DWNCUR) ,A 




(AND RETURN 


TO UPDATE. 














EB0B C9 


06050 
06060 




RET 








EB0C 3A0 2E8 


06070 


CONTD1 


LD 


A, (LSTARW) 




(SEE IF LAST 


SCROLL WAS 














EB0F A7 


06080 




AND 


A 




(DUE TO CURS 


OR UP. 














EB10 2006 


06090 




JR 


NZ,CONTD2 




;GO IF NOT. 


EB12 011001 
DR. 


06100 




LD 


BC,272 




(MUST FIX AD 


EB15 CDCAEB 
IT. 


06110 




CALL 


AADDR 




(ADD 27 2 TO 


06120 












EB18 2AF9E7 


06130 


CONTD2 


LD 


HL,(EDCUR) 




(ADDR IS COR 


RECT HERE. 














EB1B 3680 


06140 




LD 


(HL) , BLANK 




(REMOVE OLD 


CURSOR. 














EB1D 2AF5E7 


06150 




LD 


HL,(ADDR) 




(GET ADDR TO 


DUMP. 














EB20 CD55EB 


06160 




CALL 


MAKSTR 




(MAKE DUMP S 


TRING OF IT. 


06170 












EB23 3E0F 


06180 




LD 


A f 15 




(SCROLL BOTT 


OH 15 LINES 














EB25 21403C 


06190 




LD 


HL,3C40H 




( UP, MOVIN 


G ONLY THE 














EB28 11003C 


06200 




LD 


DE,3C00H 




( LEFT 55 C 


HARACTERS. 














EB2B 013700 


06210 


MVLOPA 


LD 


BC,37H 






EB2E EDB0 


06220 




LDIR 








EB30 010900 


06230 




LD 


BC,9 






EB33 09 


06240 




ADD 


HL.BC 




(POINT TO NE 


XT LINE. 














EB34 EB 


06250 




EX 


DE,HL 






EB35 09 


06260 




ADD 


HL,BC 




(AND WHERE I 


T WILL GO. 














EB36 EB 


06270 




EX 


DE,HL 






EB37 3D 


06280 




DEC 


A 






EB38 20F1 


06290 




JR 


NZ, MVLOPA 




(BACK IF 15 
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Happy Birthday 
Sale!!! 



This is just our way of saying HAPPY BIRTH- 
DA Y to our boss, from the gang in the office. 
Dear Boss, 

Due to your IN ATE GREED, POOR 

MANAGEMENT AND A TOWERING EGO! 
WE ARE OVERSTOCKED!! We need to get rid 
of a tower of stock so here it goes. 
Model III 48K 2-40 track MPI disk 
drives & Multidos operating system 

for only $1795.00 

Winchester hard drives for Model III 

6.4 Meg $1995.00 

Winchester hard drive for Model III 

14.5 Meg $2495.00 

Mx-80 FT $ 575.00 

Mx-80 $ 475.00 

Practical peripherals 16K print buffer 

for your Mx-80 or 80 FT $ 145.00 

Multidos operating system 

(Newest version) $ 99.00 

Newdos/80 Version 2.0 $ 129.95 

DosPlus 3.4 single or double density $ 119.95 

Custom made printer covers (satin) $ 19.95 

**SUPER UTILITY PLUS** $ 39.95 

Cave hunter (color computer) $ 24.95 

Phantom slayer (color computer) $ 19.95 

Postman standard disk version $ 125.00 

Postman with postwriter $ 175.00 

Lynx Modems Model I or III $ 225.00 

Hayes smartmodem 300 baud $ 249.00 

Joysticks for your Model I 

or III $ 39.95 

Color Computer 16K $325.00 



Baudy House Computer Products 

950 Scott Lake Road 

Pontiac. Michigan 48054 

(313) 683-8388 order and info line 

1313) 082-9550 info line 

(3131 683-5076 *New Bullet-80 data line 24 hours!* 

Visa and Master card accepted 

Checks, Money orders, and C.O.D. welcome. 

On software allow $3.00 shipping and handling 

On hardware shipping will be subject to item ordered . 1{ 



sSee List ot Advertisers on Page 435 



80 Micro, January 1983 • 287 



FILEMATE 

A RANDOM ACCESS DATA FILE MANAGER 

For Model I & III, 48K, Disk Drive, 
TRSDOS 1.3 or NEWDOS/80 Version 2.0 



FILEMATE is auto-adaptive so this one universal 
program can serve most any of your filing needs — 
Mailing List, Inventory, Bibliography, Business 
Records, etc. You will not have to change any data 
to meet the constraints of a pre-packaged program. 
Yet, there is no software to write. In fact, FILEMATE 
will convert your existing seguential file to its 
random format. 

Consider these features: 

• CONVERT— Any old seguential file to FILEMATE 

random. All you do is name your field 
variables. 

• CREATE— Random files with up to 20 fields in 

any record. Field length optional, up to 255 
bytes for total record. 

• HASHING — Instant recall of any record. 

• SORT — Screen on any combination of 9 relational 

keys then sort on one or two fields. Save in 
multiple index files for later recall at 11 
records/second . 

• CALCULATE — Double precision calculations 

+ , — , * , /, sin, cos, tan, sqroot functions 
Up to 40 steps, 4 stacks available 
Store algorithm for repeated usage 

• PRINTOUT — Generate custom Dataforms or Labels 

Reverse name option 
Upper and lowercase compatibility. ' 
Multiple columns — optional spacing of rows. 
Auto-alignment of decimal point in tabulations. 
Save multiple formats for repeat use. 

• SEARCH — Global search for any data in any field 

• EDIT — Add, Change, or Delete records at will 

• CAPACITY— Up to 2000 records on a 40 track, 

double density diskette. 

BEST OF ALL— You can always revise the file 
structure. 

{After you have a working file and want to rename a field, or 
add another field for more data, or change the size of any field 
in the record, or delete a field, or expand the capacity of the file; 
DO IT! And don't lose any of the records you want that are already 
in the file. No need to re-enter any data!) 

DATAFILE SYSTEMS 

801 Welch Road 
Palo Alto, CA 94304 

(415) 326-1447 ^531 



VISA/MasterCard 

CA Residents add 6'/2% 



$95.00 on Diskette 
Manual & Shipping Inch 
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NOT DONE. 


06300 










EB3A 21C03F 


06310 




LD 


HL,LINE16 


; POINT TO LA 


ST LINE. 












EB3D 222040 


06320 




LD 


(CURPOS) ,HL 




EB40 21B5E7 


06330 




LD 


HL , STRPLC 




EB43 CDC0EB 


06340 




CALL 


OUTSTR 


; PRINT DUMP 


STRING THERE. 












EB46 011000 


06350 




LD 


BC,16 


;SUB 16 FROM 


ADDR, HOMADD 












EB49 CDCAEB 


06360 




CALL 


AADDR 




EB4C CDD2EB 


06370 




CALL 


AHOMAD 




EB4F 3E01 


06380 




LD 


A,l 


;NOTE SCROLL 


CAUSED BY 












EB51 3202E8 

W. 

EB54 C9 


06390 




LD 


(LSTARW) ,A 


( DOWN-ARRO 


06400 




RET 








06410 












06420 


j 










06430 


( SUBROUTINE MAKSTR EXPECTS 


TO RECEIVE AN AD 


DRESS IN HL. 














06440 


( IT FORMS THIS 


ADDRESS AND 


THE 16 BYTES OF 


DATA STARTING 














06450 


; THERE INTO AN 


ASCII STRING AT STRPLC . I 


F THE TYPE OF 














06460 


; DUMP 


REQUIRED 


IS HEX, THEN EACH CHARACTER 


BLOCK (THERE 














06470 


; ARE 16 CE THESE AFTER THE 


ADDRESS STRING) 


WILL CONTAIN 














06480 


; THE ASCII REPRESENTATION OF THE BYTE IN ME 


MORY. IF THE 














06490 


; TYPE 


OF DUMP 


IS ASCII, THEN EACH BLOCK WIL 


L SIMPLY 














06500 


; CONTAIN THE ASCII CODE OF 


THE BYTE IN MEMO 


RY. SPACES 














06510 


; ARE ADDED SO 


THAT EITHER WAY EACH CHARACTF. 


R BLOCK TAKES 














06520 


; UP THREE POSITIONS. A TOTAL OF 64 BYTES I 


S REQUIRED TO 














06530 


; HOLD 


THIS STRING AND ITS 


03' TERMINATOR. 


EB55 E5 

S. 

EB56 E5 


06540 


MAKSTR 


PUSH 


HL 


;SAVE ADDRES 


06550 




PUSH 


HL 




EB57 DDE1 
X. 

EB59 CI 


06560 




POP 


IX 


;PUT IT IN I 


06570 




POP 


BC 


;GET MSBYTE 


OF ADDRESS. 












EB5A 21B8E7 


06580 




LD 


HL,STRPLC+3 


;LAST DIGIT 


OF ADDRESS. 












EB5D CD98EB 


06590 




CALL 


BSTRNG 


;BC INTO ASC 


II AT HL- . 


06600 










EB60 21B9E7 


06610 




LD 


HL,STRPLC+4 


; POINT AFTER 


ADDRESS . 












EB63 363A 


06620 




LD 


(HL) , ':' 


;PUT : AFTER 


ADDRESS. 












EB65 23 


06630 




INC 


HL 




EB66 3620 


06640 




LD 


(HL),' ' 


;PUT SPACE A 


FTER ADDRESS. 


06650 










EB6 8 23 


06660 




INC 


HL 


; POINTS TO 1 


ST CHAR. BLK. 












EB69 0610 


06670 




LD 


B,16 


;WILL DO 16 


CHAR. BLOCKS. 












EB6B 3620 


06680 


CHRBLK 


LD 


(HL),' ' 


;EACH START 


WITH BLANK. 












EB6D 23 


06690 




INC 


HL 




EB6E DD4E00 


06700 




LD 


C, (IX+0) 


(GET BYTE AT 


ADDRESS. 












EB71 3AFFE7 


06710 




LD 


A,(HATYPE) 


; CHECK DUMP 


TYPE. 












EB74 A7 


06720 




AND 


A 




EB75 2008 


06730 




JR 


NZ,ACHAR 


;GO IF ASCII 


DUMP. 












EB77 CDA7EB 


06740 




CALL 


ASCII 


I HEX DUMP RE 


Q'D. 












EB7A 72 


06750 




LD 


(HL) ,D 


; FIRST DIGIT 


OF BYTE. 












EB7B 23 


06760 




INC 


HL 




EB7C 73 


06770 




LD 


(HL) ,E 


;SECOND DIGI 


T OF BYTE. 












EB7D 1807 


06780 




JR 


CHRDN 


;ONE BLOCK D 


ONE. 


06790 










EB7F CD72EA 


06800 


AC HAR 


CALL 


VALASC 


(ASCII DUMP. 


CHECK CHAR. 












EB82 77 


06 810 




LD 


(HL) ,A 


(PUT FINAL C 


HAR IN STRING 












EB83 23 


06820 




INC 


HL 




EB84 3620 


06830 




LD 


(HL),' ' 


(FOLLOW WITH 


BLANK. 


06840 










EB86 DD23 


06850 


CHRDN 


INC 


IX 


(DONE WITH C 


HAR. BLOCK. 












EB88 23 


06860 




INC 


HL 


(POINT TO ST 


ART NEXT BLK. 












EB89 10E0 


06870 
06880 




DJNZ 


CHRBLK 


(DO NEXT ONE 


EB8B 36AA 


06890 




LD 


(HL) ,0AAH 


(ONE CHAR. F 


OR BORDER. 












EB8D 23 


06900 




INC 


HL 




EB8E 0608 


06910 




LD 


B,8 


(EIGHT CURSO 


R-ADVANCES AT 












EB90 3619 


06920 


TRALER 


LD 


(HL) ,19H 


( END RESUL 


T IN STRING 












EB92 23 


06930 




INC 


HL 


( PRINTING 


TO END OF 












EB93 10FB 


06940 




DJNZ 


TRALER 


( LINE MINU 


S ONE. 


06950 










EB95 3603 


06960 




LD 


(HL) ,03H 


(TERMINATOR 


OF STRING. 












EB97 C9 


06970 




RET 




(END OF MAKS 


TR. 
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TRS'80* Customers complaining of tape loading blues? 

DEALERS HELP THEM!! 

With two new products for home enthusiasts and the 
small volume software producers. The — 



69.95 



DATA CONDITIONER <,„„.,«* r.t.ii $ 

and 

COPY CONDITIONER (,»«,. tt .d r.t.ii $149.95) 

COMPLETE COMPUTER/CASSETTE INTERFACES WHICH 
PRODUCE SUPERIOR RECORDINGS AND ELIMINATE 
CLOAD ABORTS. 

WRITE or CALL FOR DEALER 
INFORMATION & PRICES 




WE ALSO DO CUSTOM PRODUCT DESIGN « MANUFACTURING 

<£>£& % COLE'S CONSULTANTS, INC. 

' COMMUNICATIONS SYSTEMS LABORATORIES 
ELECTRONICS 94-165 LEOKANE STREET PHONE 

R * D WAIPAHU, HAWAII 96797 808-677-3380 

DESIGN 
MANUFACTURING 
CONSULTATION 

* TRS-80 is a trademark of Tandy-Radio Shack ^361 



FOR RETAIL ORDERS CALL 24 HR. TOLL FREE 
1-800-367-5134 




"Your Business Computer Headquarters" 



Compare the 
Victor 9000 Desktop 
Business Computer 




Trie Victor 9000 OesKtop Business 
Computer gives you the Kind of 
memory, storage capacity and soft- 
ware that business applications de- 
mand. Just compare the Victor 
9OO0 with the competition, and 
were confident you'll plcK victor 

VICTOR 

Sw\»n Awrtow tiMfcf lorttvwt- 
VICTOB BUSHES. PRODUCTS 

Call For Quotes!! 
Compare and youH pick Victor. 



TRS-80 



Business 
Computers 




^128K Model 16 



1 



•• 1 Drive 
84134 

•• 2 Drive 
84795 




64K 

Model II 

82974 



Model HI 
48K, 2 Drive 

81950 
48K. 1 Drive 

81571 
16K 

8839 



Call For QUOTES On 
Complete Product Line 

im 800-351-1580 

In Texas Call Collect: 915-283-2920 

Van Horn Office Supply 

701 W. Broadway "1«» P.O. Box 1060 

Van Horn, Texas 79855 



A powerful 
data base manager. 

Data-Writer can be used 

with your word processor or by 

itself as a complete stand-alone 

system for managing textual and 

numeric data. 

Use for order tracking, client billing, 
expense recordkeeping, operational 
reporting with totals and subtotals, form 
letter production to a large list or a subset, 
mailing list maintenance and other business 
and personal applications. Data-Writer's ease 
of use appeals to secretaries. 

• Data Entry program to create your data base or add 
records to an existing data base. It has error checking fea- 
tures and supports both fixed and variable length fields. 

• Machine-language File Editor lets you edit your data 
base without an independent word processor. Or, if 
you prefer, use your own word processor (Electric Pencil. 
Lazy Writer, Newscript or Scripsit) to create and edit 
your data base. 

• Field Manager that lets you add, delete, re-order or ap- 
pend fields and merge or split data bases. 

• Interactive, double-precision Math program that 
processes up to 20 equations of up to 255 characters 
using numbers you enter and your data base field labels. 
It includes an in-memory scratch pad to store temporary 
values. 

• Two-level Sort that enables you to sort on any field, with- 
out having previously designated it as a key. 

• Mailing Label program that allows you to print multiple 
labels from one to four across and to insert a fixed mes- 
sage on every label. 

• Machine-language Form Letter processor that allows 
you to insert data from your data base into a form letter 
or contract. Store the text for use later. 

• Report Generator for columnar tabulations with auto- 
matic headings, pagination, totals and subtotals, and 
sophisticated formatting control. 

• Powerful Select-lf command that lets you define a subset 
of your data base. With Select-lf and Sort, you can create 
dozens of new data bases for specific purposes. 

• Statistical check on your data base to locate data 
entry errors. Stats also reports maximum entered data 
length for each defined field, a tremendous aid when 
designing a report. 

• Data-Writer is both powerful and easy to use. 'Why 
hasn't someone done this before!" 

For the TRS-80 Model l/lll (48K, 2 disk drives, lowercase re- 
quired). Available from Software Options, 19 Rector Street. 
New York, N.Y. 10006. 212-785-8285. Toll-free order line: 
800-221-1624. Price: $145. (plus S3 per order shipping and 
handling). New York State residents add sales tax. Visa/ 
Mastercard accepted. 




•537 OPTIONS INC 



• See List ol Advertisers on Page 435 
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AT LAST! 

A PROFESSIONAL JOURNAL FOR ENGINEERS 

SCIENTISTS MATHEMATICIANS & SrATISTICIANS USING 

MICROCOMPUTERS. 

PLUG INTO- 

ACCESS! 
The Journal of Microcomputer Applications 
for 

* numerical analysis * computerized design 

* math modeling * process simu'ation 

* statistical analysis * report generation 

The articles in ACCESS are written hy working 
engineers and scientists who share their knowledge of 
how to make productive use of microcomputers with 
you. Your subscription to ACCESS will make your 
microcomputer more useful in all areas where 
engineers and scientists use microcomputers. And you'll 
even find ways to use your computer you hadn't 
thought of. The articles in ACCESS are written with 
you in mind and are aimed at helping you turn your 
microcomputer into the most productive too! possible. 
Sign up NOW be a charter subscriber. Join the other 
engineers and scientists who make ACCESS their 
source of information on microcomputer applications. 
Charter rates are 6 issues for $16. (Canada & Mexico 
$20. Other $32). Fill out the coupon below TODAY. 
Send check, money order, purchase order, or use your 
VISA or MASTER CARD. 

gSign me up. $16 enclosed Bill me Bill ^iss 
ompany Charge VISA MC # 

Exp ____ Send sample issue here's $3 

Name & addres s ~ 

City State and nr 

Mail to ACCESS PO Box 12847 Research Triangle Park, 
NC 27709 Published by LEDS Publishing Co., Inc. 



A******************** 
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OMNITEK COMPUTERS INTERNATIONAL, INC. 

1 300 MAIN STREET TEWKSBURY, MASS 

617-851-4580 

Smith-Corona Daisy Wheel Printer 589.00 

Verbatim 5.25" D.L 25.00 

1 6K RAM KITS 1 3.00 

Okidata Microllne 80 309.00 

Okidata Microllne 82A 419.00 

Okidata Microllne 83A 649.00 

B.M.C. B8.G Monitor 89.00 

Epson MX 80 FT 509.00 

Epson MX- 100 689.00 

Radio Shack Mill w/48K 879.00 

Radio Shack Mill w/48K and 2 40T dr 

1649.00 and RS232 1739.00 

40 track economy drive Power Supply 

with case 1 79.00 

Tandon drives with Power Supply and case 

40 track single head 249.00 

dual head 339.00 

80 track single head 299.00 

dual head 399.00 

5.25" Power Supply and case 39.00 

8" Power Supply and case 99.00 

CENTRONICS 739 Printer 469.00 

One Bytewriter D.W 699.00 
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* Omnltek Computers International Inc. * 



A 

A 
A 
A 
A 



TRS-80 is a reg. trademark of Tandy Corp. 
Prices are for mail order only TERMS: Check, 
money order, Mastercard and Visa accepted. 
F.O.B. Tewksbury- freight extra. Mass residents add 
5% sales tax. Write for FREE CATALOG. 
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06 980 ; 










06990 ; 










07000 ; 


SUBROUTINE BSTRNG CONVERTS THE TWO BYTES I 


N BC INTO AN 












07010 ; 


ASCII 


STRING OF FOUR HEX DIGITS WHICH IT L 


OADS INTO 












07020 ; 


HL-3, 


HL-2, 


HL-1, HL. 


EB98 CDA7EB 


07 030 BSTRNG 


CALL 


ASCII > CONVERT BYT 


E IN C. 










EB9B 73 


07040 




LD 


(HL) ,E 


EB9C 2B 


07050 




DEC 


HL 


EB9D 72 


07060 




LD 


(HL) ,D 


EB9E 2B 


07070 




DEC 


HL 


EB9F 48 

B. 
EBA0 CDA7EB 


07080 




LD 


C,B ;NOW CONVERT 


07090 




CALL 


ASCII 


EBA3 73 


07100 




LD 


(HL) ,E 


EBA4 2B 


07110 




DEC 


HL 


EBA5 72 


07120 




LD 


(HL) ,D 


EBA6 C9 


07130 
07140 ; 
07150 ; 




RET 






0716 ; 


SUBROUTINE 


ASCII TAKES A BYTE IN C AND RET 


URNS, IN DE, 










S. 

EBA7 79 


07170 ; 


THE ASCII CODES REPRESENTING ITS TWO DIGIT 


07180 ASCII 


LD 


A,C 


EBA8 CDB6EB 


07190 




CALL 


SBRASC ;D0 FIRST 4 


BITS. 










EBAB 5F 


07200 




LD 


E,A 


EBAC 7 9 


07210 




LD 


A,C 


EBAD 0F 


07220 




RRCA 


; BRING NEXT 


4 OVER. 










EBAE 0F 


07230 




RRCA 




EBAF 0F 


07240 




RRCA 




EBB0 0F 


07250 




RRCA 




EBB1 CDB6EB 


07 260 




CALL 


SBRASC ; CONVERT THE 


M TOO. 










EBB4 57 


07270 




LD 


D,A 


EBB5 C9 


07280 
07290 ; 




RET 




EBB6 E60F 


07300 SBRASC 


AND 


0FH ; CHANGE LOWE 


R 4 BITS OF 










EBB8 F630 


07310 




OR 


30H ; A TO ASCI 


I BYTE. 










EBBA FE3A 


07320 




CP 


3 AH 


EBBC D8 


07330 




RET 


C 


EBBD C607 


07340 




ADD 


A, 07 


EBBF C9 


07350 
07360 ; 
07370 ; 




RET 






07380 ; 


SUBROUTINE 


OUTSTR CALLS BYTDIS TO PRINT A 


STRING 












07390 ; 


POINTED TO 


BY HL AT THE CURRENT CURSOR POS 


ITION. 












07400 , 


IT REC0GNI2ES 00, 01, 02, OR 03 AS A TERMI 


NATOR . 










EBC0 7E 


07 410 OtJTKTk 


LD 


A, (HL) ;GET CHAR. F 


ROM STRING. 










EBC1 FE04 


07420 




CP 


04 ;ONE OF THE 


TERMINATORS? 










EBC3 D8 


07430 




RET 


C ; RETURN IF S 


(0-3) . 










EBC4 CD3300 


07440 




CALL 


BYTDIS ;ELSE PRINT 


IT. 










EBC7 23 


07450 




INC 


HL 


EBC8 18F6 


07 460 




JR 


OUTSTR ;G0 DO NEXT 


BYTE. 


07470 
07 4 80 










07490 


AADDR - A UTILITY THAT ADDS BC TO ADDR. 


EBCA 2AF5E7 


07500 I 


VADDR 


LD 


HL,(ADDR) 


EBCD 09 


07510 




ADD 


HL,BC 


EBCE 22F5E7 


07520 




LD 


(ADDR) ,HL 


EBD1 C9 


07 53 
07540 
07550 




RET 






07 560 


AHOMAD - A 


UTILITY THAT ADDS BC TO HOMADD. 


EBD2 2AF7E7 


07570 


\HOMAD 


LD 


HL, (HOMADD) 


EBD5 09 


07580 




ADD 


HL,BC 


EBD6 22F7E7 


07 590 




LD 


(HOMADD) ,HL 


EBD9 C9 


07600 
07610 
07620 




RET 






07630 


SADDR - A UTILITY THAT SUBTRACTS BC FROM A 


DDR. 










EBDA 2AF5E7 


07640 


5ADDR 


LD 


HL,(ADDR) 


EBDD AF 


07650 




XOR 


A 


EBDE ED42 


07660 




SBC 


HL.BC 


EBE0 22F5E7 


07670 




LD 


(ADDR) ,HL 


EBE3 C9 


07 6 80 
07690 
07700 




RET 






07710 


SHOMAD - A 


UTILITY THAT SUBTRACTS BC FROM 


HOMADD. 










EBE4 2AF7E7 


07720 


SHOMAD 


LD 


HL, (HOMADD) 


EBE7 AF 


07730 




XOR 


A 


EBE8 ED42 


07740 




SBC 


HL,BC 


EBEA 22F7E7 


07750 




LD 


(HOMADD) ,HL 


EBED C9 


07760 
07770 
07780 


; 


RET 






1 








07790 


; MESSAGES 




07 800 


; 






EBEE 41 


07 810 


INMSG 


DEFM 


'ADDRESS?' 


EBF6 03 


07 820 
07830 




DEFB 


03 


EBF7 2D 


07 840 


PENMSG 


DEFM 


'-PENRAM-' 


EBFF 03 


07850 
07860 
07870 


J 


DEFB 


03 


E7B3 


07880 




END 


STARTP 


00000 TOTAL 


ERRORS 






Listing continues 
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You could spend hours 
typing in your programs, 

Or you 
could get 




ALL THE MAJOR 

PROGRAM LISTINGS 

FROM EACH MONTH 

OF 80 MICRO ON 
CASSETTE OR DISK 



With LOAD 80 

you'll avoid all the hassles 

while enjoying all the benefits 



*F0R SPECIAL ANNIVERSARY 

ISSUE CASSETTE SEE AD 

ELSEWHERE IN ISSUE. 



What exactly is LOAD 80? Simply put, it is a monthly dump of 
the major program listings in each issue of 80 MICRO. Since it 
was introduced in April of 1981, hundreds of TRS-80* users like 
yourself have discovered the advantages and benefits of LOAD 
80. This comes as no surprise to Wayne Green, the innovative 
publisher who created LOAD 80. He knew from experience how 
frustrating and time consuming it was to keyboard and debug 
even a single published program, let alone all the major pro- 
gram listings in an issue of 80 MICRO. He was sure that a great 
many people were just as frustrated as he was and would jump 
at the opportunity to have those programs available in "ready- 
to-load" form. 

Wayne couldn't have been more right. LOAD 80 has been a 
boom to TRS-80 users, allowing them to spend more time ac- 
tually using their computers, while at the same time saving 
them a lot of aggravation and a good deal of money. 



And now you can enjoy all the benefits of the major program 
listings in 80 MICRO without the aggravation of keyboarding 
and debugging them. Start your subscription to LOAD 80 with 
this month's issue and save close to 30% on the monthly price. 
And with a year's subscription, your cost per month (for an 
average of 10 programs per cassette or disk) is about what it 
would cost you to purchase one program at retail prices. Plus 
you get the extra added advantage of having the complete 
documentation for the major programs in that month's issue of 
80 MICRO, so loading your cassette or booting up your disk 
should present no problem at all. 

To order your LOAD 80 subscription, or this month's issue 
only, simply fill in the attached card or the coupon below (a pho- 
tocopy is acceptable) and send it to: LOAD 80, 80 Pine Street, 
Peterborough, NH 03458, or call our toll free number: 
1-800-258-5473. You can also order back issues of LOAD 80. For 
complete details, look for the LOAD 80 back issues advertise- 
ment in this magazine, or see your local dealer. 



LOAD 80 disks are TRSDOS 2.3 formatted, single density and floppy-sided. They will not contain an operating system. Single drive users need a copy utility; Model III 
users need the TRS-DOS 1.2/1.3 Convert utility. Source code Ijles may not be useable on the Model III. 



Yes, I want January LOAD 80 



l YES, I want to save money. I'll subscribe to LOAD 80 
on disk beginning with this month's issue. . .$199.97 

I I YES, I want a cassette of this month's LOAD 80 for 
$9.97 each (plus $1.50 per tape for postage and 
handling). 



□ Visa D Am. Ex 



MasterCard 



□ CheckVMoney order 



I ! YES, I want to save money. Sign me up for a year of 
LOAD 80 beginning with this month's cassette. . . 
$99.97 for 12 issues. 

□ YES, I want this month's LOAD 80 on disk for $19.97 
each (plus $1.50 per disk for postage and handling). 



Name: 

Address:. 
City: 



.State: 



Signature: 



_Card# 



Zip: 

Exp. Date: 



LOAD 80 is manufactured by Instant Software, a subsidiary of WAYNE GREEN INC., 
expressed or implied that LOAD 80 will do anything other than save you typing. 



Pine St., Peterborough, NH 03458. There is no warranty 

Foreign air mail, please inquire. 



*TRS-80 is a trademark of Tandy Corp. 
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TUTORIAL 



Repairing a Disk Crash 



by Philip Martel 



One of my disks failed recently, 
but I was lucky. I managed to recover 
everything on it. This article de- 
scribes the methods I used to get my 
programs back. 

When a disk fails, one or more of the 
sectors are bad. A bad sector can be in a 
program or in the directory. If the fault 
is in a program, you will get an I/O er- 
ror while trying to load that particular 
program. If the fault is in the directory, 
you won't be able to load all your pro- 
grams, and you might not be able to 
read the directory. 

In either case, try to back up the disk. 
If that doesn't work, load Program 
Listing 2 if you have two disk drives, 
or Program Listing 3 if you only have 
one drive. 

These programs perform the back- 
up function from Basic, but use the ma- 
chine-language disk calls described on 
page 60 of the Color Computer Disk 
System manual. The advantage to this, 
as opposed to using the Basic com- 
mands DSKI$ and DSKO$, is that if a 
bad sector is read, the machine-lan- 
guage call will return an error code but 
continue running. The Basic commands 
will cause the program to stop with an 
I/O error. 

I originally used Program Listing 1 to 
back up the bad disk. It uses DSKI$ and 
DSKO$. When I got an error, I had to 
modify the program to start again after 
the bad sector. Program Listing 2 will 
back up the disk and write anything re- 
covered onto the new disk. If nothing 
remains of a given sector, it will not be 



If a disk crashes, you 
could lose several 
programs. Save them with 
the steps outlined here. 



written onto the new disk. When the 
program is running, note the bad tracks 
and sectors, along with the error codes. 

You now have a disk with all the 
good sectors on it. The sectors that were 
totally bad on your original disk are 
filled with FF (255) from when the 
back-up disk was initialized. 

Now comes the interesting part. Read 
the description of how data is organized 
on the disk (pages 58 and 59 of the disk- 
system manual). Assuming that it was a 
single file that crashed rather than the 
directory, you can use Colorzap and the 
granule map from the article "Gobs of 
Goodies for Your Color Computer 
Disk" by Robert Nicholas and myself 
(80 Micro, Feb. 1983), to determine 
which granule the bad sector is in and to 
examine the surrounding sectors. 

How you proceed from here depends 
on what the lost data was and whether 
you were able to recover the sector. If 
you were able to recover the sector, 
looking at it with Colorzap might show 
you one or two bad bytes. You might be 
able to fix them from context, especially 
if the data was part of a Basic program. 

If you look through Basic programs 



100 


'QUICK AND DIRTY 


BACKUP PROGRAM FOR THE COLOR COMPUTER 


110 


'BY PHIL MARTEL 




120 


CLEAR 500 




130 


FOR TR= TO 34 


160 ! l,TR,SC f A$,B$ 


140 


FOR SC = 1 TO 18 


17 NEXT SC 


150 


! 0,TR,SC,A§,B$ 


180 NEXT TR 
Program Listing 1 



with Colorzap, you will notice a certain 
pattern to the bytes. By playing with 
Colorzap you should spot the different 
types of programs very readily. Getting 
familiar with your tools ahead of time 
pays off. 

If the sector is part of a machine- 
language program or a file with a lot of 
random data, you might not be able to 
fix bad bytes. However, with a dissas- 
sembler (and perseverence) you might 
be able to fix a few bad bytes in a 
machine-language program. 

If a whole sector is lost out of a data 
file or machine-language program, 
you're stuck. You can't recover the data 
in a Basic program, either. But if you 
have a listing of the program, you 
should be able to fix the disk by using 
Colorzap and by spending ten minutes 
typing. 

Load the Basic program and list it on 
the screen. There will be a line with a lot 
of exclamation points in it. The line 
number might not be in sequence. Note 
the last line number that is in sequence 
(the bad line or the one before it). Write 
this number down in hexadecimal 
(PRINT HEX$(your line number)). 
Now run Colorzap. 

If the bad line has a line number that 
is still in sequence (a good line number) 
modify the bad sector on the disk as 
follows: Change the first six bytes to 00 
01 01 ## ## 82, where ## ## is the hex- 
adecimal representation of the number 
one greater than the line number you 
noted. Save these changes onto disk and 
change the first six bytes on the next 
Colorzap page (bytes 80-86) to 00 01 01 
## ## 82 where the ## ## is the hex- 



The Key Box 

Color Computer 
16KRAM 
Color Disk Basic 
One Disk Drive 
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DISKovery Unlimited is bringing you the best in 
microcomputer systems, drives, peripherals, and 
software for TRS-80 and other popular brands. This 
month, take advantage of special system and disk 
drive values like these: 

Complete TRS-80 Model III 
microcomputer system with disk drives 

48K RAM, two 40-track, double-density disk drives, 
A.M. Electronics controller board, DOS and manuals, 
complete and ready to run $1,695.00 

Same system as above, including RS-232C interface 
and MX82F/T dot matrix printer for correspondence- 
quality output $2,395.00 

(Prepaid shipping when order is prepaid) 

A.M. Electronics "Multiplier" 
for TRS-80 Model I systems 

Fed up with unreliable double-density disk drive 
operation? "Multiplier" lets you upgrade from single- 
density without doubling your problems $ 99.00 

"Multiplier" with NEWDOS80 $199.00 



Mini Winchester hard disk drive 

Completely plug-compatible with your TRS-80 
system. Includes controller board and DOS Plus 4.0i. 
Delivers 6.7 megabytes of data capacity (unfor- 
matted). Typically uses one amp less than other hard 
disk drives. Excellent for word-processing, database 
management, financial planning, and other data- 
intensive applications $1595.00 

New! Two-inch, high-performance 
floppy disk drives 

Now you can save space and money. These drives are 
only two-thirds the height of conventional drives, and 
provide extras like door-lock solenoid control, selec- 
table write protect (protect with or without notch— 
your choice!) and disk change/activity indicators. 
Shipped complete and ready to run. 
Single-sided, 40-track 2" drive 

w/case & power supply $199.95 

Double-sided, 40-track 2" drive 

w/case & power supply $249.95 

Single-sided, 40-track 2" drive, packaged 

for TRS-80 Model I, including case, 

power supply, cable, TRSDOS & manual .... $249.95 



DISKovery 

unlimited 

3366 Washtenaw Ave., Ann Arbor, Ml 48104 



v* 37 



(313) 973-231 5 i J^SWEFl 

™TRS-80 trademark of Tandy Corp. Shipping costs extra except where otherwise noted. Prices effective through the 15th of cover month. 



adecimal representation for the next 
larger line number. Save these changes 
and load your program. 

If the last good line number was 
1000, you will have a program with lines 
1000, 1001, and 1002. Lines 1001 and 
1002 will be remarks with lots of ex- 
clamation points in them. You can now 
delete these lines and type in the correct 
ones from your listing. Save the pro- 
gram and you're in business. 

Now suppose the first bad line has a 
bad line number, or a number out of se- 
quence — 65535, for example. In this 
case, patch the bad line number and 
then put in a new line at byte 80 (hex) of 
the bad sector. The theory behind this 
step should help you see how to do it: 

The Color Computer normally stores 
the lines of a Basic program in memory, 
on tape, or on disk in the same way: 
Two bytes of pointer to the next line, 
two bytes for the line number, the line in 
tokenized form, and a 00 byte to end the 
line. In memory, the pointer to the next 
line is meaningful. It indicates the ad- 
dress at which the next line begins. On 
tape or disk, the pointer is not mean- 
ingful, except that 0000 as a pointer 
means the end of the program. 

Tokenized form means that key 
words such as For, Next, and If and 
functions such as EXP, SIN, and 
STRINGS are stored in a packed form. 
One byte is used for keywords and two 
bytes for functions. This tokenized 
form makes Basic programs easy to rec- 
ognize on disk. 

If you look back at the description 
for patching a line with a bad line num- 
ber, you will see that it finishes the old 
line (00), puts in a dummy pointer (01 
01) and a line number (## ##), and then 
an 82, which is the token for REM. A 
Basic program line shouldn't be over 
255 characters long, and adding the ex- 
tra line at byte 80 prevents this. 

The only other situations that might 
occur are if the bad sector is the first or 
last sector of the file. If it's the last sec- 
tor, just put 00 00 00 at the start of the 
sector. If it's the first sector, the situa- 
tion is a bit more complicated. The first 
byte is FF, and the next two bytes are 
the length of the program plus one. The 
length of the program can be found by 
determining the number of grans, the 
number of sectors in the last gran, and 
the number of bytes in the last sector. 

This information is available on the 
directory track. Find the number of 
bytes in the last sector and the number 
of the first granule in the directory. 
Then look in the file allocation table 
(FAT) to find the total number of 
granules and the number of sectors in 
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the last granule. To find the number of 
granules, you have to trace a path some- 
thing like this: "I'm starting at gran 20. 
Byte 20 in the FAT has 1C. Byte 1C has 
C3. That means that this file has one 
full granule (20) and three sectors of 
another (1C)." 



Each sector has 256 bytes and each 
granule has nine sectors. Load the bad 
first sector with FF, the number of bytes 
in the program (+1), and the usual two 
dummy lines. Give the dummy lines the 
line numbers 1 and 2, and you should be 
able to load the program and fix it with 



100 'DISC CHECK AND BACKUP PROGRAM 

110 'FOR COLOR COMPUTER WITH TWO DISCS 

120 ' BY PHIL MARTEL 

130 CLEAR 500,&H3E00 

140 DEF FNP(X)=256*PEEK(X)+PEEK(X+1) 

150 INPUT n (C)HECK OR (D) UPLICATE" ; A$: A$=LEFT$ ( A$ ,1) : IF (A$<>"C") 

AND(A$O n D n ) THEN 150 
160 DEF USR0=FNP(&HC004) ' DSKCON -SEE MANUAL PAGE 60 
170 PA=FNP(&HC006) 'PA POINTS TO THE DSKCON PARAMETER TABLE 
180 POKE PA+4,S,H3E:POKE PA+5,0'SET UP BUFFER 
190 FOR TR=0TO34 
200 FOR SE=1T018 

210 POKE PA,2:POK EPA+1,0'READ FROM DRIVE 
220 POKE PA+2,TR:POKE PA+3,SE 
230 POKE PA+6 ,0 
240 X=USR0(0) 

250 EC=PEEK(PA+6) :PRINT@480 ,TR;SE; EC; 
260 IFECO0 THEN PRINT" ERROR" 
270 IF A$= n C" THEN 310 
280 IF EC=16 THEN FORI=&H3E00 TO &H3EFF:POKE I,255:NEXT I ' REALLY 

BAD RECORD-CLEAR IT 
290 POKE PA+6,0:POKE PA,3:POKE PA+1,1'SET UP TO WRITE TO DRIVE 1 
300 X=USR(0) 
310 NEXT SE,TR 

Program Listing 2 



100 'DISC CHECK AND BACKUP PROGRAM 

110 'FOR COLOR COMPUTER WITH ONE DISC 

120 ' BY PHIL MARTEL 

130 CLS:PMODE 0,1:PCLEAR ItCLEAR 100,&H1C00 

140 DEF FNP(X) =256*PEEK(X)+PEEK(X+1) 

150 INPUT"(C)HECK OR (D) UPLICATE" ;A$:A$=LEFT$( A$,l) : IF (A$<>"C n ) 

AND(A$<>"D") THEN 150 
160 DEF USR0=FNP(&HC004) ' DSKCON -SEE MANUAL PAGE 60 
17 PA=FNP(&HC006) 'PA POINTS TO THE DSKCON PARAMETER TABLE 
180 POKE PA+5,0'SET UP BUFFER 
190 FOR T1=0TO34 STEP2 

195 FOR T2= TO 1 :TR=Tl+T2 :IF TR=35 THEN 290 
200 FOR SE=1T018 

205 BA=18*(TR AND 1) +SE+27 : POKE PA+4 ,BA" BUFFER ADDRESS 
210 POKE PA, 2: POKE PA+1,0'READ FROM DRIVE 
220 POKEPA+2,TR:POKEPA+3,SE 
23 POKE PA+6,0 
240 X=USR0(0) 

250 EC=PEEK(PA+6) :PRINT@480 ,TR;SE; EC; 
260 IF ECO0 THEN PRINT" ERROR" 

280 IF EC=16 THEN FOR I=BA TO BA+255:POKE I, 255: NEXT I ' REALLY BA 
D RECORD-CLEAR IT 
285 NEXT SE 
290 NEXT T2 

300 IF A$="C" THEN 500 

310 PRINT@0, "INSERT DESTINATION DISC, HIT ENTER" ;: SOUND200 , 20 
315 GOSUB 600 

320 FOR T2=0 TO 1: TR=T1+T2 :IF TR=35 THEN 385 
330 FOR SE= 1 TO 18 

340 POKE PA+4,18*T2 +SE +27' SET UP BUFFER 
350 POKE PA,3:POKE PA+2,TR:POKE PA+3,SE 
360 POKE PA+6,0: X=USR( 0) 'WRITE BUFFER 

370 IF PEEK (PA+6)<>0 THEN PRINT"DISC WRITE ERROR HIT ENTER TO T 
RY AGAIN" :GOSUB 600 :GOTO340 
3 80 NEXT SE 
385 NEXT T2 

390 PRINT@0, "INSERT SOURCE DISC, HIT ENTER " ; :SOUNDl50 , 2 



400 GOSUB 600 
500 NEXT Tl 
510 END 

599 'SUBROUTINE TO WAIT FOR ENTER 

600 B$=INKEY$: IF B$=""THEN 600 
610 IF ASC(B$)<>13 THEN 600 

63 RETURN 

Program Listing 3 



PERIPHERAL VISION 

Floppy Disk Services, Inc. is a contracted SIEMENS drive dealer. Do not let the prices fool you, we buy in very 
large quantities to get the best price and pass that savings on to you! All systems are of the highest grade 
components and our cabinets are custom designed with you in mind! If not 1 00% satisfied, call us and we will 
promptly refund your money, t 

We carry Add-on drives for IBM, Radio Shack, Heath, Apple and most other microcomputers. 



Apple II Add on drives $329.00 

Apple 8 inch controller 365.00 

Apple 80 track dual system 1395.00 

Apple dual 8 inch system w/ controller 1250.00 

FDD-100-5b 'flippy' exact HEATH add on 235.00 

FDD-200-5 double sided 40 track drive 250.00 

FDD-111-5 5ms step IBM or MOD 3 Add on 245.00 

FDD-221-5 5ms step 80 track DD/DS 350.00 

TEC SFD-51B 5ms 5 1 /4 48TPI 215.00 

FDD-100-8d 8 inch single side DD drive 340.00 

FDD-200-8p Double sided 8 inch drive 445.00 

Custom 8 inch and bV& inch enclosures Call 



System packages available for all drives . . . 

Dual 8 inch system with EVERYTHING 935.00* 

Dual double sided 8 inch system 1125.00" 

Single 5 1 /4 Heath or MOD I Add on w/ case 285.00" 

Dual 5 1 /4 Heath or MOD I 585.00* 

10mb Hard Disk for any computer 2700.00* 

CDR controller, allows any combo 8 and 5Va inch drives to 
be added to your H88 or H89 Call 

* 8 inch systems require minor assembly. Add $100.00 A8cT. 

All 5 1 A inch systems come assembled and tested. 
t Equipment must be in same condition as you received it. 



WE HAVE ZENITH Z- 1 00 SYSTEMS IN STOCK. 

Have a disk drive in need of repair? We have expert techs ready to optimize your drives! 

Call us for info. 



JT T FLOPPY Disk Services, we not only sell 
^Lfl drives, we also sell custom enclosures. 
^^^L Our cabinets are designed by our 
experts to be functional and attractive. And our 
quantity pricing is so attractive, we invite 
dealers and large group purchasers to call. 

■ 609-799-4440 




Dual 8" System 



I 



F you don't see what you want, give us a call between 9 am & 5 pm (FT). 
Chances are we'll have what you need for your system at your price. Due to 
production deadlines for advertising, prices in this ad are 2 months old, so we 
encourage you to call us for current prices and new product information. 



FIE3PPY 
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PAYMENT POLICY - We accept Mastercard, VISA, personal checks & MO. We 
reserve the right to wait 1 working days for personal checks to clear your bank 
before we ship. All shipping standard UPS rates plus shipping & handling. NJ 
residents must add 5% sales tax. 




741 ALEXANDER ROAD 
PRINCETON, NJ 08540 



INC. 



PRICES & SPECIFICATIONS SUBJECT TO CHANGE 



MOD l-ll-lll. CP/M are trademarks of Tandy and Digital Research respectively. 



Basic. 

Bad Directory 

Having a bad directory segment is 
frustrating. All your programs are 
there, but you can't get at them. Having 
the directory go bad is at least as likely 
to happen as having an individual pro- 
gram go bad, because when you access a 
program, you are also accessing the di- 
rectory. So, the directory gets at least as 
much use and has the same chance for 
random failure as all the programs 
together. 

When my disk crashed, I lost the file 
allocation table and one of the other di- 
rectory sectors. I backed up the disk 
with Program Listing 1 . When the pro- 
gram gave me an I/O error, I changed 
the For statement in line 130 to copy the 
rest of the disk. Then I changed the pro- 
gram so that it ran only on the bad 
track, but past the bad sector. In this 
fashion, I copied the whole disk. I 
found that on track 17, sectors 2 and 5 
were bad. 

I started to fill in the file allocation 
table by what amounts to cryptanalysis. 
I knew the starting granule of all pro- 
grams except those that were lost with 
sector 5. By looking at the first sector of 
the starting granule, I could tell how 
long the program was. If it was less than 
a full granule, I could assign that byte in 
the file allocation table the value CI to 
C9 as appropriate. 

If the file was longer than one 
granule, I looked at the last line number 
in the granule (assuming it was a Basic 
program) and searched for a granule 
that started with a larger line number 
that might be a continuation of the pro- 



gram. After I had reconstructed most of 
the file allocation table in this fashion, I 
used a machine-language program to 
read the bad sectors. 

I wrote a short program using the 
Sigmon monitor, which has a one-line 
assembly feature. Here's where I got 
lucky. This program showed that the 
file allocation table (Tr 17, Sec 2) was 
still there, but had a CRC error. I was 
able to read the data, patch a bad byte 
and recover the file allocation table. 

Since I had almost restored the whole 
table by hand, I wasn't too thrilled by 
this. I did notice that bytes 68 to 255, 
which the manual claims are zeroes, 
seemed to have data on recent additions 
to the directory. Since the other bad sec- 
tor (Tr 17, Sec 5), which could not be 
recovered by the machine-language pro- 
gram, was at the end of the directory at 
the time, I was able to recover almost 
the entire directory. 

You might have noticed that I have 
not provided a listing of this marvelous 
machine-language program. Program 
Listings 2 and 3 do the same thing en- 
tirely from Basic, so the listing is not 
necessary. 

If the bad sector in the directory is 
not recoverable by using Program 
Listings 2 and 3, and it was not the most 
recently updated, then you have prob- 
lems. You can get some idea of where 
the programs referred to in the bad sec- 
tor are stored by writing a table with 68 
rows, one for each granule on the disk. 
Go through the directory and write the 
name of each program on the line with 
its starting granule. Then look at the file 
allocation table and write down the se- 
quence of granules associated with each 




granule. 

Every granule has associated with it 
either an FF, a C1-C9, or (XM4 (hex). 
If the granule points to another one 
(that is, its number in the file allocation 
table is 00-44) write that granule 
number and any granules it points to in 
the row following the first granule. 
Cross out rows as you write them out as 
successors to other granules. You will 
develop a set of "chains" of granules. 
Most of these will have a program name 
associated with them. 

The chains that don't have program 
names are the ones that were named in 
the bad sector. Look at the files. You 
might be able to remember the names 
of some of them. Give new names to 
the rest. 

As you look through the files, deter- 
mine how many bytes in the last sector 
are used by looking for 00 00 00, for 
Basic files, or by working from the byte- 
length information in machine-lan- 
guage and data files. 

You now have the information need- 
ed to restore the bad sector. Go into 
Colorzap, patch the segment, and 
you're back in business. 

While working on this article, I had 
another disk failure. Since I had the 
disk backed up this time, I didn't worry 
about it. I decided to try some of the 
ideas I had been developing. 

I found that I couldn't read any of 
the disk reliably with Program Listing 1 
which had worked so well the first time. 
The disk did not seem to be physically 
damaged, so I bulk-erased it and ran the 
DSKINI command. When DSKINI 
didn't work, I knew I had a problem. 
Since it didn't work for a good blank 
disk on either of my disk drives, I de- 
cided that the problem was in the 
controller. 

I removed the controller from the 
Color Computer and rubbed the con- 
tacts on both sides of the board with an 
eraser. This allowed me to initialize the 
disks. To avoid further problems from 
oxidation, I have had the contacts 
plated. 

I hope you have fewer problems with 
your disk drive than I have had with 
mine. The sort of trouble a disk crash 
causes can be a great learning expe- 
rience, but it does cut down on your 
programming time. Since I got the fin- 
ger connectors of my controller plated, 
I haven't had any trouble with the disk 
drives. ■ 



Contact Philip Martel at 748 Tyler 
St., Pittsfield, MA 01201. His hobbies 
include ham radio and karate. 
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For TRS-80 Model I & HI Users 

STOP 
DISK CRASHES 

We are proud to announce a modification 
that protects your diskettes against power 
failure while they are in the drives. 
Your data will be safe without diskette 
removal... so leave 'em in! 

This small PC board is simple to install (four 
solder connections on modi only). Requires 
absoloutely no software changes! One year 
warranty. 

MODE L I (equipped with Radio Shack. Shugart or Tandon drives! ... $ 29.95 
MODEL IH (Protects internal drives only) $34.95 

Send check or m.o. to : INTEGRATED DEVICES, INC. + $1 - 50 PiH 

PO. Box 8385 
Haledon, N.J. 07538 



MC & VISA customers please include card no. , exp. date, and signature. 
Or call our 24 hour order line: 201-956-8496. 
Sorry, no COD orders. 

NJ residents add 5% sales tax. 

r °0 is a trademark of Tandy Corp. Opening the case ol a TRS-80 may void the RS 



t#i^ BS! 



PROFESSIONAL 
FEDERAL INCOME TAX 
PROGRAMS 

FOR TRS-80 MODEL 1,11 OR III 

Cuts manual production time by as 
much as 75%. 

Determines least tax quickly. 
Saves input information on disk-auto- 
matic transfer of essential information. 
Batch processing possible. 
Uses IRS prescribed computer generated 
print outs. 

Prohibits bypassing of mandatory entries. 
Accuracy assured by triple check logic. 
Enter only pertinent lines-faster than 
line by line. 

Single line correction with automatic 
update of succeeding totals. 
Professionally used— nationally advertised. 
Overlays available. 
Requires 2 disk drives & 48K. 

•BASICTAXPACKAGE$165.00» 
INCLUDES 1040, 1040A, 1040EZ 

AND SCHEDULES A&B 

OTHER SCHEDULES$35.00 EACH 

MANUAL $5.00 

VtSA 

MICRO-TAX 



P.O. Box 4262, Mountain View, CA 94040 

Call: (415) 964-2843 .339 



JFD-III Flop py Disc Controller Kit onl y*279 



Thousands of our controllers have been installed and the user satisfaction has been 
tremendous. Those who have compared the rest say that ours is the best. 

Kit includes controller board, mounting brackets, cables, power supply for 2 internal drives, and illustrated instruc- 
tions. This controller has been tested for compatibility with most major operating systems including TRSDOS, LDOS, 
NEWDOS/80, DOSPLUS, and MULTIDOS. The controller supports any mix of 5 l A" drives including single or 
double density , single or double sided, 35, 44, 77 or 80 track drives. 



JHD-III Winchesters for TRS 80 Model III 

5 Mbyte formatted — $1,795 10 Mbyte formatted — $1,995 



These drives plug into the 50 pin I/O expansion port. System includes host adaptor, cables, fan cooled cabinet. 
Controller features 1 1 bit error detection and correction, automatic track remapping and variable sector interleaving. 
An LDOS compatible driver is included with the kit for those who already own LDOS . 

TERMS: Cashier's Check or COD. Personal Checks take 3-4 weeks to clear. 

To order call (505) 265-5072 
or send order to: 




137 Utah N.E., 
Albuquerque, NM 87108 



TRADEMARK CREDITS: 

TRSDOS is a Trademark of Tandy Corporaiion. 
LDOS is a Trademark of Logical Systems. Inc. 



NEWDOS is a Trademark of Apparal. Inc. 

DOSPLUS is a Trademark of Micro-Systems Software. Inc. 

MULTIDOS is a Trademark of Cosmopolitan Electronics Corporate 



Dealer inquiries invited. ^101 
Call for the name of dealer nearest you. 



.--See List ol Advertisers on Page 435 
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UTILITY 



Discipline for the 
DIR Command 



by Gerry Schechter 



c 



onf used by the order your Color Computer 
prints the directory? This utility makes your 
directory look the way you want it to. 



Disk storage versus tape storage is 
like comparing Cadillacs and Pintos. 
But disks, in spite of their advantages, 
can be troublesome. Trying to read 
those disk directory file names as they 
scroll off the top of the screen at Mach 2 
speeds can cause your eyeballs to pound 
dents into your frontal lobes. What disk 



users need is a utility to clean up those 
directory displays. 

After I bought my Radio Shack 
Color Computer Disk System and 
packed one disk with as many programs 
as I could, I discovered the DIR com- 
mand displays file names and other in- 
formation in an order that I haven't yet 



Program Listing 



10 ' DIRUTIL/BAS VER 1.0 

20 ' GERRY SCHECHTER 

30 '75 MIDLAND TERRACE 

40 ' YONKERS NY 107 04 

50 ■ FEB 82 

60 CLEAR1200 

70 GOSUB720 

80 DIM FS»68) ,E$(68) ,T$(68) ,M$(68) ,G(68) 

90 NF=0:SE=3 

100 ' get default drive * 

110 D=PEEK(SH95A) 

120 PRINT@263, "READING DIRECTORY"; 

130 ' read directory 

140 DSKI$ D,17,SE,A$ r B$ 

150 C$=A$+LEFT$(B$,127) 

160 FOR X=0TO7 

170 Z=X*32 

180 IF MID$(C$,Z+1,1)=CHR$(0) THEN NF=NF-1 :GOTO250 

190 IF MID$(C$,Z+1,1)=CHR$(255) GOTO280 

200 F$(NF)=MID$(C$,Z+1,B) 

210 E$(NF)=MID$(C$,Z+9,3) 

220 IF MID$(CS,Z+12,1)=CHR$(0) THEN T$(NF)= n BP" ELSE IF MID$(C$, 

Z + i.2,l)=CHRS(l) THEN T$(NF)="BD" ELSE IF MID$ (C$, Z + 12 ,1) =CHR$ ( 2) 

THEN T$(NF)="ML" ELSE T$(NF)="TE" 
230 IF MID$tC$,Z+13,l)=CHR$(0) THEN MS(NF)="B" ELSE M$(NF)="A" 
240 G(NF)=ASC(MID$(C$,Z+14,1) ) 
250 NF=NF+1:NEXT X 
260 SE=SE+1 
270 IF SE<12 GOTO140 
280 NF=NF-1:FS(NF+1) =CHR$(255) 

290 ' read file allocation table 
300 DSKiS D,17,2,A$,B$ 
310 ' calculate granules 

320 FOR X=0TONF 

330 Y=l 

340 IF MID$(A$,G(X)+1,1) >HEXS(191) THEN G(X) =Y:GOTO400 

350 Y1=G(X)+1 

36 Y=Y+1 

370 Y1=ASC(MID$(A$,Y1,1) ) +1 

380 IF MID$(A$,Y1,1)>HEX$(191) THEN G (X) =Y:GOTO400 

390 GOTO360 

40 NEXT X 

410 ' sort by filename 

420 PRINT@263,"SORT"; 

430 Y=0:Y1=1:X=0 

440 IF F5(Y1)>F?(Y) OR 

450 F$(68)=FS(Y) :E$(68 

460 T$(68)=T$(Y) :M$ (6 8) =M$( Y) :G(68)=G(Y) 

470 F$(Y)=F$(Y1) :E$(Y)=E?(Y1) 

480 T$(Y)=T$(Y1) :M$(Y)=M$(Y1) 

490 FS(Y1)=F$(68) :ES(Y1)=E$(6 

500 TS(Y1)=T$(68) :M$(Y1)=M$(6 

510 Y=Y+1:Y1=Y1+1 

520 IF Y<NF GOTO440 

530 IF X=l GOTO430 



ext 



(F$(Y1)=F$( 
!=E$(Y) 



AND ES(Y1) >E$(Y) ) GOTO510 



(Y)=G(Y1) 
:G(Y1)=G(68) :X=1 



Listing continues 



figured out. It also scrolls information 
off the screen if there are more than 14 
files on the disk. The manual states that 
you can press the shift and @ keys to 
stop the display, but once it's off the 
screen you'll have to type in the com- 
mand again. 

It didn't take long to realize that I 
would have to write a program to elimi- 
nate the problem. To their credit, Radio 
Shack included enough technical infor- 
mation in the manual to allow me to 
write this program. 

Once I wrote the program I enhanced 
it by allowing you to run, load or kill 
any file directly from the screen. I also 
added a print function to allow easy 
documentation of the files for any 
given disk. 

How the Program Works 

Load and run the program; the 
screen clears and displays a skeleton 
screen with headings at the top and 
commands at the bottom. The middle 
of the screen shows "Reading Direc- 
tory." The disk directory is read directly 
using the DSKIS command and stores 
all relevant information into arrays. 
The file allocation table is read to calcu- 
late the number of granules used by 
each file. Next, the middle of the screen 
changes to read "Sorting Directory," at 
which point the program performs an 
alphanumeric sort based on file name 
and extension. Finally, the screen fills 
with the information for the first 10 
files, and a pointer (->) is displayed to 
the left of the first file. The pointer in- 
dicates the file on which the commands 
will be acted. 



The Key Box 

Color Computer 
16KRAM 
Disk Basic 
One Disk Drive 
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l£APER 8nM AIL ORDER DISCO UNTS!) 
Texas 817/274-5625 



TANDON DRIVES 



BARE DRIVES ONLY 

40 track single sided $199 

80 track (dual sided 40) . . $269 
160 track (dual sided 80) . $389 

5 Va inch THINLINE $Call 

8 inch THINLINE $Call 

Winchester Hard Drive . . . $Call 

WE WILL NOT 
BE UNDERSOLD! 



1 DRIVE / Single Cabinet 

40 track single sided $249 

80 track (dual sided 40 track) $329 

160 track (dual sided 80 track) $449 

1 DRIVE / Double Cabinet 

40 track single sided $289 

80 track (dual sided 40 track) $369 

160 track (dual sided 80 track) $499 

2 DRIVES / Double Cabinet 

40 track single sided $489 

80 track (dual sided 40 track) $639 

160 track (dual sided 80 track) $849 

Drives in cabinets come assembled/tested 
with power supply. Order cable separately. 



CORVUS HARD DISK 



CORVUS HARD DISKS complete from $2695 

Add 5, 10 or 20 megabytes ot storage to your TRW80, Apple, Atari, Heath, Zenith, 
IBM, Intertec, S-100and many others. One or several computers can share a hard disk. 
Get simultaneous access to data for multiple users. Available now at SUPER SAVINGS. 



PRINTERS 



TCS has the LOWEST PRICES on IN STOCK PRINTERS! 



MATRIX PRINTERS 

STAR MICRONICS $399 

NEC 8023A $495 

C. ITOH 8510 / TEC $479 

ANADEX 9501 w/2k buffer $1295 

LINE PRINTER (RS) $Call 

LINE PRINTER VI (RS) $988 

LINE PRINTER VII (RS) $649 

CENTRONICS 352 (200 cps) $1795 

CENTRONICS 353 (dual mode) . . . $2495 

OKIDATA 82A $429 

OKIDATA 82A w/tractor $479 

OKIDATA 83A $685 

OKIDATA 84A (serial) $1169 

OKIDATA 84A (parallel) $1069 

HI SPEED BAND PRINTERS 
CENTRONICS 6060 (standard) . . . $CALL 
CENTRONICS (quletlzed) $CALL 

LETTER QUALITY PRINTERS 

C.ITOH F-10 (40 cps) $1595 

DAISY WHEEL II (RS) $1695 

SMITH CORONA TP-1 $699 

BROTHER / COMREX $829 

NEC 7730 $2375 

NEC 3530 $1795 



EPSON PRINTERS 

EPSON MX80 $449 

EPSON MX80 FT $524 

EPSON MX100 FT $685 

QRAPHTRAX PLUS comes free in Epsonsl! 

EPSON ACCESSORIES 

QRAPHTRAX PLUS (bit image) $79 

MODEL I Interface $29 

MODEL I Interface/cable to keyboard $85 

MODEL III cable $29 

COLOR Computer interface/cable . . $155 

APPLE interface/cable $89 

ATARI cable (must have 850 int) .... $36 

IBM Personal Computer cable $45 

OSBORNE cable $36 

Serial RS232 2k buffered Int.card . . . $109 

EPSON PACK II 

Screen oriented bit image graphics gener- 
ator for the Model III. Create your own 
characters, symbols, etc. Documentation. 
EPSON PACK II bought w/printer $24.95 
EPSON PACK II bought separately $34.95 
Update for EPSON PACK I $7.50 



B-TREE 



CUSTOM SOFTWARE FROM TCS 



SCRATCHPAD 

The BTREE Executive 
Reference Scratchpad al- 
lows the user to store all 
your phone numbers, 
business cards and what 
ever In a multt-key data 
base (or immediate 
access by as many keys 
as you assign Extremely 
easy to use. Allows 3 
fields of Mlsc data. 

$39.95 



LIBRARY 

The BTREE Library pro- 
gram allows over 2000 
books to be stored on a 
single double density 
data diskette In a efficient 
BTREE structured file for 
immediate access to your 
data by Author. Includes 
4 build In reports. No 
sorting necessary for 
reports. 

$39.95 



MAIL LIST 

The BTREE Mail List 
program allows over 2000 
namea to be stored on a 
single double density 
data diskette. Labels can 
be generated la zipcode 
order or by range of zip- 
codes and also by s code 
restriction If you wish. 



$49.95 



TEXAS COMPUTER SYSTEMS 

P.O. Box 1327 Arlington, Texas 76004-1327 

TECHNICAL ASSISTANCE 817/274-9221 

ORDER STATUS 817/277-1913 

TELEX/TWXVEasylink ELN 62100790 



800 433-5184 



^ 59 



No tax out of state. Texana add 5%. Prices subject to change at any time. 



DEALER INQUIRIES INVITED 



TRS-80 



TCS MODEL III 48k 2 DISK 



Systems come »Mh 1M day TCS ■ma ted warranty. 




$1695 

With standard 40 track 

double density drives. 

Over 340,000 bytes. 

Includes TDOS. 

$1995 

With 2 dual headed 40 

track dbl. density drives. 

Over 730,000 bytes. 

Includes TDOS. 



Fully aaaembieo and tested systems that are software compatible and functionally 
identical to Radio Shack units sold at computer atores for $hundreds more. 

■ CONTROLLER BOARDS are high quality double sided epoxy boards with gold 
plated contacts. 

■ POWER SUPPLY is the finest switching type available. 

■ MOUNTING HARDWARE Includes power and data cables. 

■ DISK DRIVES are Tandon, the same ones used by Radio Shack ... 40 track, double 
denaity, with a 5 millleecond stepping rate. 



TCS MODEL III DISK EXPANSION KITS 

1 Controller, Power Supply, Mounting Hardware & Instructions S345 

2 Controller, Power Supply, Hardware & one 40 track Tandon drive $478 

3 Controller, Power Supply, Hardware & two 40 track Tandon drives $677 

3A Kit 3 but with two 80 track Tandon drives (dual sided 40s) $879 

3B Kit 3 but with two 160 track Tandon drives (dual sided 80s) $1099 

16k of high quality memory chips ... $16 32k of high quality memory chips ... $32 



I 



MODEL III SYSTEMS 

Original 90 day manufacturer's warranty. 
MODEL III 4k Level 1 $5M 

MODEL III 16k $818 

MODEL III 32k $898 

MODEL III 48k $968 

MODEL III 48k 2Dr/RS232 $1944 

TCS MODEL III Systems use original RS 
hardware and quality TCS memory. 
180 day limited warranty. 

TCS MODEL III 16k $799 

TCS MODEL III 32k $818 

TCS MODEL III 48k $848 



COLOR COMPUTER 

Original 90 day manufacturer's warranty. 
16k level 1 $306 

16k Extended Basic $398 

32k Extended Basic $CALL 

Color Disk $479 Disk 1 $349 

TCS COLOR COMPUTERS uae original 
RS hardware & TCS memory. 
180 day warranty. 

TCS 32k Extended Basic . $499 

TCS 32k Memory Upgrade $79 

TCS Color Diak Drive $449 

TCS Color Diak Drtve 1/2/3 $249 



Model II . . Model 16 . . Accessories . . $CALL 

TCS la an authorized TRS-60 dealer F701 in Brady. Texas 



Regularly $199 . Introductory Price 12/31/82 



WIZARDS TOUCH 

Program Development System $99 

BELIEVE IT OR NOT, YOU CAN DEVELOP YOUR OWN PROGRAM IN 15 MINUTESIII 
The WIZARD'S TOUCH Program Development System is a superior program 
generator that can provide you with the program you3ve been looking for. It comes with 
It's own Disk Operating System, providing unlimited backups. 

With WIZARD'S TOUCH, here's what you can do: 

■ Custom design your own special form for maximum ease of entering your data. You 
have total control over defining the number of characters assigned to each field and 
any other entry restrictions. 

■ Fully view arid edit all f ielda at all times. No need to retype an entire field when editing. 
Just type over the mistakes, or insert or delete them. 

■ Create a BTREE structured file, allowing you to access your atored data rapidly and 
without sorting. Duplicate keys are allowed, as well as sub-keys. 

■ Enter data at full typing speed. 

■ Define your own special self-help or prompt Information that will be displayed for any 
given field, by just touching one key. 

■ Expand your program to support up to 8 calculations for each data field. Results can 
be displayed in any field or in any defined display area. Results can also be saved to diak 
along with regular data fields. Data such as dates or prices can be formatted aa desired. 

■ Generate your own reports with the built-in pre-defined or custom defined report 
generator. Just a few keystrokes can get you a report that can be alphabetized or 
ordered by any field. And it'a all automatic. 

The WIZARD'S TOUCH la so fast and easy to use. It makes other development 
systems of the market look like amateurs. No royalty necessary for resale of 
programa you develop on WIZARD'S TOUCH. It creates a stand-alone, fully 
commented, BASIC program, which you can eaaiiy modify. 

Your purchase includes a free subscription to our WIZARD'S TOUCH newsletter, a 
quarterly publication with free programs, ideas for applications, updates and more. 
Now available for MODEL l/lll Coming soon for MODEL II, IBM and APPLE. 



Listing continued 



610 
620 



540 FB=0:Y=128 

550 GOSUB660 

560 ' wait for keyboard input 

570 I$="":I$=INKEY$:IF 1$="" GOTO570 

580 IF I$="D" THEN GOSUB780 :GOTO570 

590 IF I$="U" THEN GOSUB830:GOTO570 

600 IF I$="F" THEN GOSUB880:GOTO570 

IF I$="B" THEN GOSUB930:GOTO570 

IF I$="R n OR I$="L" OR IS="K" THEN GOSUB9 80:GOTO57 
630 IF IS="P" THEN GOSUB1100:GOTO570 
640 GOTO570 
650 ' fill screen 
660 GOSUB720:Z=0 

670 IF FB+9>NF THEN FE=NF ELSE FE=FB+9 
6 80 FOR X=FB TOFE 
690 PRINT@130+Z*32,F$(X) •" ";E$(X); n " ;T$ (X) ; " ";M$(X); 

",-G(X); 
700 Z=Zfl:NEXT X 
710 PRINT@Y,"->"; :RETURN 
720 CLS 

730 PRINT@1,"*** DIRECTORY LIST UTILITY ***"; 
740 PRINT866, "FILENAME EXT TYPE FMT GRN"; 
750 PRINT@481,"RUN-LOAD-KIL-FWD-BWD-UP-DO-PRT"; 
760 RETURN 

770 ' move pointer down 

780 IF Y+32>416 OR Y+32=>128+Z*32 THEN SOUND120 ,3: RETURN 
790 Y=Y+32 

800 PRINT@Y,"->°; :PRINT@Y-32," "; 
810 SOUND130,1: RETURN 
820 ' move pointer up 

830 IF Y-32<128 THEN SOUND120,3 :RETURN 
840 Y=Y-32 

850 PRINT@Y,"->"; :PRINT@Y+32 , " "; 
860 SOUND1 3 0,1: RETURN 
870 ' scroll forward 

880 IF Ft:=NF THEN SOUND120 , 3 : RETURN 
890 FB=FB+10:Y=128 
900 GOSUB660 
910 SOUND1 3 0,1: RETURN 
920 ' scroll backward 
930 IF FB=0 THEN SOUND120 ,3 : RETURN 
940 FB=FB-10:Y=128 
950 GOSUB660 
960 SOUND130,1: RETURN 

970 ' load-run-kill 
980 X=FB+(Y-128)/32 

IF G(X)=0 THEN SOUND120,3:RETURN 
IF T$(X)="ML" AND IS="R" THEN SOUND120 , 3 : RETURN 
AS^FSlX) +"/"+E${X) 

IF I$="L" THEN CLS:PRINT:PRINT" LOADING. 
THEN LOADM A$ ELSE LOAD A$ 
1030 IF IS="R" THEN CLS: PRINT: PRINT 



990 
1006 
1016 
1026 



LOADING. 



";A$:IF T$(X)="ML" 
";A$;",R":LOAD AS, 



R 

1040 PRINT@Y+16, "VERIFY KILL Y/N"; 

1050 I$=INKBYS:IF 1$="" GOTO1050 

1060 IF I$="Y" THEN KILL A$:T$(X) ="**" :H$ (X) ="*" :G(X)=0 

1070 PRINT@Y+16," ";T$(X);" ";M$(X); n ";G(X);" "; 

1080 RETURN 

1090 ' print directory 

1100 SOUND130,1 

1110 AS=STRING$(b," "):fRINT@Y," "; 

1120 PRINT#-2 

1130 PRINT#-2,A$;"*** DIRECTORY LIST UTILITY ***" 

1140 PRINTH-2 

1150 PRINT#-2,A$; "FILENAME EXT TYPE FMT GRAN" 

1160 PRINT#-2 

1170 FOR X=0TONF 

1180 PRINT#-2,A$;F$(X) ;" ";E$(X)j" ";TS(X);" ";M$(X);' 

";G(X) 

1190 NEXT X 

1200 PRINT@Y,"->"; :RETURN 



Using the Program 

Once the screen fills and the pointer 
appears, the following commands (us- 
ing INKEYS) are available: 

D — move pointer down one line 

U — move pointer up one line 

F — display next group of files 

B — display previous group of files 

R — load and run file 

L — load file 

K — kill file (requires a Y/N verification) 

P — print entire directory 

All commands produce an audible 
response when you press any valid 
command key. Hitting an invalid com- 
mand key, such as trying to load a 
killed file, also produces an audible 
response. 

Modifications 

All the comments in the program 
were added after 1 thoroughly tested it, 
and they precede the lines they describe. 
You can save typing time without wor- 
rying about UL errors. 

Since I have only one disk drive, the 
program will not format the directory 
of more than one disk at a time. The 
program uses the default drive number, 
which you can change with the Drive 
command, or you can modify it to han- 
dle more than one drive at a time. 

I've modified all my programs by re- 
placing all End statements with a Load 
and Run of this program to allow me to 
work directly from the screen. ■ 

Gerry Schechter can be reached at 75 
Midland Terrace, Yonkers, NY 10704, 
and is employed by New York Hospital, 
New York. 



PRICES YOU CAN'T BEAT! . . 



SPECIALS THIS MONTH: 

LNW-8 Model I $1,295 

48K, 5" or 8'" DISK CORTR RGB COLOR 
DOS-PLUS 3.4 HIRES GRAPHICS 



COMPUTERS 

LNW-80 48K 
LNW-80 II 48K CPM 
PMC-81 16K 
PMC-81 48K 
PMC-81 CPM 
SUPER BRAiN II DD 
T1MEX 1000 



$1,375 

$1,595 

$565 

$715 

$770 

$1,935 

$85 



5 MEG HARD DISK REMOVABLE $1,449 
CARTRIDGE 



CITOH PRINTERS Ser Par 



PROWRJTER 8510 

PROWRITER 1550 

F-10 40CPS 

F-10 55CPS 

F-10 TRACTOR FEED 



$559 $459 
$749 $699 

51365 91365 

• 1615 M615 

$195 



TANDON DRIVES Compl Ba re 

100-1 40 TRK S/S $235 $199 

100-2 40 TRK D/S $319 $280 

100-3 80 TRK S/S $319 $280 

100-4 80 TRK D/S $375 $340 

EXPANSION INTERFACES 

FREEDOM OPTION $199 

FREEDOM PLUS $399 

LNW- 32K - ASSM'TST/GOLD/CASE $349 

MICRO DESIGN MDX 2 $349 



CRT MONITORS 

AMDEKB&W $89 GREEN $159 

AMDEK COLOR $359 RGB $739 

TECO B&W $99 GREEN $129 

TECO COLOR RGB 9429 

MOD. CARD FOR RGB $35 



MODEMS 

SIGNALMAN 



$85 



24 HOUR TOLL FREE ORDERS 
VISA/MASTER CHARGE ONLY: 
(800) 633-2252 EXT 720 

AH QUESTIONS: (313) 538-1112 

MICHIGAN RESlOENTS ADO »* SALES TAX ■ POSTAGE. CALL f OR 
CHARGES ■ PRICES ARE DISCOUNTED FOR CASH AND MONEY 
ORDER (NON CERTIFIED CHECKS ALLOW 2 WEEKS TO CLEARI 
MASTERCARD ANO VISA ADO 3% NO C O D NO NET TERMS 




VFQPACOMPUTER OUTLET 

VLWrn 16727Patton Detroit Ml 482 19 



■518 
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TRSDOS^CP/M 



reformaTTer 

Model II usersl Convert files between 
TRSDOS and CP/MI 

■ REFORMATTER runs under TRSDOS 

■ Operates on single drive system 

■ Converts in both directions 

■ CP/M operating system not needed 

■ All TRSDOS record lengths supported 

■ Initializes blank CP/M diskette 

■ Displays or dumps CP/M files 

■ Manipulates CP/M directory under 
TRSDOS ^380 

$249.00 from stock. CP/M**IBM, 
TRSDOS*»DEC, and CP/M**DEC ver- 
sions of REFORMATTER also available at 
$249.00 from MicroTech Exports, Inc., 
467 Hamilton Ave., Palo Alto, CA 94301 

[I Tel: 415/324-91 14 C TWX: 

910-370-7457 MUH-ALTOS wSOm Wft 



Scotch Diskettes 

Rely on Scotch* diskettes to keep your valu- 
able data safe. Dependable Scotch diskettes 
are tested and guaranteed error-free. The low 
abrasivity saves your read/write heads. 
They're compatible with most diskette drives. 




(800)235-4137 



Dealer Inquiries 
invited 




PACIFIC 
EXCHANGES 

1 00 Foothill Blvd. 
San Luis Obispo. CA 
93401 InCalcall 
(800) 592-5935 or 

805)5431037 



^207 



COLOR COMPUTER® 
GAMES!! 

Machine language, fast-action, high-resolu- 
tion color graphics with sound. 16 K and joy- 
sticks required. 



UFO Hying saucers 
AERIAl ATTACK scrolling 
STAR VOYAGER 

relative motion 
CREATURE FEATURE 

defend yourself 
COLOR BLAST 3-D action 
BOXING 2-player game 
All prices postpaid. 



disk 
15.95 
15.95 



cassette 
12.95 
12.95 



15.95 12.95 



15.95 
15.95 
15.95 



12.95 
12.95 
12.95 



COLOR SOFTWARE 

4247 MAKYES 

SYRACUSE, NY 13215 



^Trademark of Tandy Corporation 



^-267 



This publication 
is available 
in microform. 



University Microfilms 
International 

Please send additional information 

Name 

Institution 

Street 

City 

State Zip 



300 North Iccb Road 30-32 Mortimer Sti 

Dept PR Dept. PR. 

Ann Arbor. Mi 48106 London WIN 7RA 

USA. England 



-irk SUPER™ rt-fr 
ISA's DATABASE 

The only DBMS with all these features: 

* PROVEN in one year of test marketing 

* TOUGH, reliable file structure 

* MENU driven for simplicity and easy use 

* ARITHMETIC with stored calculations 

* FAST set-up and report formating 

* CLEAR user-oriented documentation 

* PRINTS totals & subtotals - mail labels 

* REFORMATS and merges data files 

* MULTI-DISK files: Up to 128K records 

* SORTS full disks on up to 40 fields 

* PRODUCTION input of repetitive data 

* USE existing data files 

* COUPLES to word processors 

* POSTS transactions to master file 

* SEARCH by strings, ranges, comparisons 

* DATA COMPRESSION: Over twice as 
many labels as the other system 

ForTRS-80* Models I, II, III, & 16 - 250.00 
CP/Mt - 295.00 

Ask your Dealer or Write: iS 351 
Institute for Scientific Analysis, Inc. 
P. O. Box 7186, Dept. M-2 
Wilmington, DE 19803 (215)358-3735 

iT.M. Digital Research 



*T.M. Tandy Corp. 




Program 
$69.95 



"Take a Byte" H 

includes; Meal Planning 
Daily and Weekly Menus 
Grocery List 8t RDA Charts 
Over 700 Food Entries 

totals: Calories, Protein, Vitamins, 
Minerals, Carbohydrates, Fats, Water 

Available for Disk Models I and III 

Rodvill Software 

24 Rod Road 

Ridgefield,Ct.06877 

(203) 438- 5309 




i* 54 



BL 



Ct. residents add sales tax 



J£ 



DISCOUNT COMPUTERS 

100% RS COMPONENTS, NO FOREIGN DRIVES OR MEMORY— FULL WARRANTY 



16K COLOR COMPUTER 427.00 

32K COLOR COMPUTER 497.00 

16K MODEL III 815.00 

48K MODEL III, 1 DR 1549.00 

48K MODEL III, 2 DR. RS232 1795.00 

64K MODEL II, 1 DR 2499.00 

128K MODEL 16, 1 DR 3898.00 

128K MODEL 16, 2 DR 4510.00 



DMP-500 PRINTER 1398.00 

DMP-100 PRINTER 299.00 

DMP-200 PRINTER 599.00 

DWP-410 DAISY 1195.00 

DAISY WHEEL II 1599.00 

1 DR. EXPANSION MODEL II 919.00 

8.4 MEG HARD DISK MODEL 11/16 3599.00 

ALL RS SOFTWARE 20% OFF 



CASHIERS CHECK OR MONEY ORDER MUST ACCOMPANY ALL ORDERS. 

(817) 825-4027 

NOCONA ELECTRONICS • Box 593 • Nocona,TX 76255 



sSee List of Advertisers on Page 435 
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SERIES 



APL Primer— Part II 



by Margaret M. Grothman 



V 



ectors were your favorite part of high-school 
physics class, right? This month, Margaret 
tells you how to use them in APL on your 80. 



I first mentioned vectors last month, 
in Part I of this series on APL. This 
month you will study vectors in more 
detail, and also learn many new APL 
functions. 

To begin, assign values to two 
variables, VAR1 and VAR2. Single 
values assigned to variables are called 
scalar s, or scalar variables. 

Enter: VAR1— 10 
Enter: VAR2^12 

Now assign a third variable, VAR3, 
in the following way: 



Enter: VAR3" 
Enter: VAR3 
Result: 10 12 



-VAR1, VAR2 



You have created a two-element vec- 
tor by chaining two scalar variables 
together. The function denoted by the 
comma is called catenation — last month 
you chained together two names (liter- 
als) using the catenation function. 

Operations can be done with vector 
variables in the same way as with scalar 
variables. 

Enter: VAR4«-VAR3 f X VAR1 
Enter: VAR4 
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Result: 100 120 

Enter: VAR5^VAR3|X VAR4 

Enter: VAR5 

Result: 1000 1440 

In the first example, VAR1 (a scalar), 
is multiplied by a vector (VAR3), 
resulting in VAR4 (a new vector con- 
taining two elements). 

When two vectors are multiplied as in 
the second example, corresponding 
elements of each are multiplied 
together. This is called parallel process- 
ing. The vectors must be the same 
length or an error message will result. 

Random (Monadic) 

A question mark followed by an inte- 
ger produces a random integer between 
1 and the integer entered. A question 
mark followed by produces a random 
number between and 1 . If the symbol 
is followed by a vector consisting of in- 
tegers, the result will be another vector 
containing random numbers. The en- 
try, ? 6 6, for example, returns a two- 
element vector consisting of random in- 
tegers between 1 and 6 (like the roll of a 
pair of dice). 

Deal (Dyadic) 

The deal function is the dyadic 



counterpart of the random function. It 
uses the same symbol, and also involves 
random selection of numbers. 

The first argument in deal is an in- 
teger that determines the number of 
random integers to be selected. The sec- 
ond argument, like the single argument 
in random, is the upper limit of integers 
that can be selected. If you enter 3 ? 10, 
three integers from 1 to 10 will be 
displayed. There is no replacement — no 
number will be chosen twice. Entering 
6 ? 52, for example, produces a vector 
containing six integers between 1 and 
52, simulating a deal of six cards out of 
a deck of 52. 

Power Function 

The power function uses the asterisk 
symbol. The function works with zero 
and one, negative or fractional powers, 
as well as positive integers. 



Enter: 
Result: 


5*2 
25 


Enter: 
Result: 


5* -2 
.04 


Enter: 
Result: 


5* .5 
2.23607 


Enter: 
Result: 


5* 1 

5 


Enter: 
Result: 


5*0 

1 


Enter: 
Result: 


5 * 1 % 2 
2.23607 (the square root of 5) 



VISIGRAPH™ VISAGRAPH 



DATAGRAPH 



T.M. 

PRINTER 

GRAPHICS 

PROGRAM 



TRANSFORM YOUR VISICALC M FILES INTO HIGH-RESOLUTION CUSTOM 
GRAPHS ON YOUR TRS-80" COMPUTER AND GRAPHICS PRINTER. 



ELECTRONIC WORKSHEET 

MYCI WIS DJT BJ!1 KP SCO Sdvsr.ces EscXius B? Vsi Dr. Dill 




* LARGE DA'Ifl 
Input Data 
* SELECTABLE 



* HIGH RESOLUTION 

data Points/inch. 

CAPACITY - 1000 

Points per qraph. 

GRAPH SIZES - From 1" sq. to 7" 
:•: 21" * STANDARD DATA SOURCE - 
Plots Data -from VISICALC or 
USERS OWN PROGRAMS using the 
DIFT.M. Standard Format. * GRAPH 
FEATURE SELECTION - Fill out. 
Pro— formated Form on VISICALC 
screen or in users own program. 
* MINIMAL ENTRY REQUIREMENTS - 
Enter only name of Datafile and 
location therein of data to be 
plotted. * MULTIPLE FUNCTION 
GRAPHS - Plots up to 10 Data 

Sets per graph. * DATA SYMBOLS - Plots data wi 
symbol shapes. * DATA INTERPOLATION - connects data 
composed line shapes. * LINE/SYMBOL LIBRARY - Plots 
with different line/symbol shape chosen -from 12 
CUSTOM LINES AND SYMBOLS - Has interactive screen 
•for composing symbol shapes. * AUTO SCALING - Sel i 



ISO 270 



SEE YOUR 

LOCAL 

SOFTWARE 

DEALER 

OR ORDER 
DIRECT. 



MODEL I 
$59.00 

MODEL III 
$69.00 

'INTRODUCTORY PRICE: ENDS 1 MAR, 83 



for e 

GRID 



user compose 
aints with use 
sach Data Se 
le library. 

-aphics progre 
ts scale value 



USER REQUIREMENTS 



Tab! . 



it a] 



ase of graph interpretation. User adjustable Mantissa 
SELECTION - Prints selectable number of vertical and 
grid lines. * CALENDAR SCALE - Optionally prints names 

horizontal scale. * CURVE SELECTION - Plot each data set with Lin- 
ear, Staii — Step, or Bargraph curves. * OPTIONAL MIN/MAX VALUES 
Extends graph beyond the values of the Data Sets. * DATA SET 
DESCRIPTIONS - Prints text descriptions o-f each Data Set in graph 
legend. * TEXT ENTRYS - Prints graph title, axis labels, and date on 
graph. * USER FRIENDLY - Checks validity of input data and displays 
cause o-f errors. * COMPLETE DOCUMENTATION - Comprehensive 50 page 
Users Manual with examples covering data preparation, graph feature 
entry, composing lines and symbols, and technical, notes. 



COMPUTER 

• TRS-80 MODEL I 48K 

• TRS-80 MODEL III 48K 

• LNW80 48K 
DOS 

• TRSDOS 1.3, 2.3 

• NEWDOS, NEWDOS/80 

• DOSPLUS 3.4, LDOS 

DISK DRIVES 

• MODEL I: SINGLE DRIVE 

• MODEL III: DUAL DRIVE 



GRAPHICS PRINTER: 

• MX-80 GRAFTRAX, OR GT + 

• MX-100 

• LINEPRINTER VIII 

• NEC 8023A-C 

• C. ITOH 8510 

+ + 

+ + OTHER VERSIONS IN DEVELOPMENT 



TO ORDER: Send check, purchase order, or request for COD shipment. Specify Model and 
Printer Type. Include $2.50 for postage and handling. Calif, residents add 6% tax. 



PHONE 
(714) 526-8435 



MICRO SOFTWARE SYSTEMS ^ 

1815 SMOKEWOOD AVE. • FULLERTON, CA 92631 



DEALER 
INQUIRIES 
WELCOME 



TRADEMARKS: VISIGRAPH, VISAGRAPH and DATAGRAPH are Registered Trademarks of MICRO SOFTWARE SYSTEMS. 

OTHER TRADEMARKS: VISICALC (VIS1CORP); TRS-80, TRSDOS, LINEPRINTER VIII (TANDY CORP); DIF (SOFTWARE ARTS INC): NEWDOS, NEWDOS80 (API'ARAT INC); DOSPLUS (MICRO-SYSTEMS 

SOFTWARE); MX-80'GRAFTRAX. MX-100 (EPSON OF AMERICA); NEC PC-8023A-C (NEC AMERICA INC); IDS 440-G (INTEGRAL DATA SYSTEMS); LNW80 (I.NW RESEARCH CORP) 



v'See List ol Advertisers on 
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The last example shows the form for 
obtaining roots. The cube root of 5 is 
obtained by 5* 1 % 3, the fourth root by 
5 * 1 % 4, and so on. 

Exponential Function (Monadic) 

An asterisk used as a monadic func- 
tion results in 2.71828 (e, the base for 
natural logarithms) raised to a power. 

Enter: * 1 
Result: 2.71828 

Enter: * 2 3 4 

Result: 7.38906 20.0855 54.5982 

Ceiling Function (Monadic) 

Typing shift and H followed by a 
number produces the next higher in- 
teger. 

Enter: |H 3.2 
Result: 4 

Enter: |H-3.2 
Result: -3 



Floor Function (Monadic) 

The shift key followed by L and a 
number returns the next lower integer. 
The floor function is useful for extract- 
ing the integer part of a positive 
number. 



Enter: «L3.6 
Result: 3 



Enter: 
Result: 



|L -3.6 
-4 



Maximum (Dyadic) 

This function shares its symbol (shift 
H) with the ceiling function. It can be 
used in several ways. 



Enter: 
Result: 



17 -H5 
17 



Enter: VEC1—123 4 
Enter: VEC1 _H 3 
Result: 3 3 3 4 



two numbers is returned. In the second 
example, each element of the vector, 
VEC1, is compared with 3. The vector 
returned contains the maximum result- 
ing from each comparison. 

Two vectors may be compared ele- 
ment by element, as in the following 
example: 



Enter: 
Enter: 



VEC2< 
VEC1 



-43 2 1 
,H VEC2 



Result: 4 3 3 4 

Minimum (Dyadic) 

The minimum function is used in the 
same ways as the maximum function. 
Its symbol, also used by the floor func- 
tion, is shift, L. 

Enter: VEC1 -L VEC2 
Result: 12 2 1 

Relational Operators 

These functions all yield a result that 
depends on the truth of the expression 
in which they are used. The result is a 
one if the expression is true, a zero if 
false. There are six relational functions; 
all are dyadic (see Table 1). 

Vectors, as well as scalars, may be 
compared using the relational func- 
tions. The result is a vector in which all 
elements are zeros or ones. 

Enter: V1^246 4 2 
Enter: VI = 4 
Result: 10 10 

The relational operators can also be 
used with literals. Since comparison in 
APL80 is made character by character, 
the literals compared must be the same 
length. 



Enter: 


Nl*~'JOHN JONES' 


Enter: 


N2— 'JOAN JOKES' 


Enter: 


Nl = N2 


Result: 


11011110 11 



Enter: N1>N2 

Result: 0010000100 



CHR$/ASC (Monadic) 

In the first example, the larger of the This function can be used in two 



Function 




APL80 Symbol 


Example 


Resi 


equals 




= 


5=8 





does not equal 




$ 


5$8 


1 


is greater than 




> 


5>2 


1 


is less than 




< 


5<8 


1 


is greater than or equal to 


shift Z 


5-Z8 





is less than or equal to 


shift K 


5-K8 


1 



Table 1. Relational Functions 



ways. The symbol # followed by a 
number returns an alphanumeric or 
graphics character. The symbol fol- 
lowed by a character within single 
quotes returns the ASCII code for that 
character. 



Enter: 


#'A' 


Result: 


65 


Enter: 


#43 


Result: 


+ 



The short program that follows il- 
lustrates how graphics are produced in 
APL80 by means of the # sign. Lines 1 
and 2 of Turtle assign a pair of vector 
variables containing the graphics codes 
to draw a turtle on the screen. Lines 3 
and 4 print the graphics blocks repre- 
sented by those codes. Call the function 
by typing Turtle. 

)DEF TURTLE 

1: ROW1^184 190 191 191 188 184 140 

2: ROW2*-130 129 128 128 131 

3: # ROW1 

4: # ROW2 

In APL80, some, but not all, of the 
screen control codes work with #. Three 
that do are: 

#23 (change to 32 CPL mode) 

#28 (return cursor to top of screen, change to 64 

CPL mode) 
#31 (clear to end of screen) 

For a large turtle, first enter #23, then 
call Turtle. To return to regular-size 
print, type #28. 

The combination of #28 and #3 1 can 
be used at the start of a program to clear 
the screen and begin at the top. 
Together they are equivalent to the 
Basic CLS command. 

In APL80, the # sign followed by a 
dash can be used in the same way as the 
Basic PRINT@ command. For exam- 
ple, #-960 moves the cursor to the begin- 
ning of the bottom line on the screen. 

The # sign can also be used to divide 
the screen into zones or fields. The code 
#3 gives 16-zone printing, #7 gives 
eight-zone printing, and #15 gives four- 
zone printing. Cancel zone printing by 
typing #255. 

Compression (Dyadic) 

This function uses the slash symbol. 
The argument on the left of the slash is a 
vector consisting of only ones or zeros. 
On the right is another variable contain- 
ing the same number of elements. The 
resulting vector consists of values from 
the second argument corresponding to 
ones in the array on the left. 
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WHY PAY MORE FOR LESS 

WHEN YOU CAN HAVE BOTH 

5" & 8" FLOPPIES 
FOR ONLY $169.95 



Some manufacturers charge you an arm and a leg for 
their Model-III# disk controller and then it only works 
with 5" floppy drives. 

Some manufacturers sell controllers with cheaply 
made PC boards. These boards have poorly plated holes 
that can sometimes become intermittent. None are UL 
approved. Check our features and compare. 

Almost none of the competitive boards have gold ' 
plated card edge connectors for reliability. 

Some manufacturers sell controllers with part of the 
power supply included on the PC board to generate ex- 
cessive heat to keep your disk controller warm on cold 
(and hot) days. 

Some manufacturers get creative with their data 
separator circuitry to save money. These data separators 
generally work only with single sided disk drives. 

Some manufacturers put only one connector on their 
PC board and give you a non-detachable umbilical cord 
hanging out the bottom to constantly get in your way. 




FDC-3C FEATURES 

□ Gold Plated Card Edge Connectors for Reliability D Proprietary Digital Phase Locked Lock 
Loop for NO MAINTENANCE operation with DOUBLE SIDED DRIVES D Fully compatible with 
the Model-III# computer system D Temperature Compensated Data Separator Circuitry 
D Aerospace grade PC board material D PC board material is UL Approved (R2 194V-0) G Con- 
trols 5Vt" Single and Double Density Drives □ Controls 8 Single and Double* * Density Drives 

□ Controls Double Sided Drives □ 180 Day Warranty □ Switching Power Supply & Installation 
Kit available at extra cost. :.»■ 



Partial Dealer Listing (* denotes distributor) 



B.T. Enterprises (NY) 
Compukit (Houston) 

"Data-Mail (LA) 
Freedom Technology (PA) 
Klf Computers (N. CA) 

"Level IV Products (Mich) 
Micro Data Supplies (Ohio) 
Micro Facts (Florida) 



(516)981-8568 
(713) 474-7342 
(213) 993-4804 
(215) 569-2381 
(707) 425-3472 
(313)525-6200 
(261)951-6502 
(813)876-4287 



Milo Systems (Mich) 

Micro Systems Software (Florida) 

Pioneer Electronics (Oregon) 

Racet Computes (LA) 

Stevens Radio Shack (PA) 

Texas Computer Syst. (Dallas) 

Traxx Computer (Chicago) 



(517) 487-4500 
(800) 327-8724 
(503) 668-8666 
(714) 997-4950 
(800) 345-6279 
(800) 433-5184 
(800)621-3102 



Dealer Inquiries Appreciated 



Attention OEMs and Manufacturers!!! 



Micro Mainframe can supply your component parts at attractive prices. We also have a series of 
switching power supplies available for both floppy and hard disk subsystems. Please call or 
write with your requirements. 

MICROMAINFRAME \. 

11325 Sunrise Gold Circle Building E 
Rancho Cordova, CA 95670 



(916)635-3997 



'Installation Kit and Power Supply available at extra coat. 
'Doable Density 8" Operation requires 4 MHz. CPU speedup. 



Enter: 
Result: 



1010 1/18 23 13 42 
18 13 



Compression also works with scalars, 
a property I will use further in the sec- 
tion on branching. 

Enter: 1/15 
Result: 15 

Literals can also be compressed, as in 
the following example: 

Enter: VOWELS^l 10 10 

Enter: ALPHA-' ABCDEFGHIJ' 

Enter: VOWELS/ALPHA 

Result: AEI 

Expansion (Dyadic) 

The expansion function uses the sym- 
bol shift W. It is used to insert zeros or 
spaces into a vector (numerical or 
literal). 



Enter: -Q—ALPHA- 
Enter: ^Q-EXVEO 



-'ABCDE' 

-10 10 10 10 10 
Enter: EXVEC f W ALPHA 
Result: ABCDE 



Editing 

You can edit functions by typing 



)EDIT followed by the function name. 
Let's use Turtle to demonstrate the edit 
mode in APL80. First, type and enter 
)EDIT TURTLE. The screen should 
appear as follows: 

0: TURTLE 

5: 

Now you can add to the program 
beginning with line 5. If you want to 
review the entire function first, type )? 
and lines 0-4 will be listed. Add the 
following lines: 

5: # ROWl 
6: # ROW2 
7: break 

Calling Turtle now results in two 
turtles being printed, one above the 
other. What if you want the two turtles 
on the same line? Unfortunately, you 
can't suppress the line feed in APL80 — 
but vectors can be catenated to produce 
two turtles in a row. Replace lines 3-6 as 
follows. 

Type )EDIT TURTLE, then )? to list 
the entire function. To revise line 3, type 
)3. Enter the new line 3. Replace the 
other lines in the same way. 




Now you can use computer technology to search the Bible on any subject. With 
THE WORD processor (including a disk copy of the complete KJV Bible text) you 
can create indexes on keywords. Or phrases. Even on concepts. 

A full spectrum of text search functions allows detailed analysis for the real stu- 
dent of the Bible. 

Print or display selected verses and/or 
references for personal study or Bible 
classes. Build your own computerized 
library of research material. 



THE WORD 

processor „. 



Bible Research Systems • 8804 Wildridge Drive • Austin, Texas 78759 • (512) 346-2181 

Requires 48K, 1 disk drive, APPLE, TRS-80, or IBM-PC* * *Plus $2.50 postage/handling 

* "Trademarks of APPLE Computer, Inc., Tandy Corp., and IBM Corp., respectively. 



3: ROW3HROW1, ROWl 
4: ROW4^ROW2, ROW2 
5: #ROW3 
6: #ROW4 
7: break 

Something is wrong with these 
turtles. Since ROW2 is shorter than 
ROWl, you must add spaces to make 
the vectors the same length. Return to 
the edit mode, enter )2 and retype the 
line, adding two 128s (the code for 
blank spaces) to the end of the ROW2 
vector. After making the change, press 
break to leave the edit mode. 

To delete a line, go to the line you 
want dropped and press break. Lines 
are automatically renumbered after a 
deletion. 

The APL80 tape version doesn't al- 
low you to insert lines — nor can you 
leave lines blank as you are writing 
functions. If you expect to need extra 
lines later, use comment lines. They can 
be revised into program lines later or de- 
leted if they are not needed. A comment 
line is produced by typing shift and C 
followed by a comment or by nothing 
at all. 

In the tape version of APL80, you 
can do three things with the editor: add 
lines, replace lines, or delete lines. The 
disk version has other edit commands 
that are described in the manual. 

One last point about the APL80 
editor: If you are editing a long pro- 
gram, the first part will scroll off of the 
screen when you type )?. You can stop 
the action by holding down the shift and 
the @ keys together. 

Logical Functions 

There are five logical functions: 
AND, OR, NOT, NAND, and NOR. 
All but one are dyadic. They are used to 
compare logical values (ones or zeros, 
representing truth or the presence of a 
condition). 

Logical AND (&) 

The logical AND function returns a 
one if the two values compared are both 
ones (both are true). Otherwise a zero is 
returned. 

Enter: & 
Result: 

Enter: & 1 
Result: 

Enter: 1 & 1 
Result: 1 

Enter: A-0 1 1 

Enter: B«-l 1 

Enter: A & B 

Result: 00 10 
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Logical OR (Shift V) 

If either of the logical values com- 
pared is true, a one is returned. A zero 
results only if both values are false. 



Enter: A |V B 
Result: 10 11 

Logical NOT (Shift N) 

This is the only monadic logical func- 
tion. It returns the negative of its logical 
argument. 

Enter: -N A 
Result: 110 

Logical NAND (Shift A) 

This is the reverse of the AND func- 
tion — a one results unless both values 
are true. 

Enter: A|AB 
Result: 110 1 

Logical NOR (Shift Y) 

This is the opposite of the logical OR 
function. 

Enter: A ,YB 
Result: 10 



Branching 

In an APL program, you can go to a 
specific statement by typing a right ar- 
row followed by the statement number. 

The short program that follows cre- 
ates an infinite loop. Each time state- 
ment 2 is reached, the instruction to 
return to statement 1 is executed. The 
program generates random integers 
between 1 and 18 until you press the 
break key. 

)DEF RANDOM 
1:? 18 

2: 1 

The next program (a variation of the 
Turtle program) creates a loop that will 
be executed seven times. This is ac- 
complished by the counter variable, IN- 
DEX. On each pass through the loop, 
the value of INDEX is increased by one. 
Statement 7 tests the value of INDEX to 
determine if it is less than eight. 

)DEF TURTLES 

1: ROWl*-184 190 191 191 188 184 140 

2: ROW2«-130 129 128 128 131 

3: INDEX^l 

4: ft ROW1 

5: tt ROW2 

6: INDEX*-INDEX + 1 

7:~- (INDEX < 8)/ 4 



Statement 7 can be read as "if IN- 
DEX is less than eight, go to statement 
4." It uses a relational operator to test 
the truth of (INDEX < 8). If that ex- 
pression is true, the compression 
operator (/) compares 1 and 4. Since 
1/4 returns a 4, execution passes to 
statement 4 to begin the loop again. If 
(INDEX < 8) is false, (INDEX < 8) / 4 
is evaluated as a null vector (a vector 
containing no elements). In that case, 
execution falls through to the next state- 
ment. In the above program there is no 
other statement, so the program ends. 

You can also write a program with a 
loop that will stop when a certain condi- 
tion is met. For example, (X > Y) / 
can be read as "if X is greater than Y, 
then stop." "Go to 0" always stops 
execution. 

The program Test, which follows, 
contains instructions to go to statement 
5 if X equals Y and to go to statement 4 
if X is greater than Y. If neither of those 
conditions is met, statement 3 is ex- 
ecuted. Program lines 3 and 4 contain 
multiple statements. The instruction -*6 
is a statement by itself, separated from 
the other statement on the same line by 
a semicolon. Since there is no statement 
6, execution stops. An arrow with no 
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P.O. BOX 5636 • STATION "A" • CALGARY • ALBERTA • CANADA • T2H 1Y1 



CANADIANS 

All our software now available 
at the lower American prices 



Some Examples 

■ Scarfman 23.95 

■ Defence Comm 19.95 

■ Robot Attack 19.95 

■ Space Castle 19.95 

■ Meteoroids 19.95 

■ NewDos80 2.0 149.95 

■ Mod III 16K-10%Off 

■ 5-1/4" Disks 34.95 

■ 3M8" Disks 49.95 

■ Green Screens 37.95 

■ Cables from 39.95 

■ Rams-16K 24.95 



Other Products At 
Similar Savings 

■ Cornsoft Group 

■ Big Five 

■ Apple Games 

■ Atari Comp Games 

■ Adventure Inter. 

■ Instant Software 

■ Med Systems 

■ Spectral Assoc. 

■ Sub Logic 

■ Modem 80 
II Printers 



MOST TRS-80 PROD 
AT 10% DISCOUNT 

Enclose cheque or 

Money order 

with all orders. 

Add 5% for Visa orders. 

Sorry no C.O.D.s 
No phone orders. 

ADD 1.50/ORDER 
FORSHIPR/HAND. 
3/4 WEEKS DEL. 




^See List of Advertisers on Page 435 
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ATArvlA M 

Data Manager 



MULTI-PURPOSE FILE HANDLER 
BUILD FILE IN MINUTES 
UNLIMITED BACKUP 
AUTO SCREEN FORMAT 

■ AUTO TOTALS & SUBTOTALS 

■ HANDLES NEARLY 3000 RECORDS 
1 FIELD TESTED OVER 1 YR 

' MODEL I OR III 

■ FORM LETTER WRITER/ADDRESS MERGE 
' SYSTEM REQ: 2 DRIVES. 48K 

1 ABSOLUTELY NO PROGRAMMING 
1 MULTIPLE FILES ON 1 DISK 
' COMPLETELY USER FRIENDLY 
• AUTO PRINT FORMAT 

■ MENU DRIVEN 




SORTS IN MINUTES — NOT HOURS 

USERS GUIDE ON DISK 

SUPPORTS EPSON, OKIDATA, RS PRINTERS 

AUTOMATIC COLUMN AVERAGING 

STATE MODEL & PRINTER WHEN ORDERING 

INFO, INQUIRY & ORDERS CALL: (305)894-1871 

VISA OR M/C ACCEPTED 

$69.95 

FLORIDA RESIDENTS ADD 5% 



A String Systems " 443 

1446 HAGEN LN, ROCKLEDGE, FL 32955 



PARENTS! 



Want to STIMULATE your 
child's LEARNING? 



LET T.C.E. SHOW YOU HOW! 



ALL PROGRAMS HAVE BEEN 'KID. PARENT, AND EDUCATOR TESTED 



PERSONALIZED A.B.C. (COMPLETE SET ONLY ON DISK) 
A.lPHAtET: Child nipond! to HI. RES. GRAPHICS 
B.ASIC MATH: Learning to ADD A SUBTRACT through counting 
COUNTING: U»«s GRAPHICS to r*pr«$«nt number* 

SEE a SPELL- IT 

Displays GRAPHICS to represent a word, child 

'ypos In the word; if wrong the correct spoiling flashes 






<^f 



CASSETTE UERSION 



.ftLSPHBET 



S19.95 



c.qcK 



TEACHING CLOCK 

The fun way to LEARN Tim* 

ENCLOSE YOUR CHILD'S NAME 8 

HAOE AN EOUCATIONfiL NEED URI'E US HfifBE 

UE TON HE; P 5 

trs-80 COLOR COMPUTER EDUCATOR 

^389 



DISK UERSION 



A.B.C. (SET) 



COUNTING 



TOT 

add 

$1.50 



■TRS-80 

isaTMof 

Tandy Corp 



R«g. »,fc 1 1 »t.nd«d Cglo7V!ir.: Ti? 



ICE. PROGRAMS INC. 

P. a Box 2477 
Gaithersburg,MO. 20879 

(301) 9633S48 



*ERBYPRO WDRDPRDCEBSDR* 

♦FEATURES 

*4 way cursor control. Repeat key. Scrolling. Machine language operation. 
♦Continous indication of line no. > cursor positioni and end of f i 1 e. 
♦Insert /delete character to end of paragraph. Insert/delete line or block. 
♦Block copy. Block nove. Global find. Compressed ASCII data storage. 
♦Parti al/coMPlete saves to disk or tape.Load and insert fro« disk or tape. 
♦Large data files can be processed with nxt costnd. Edit ASCII Basic files. 
♦Upper/lower case printout. Printout separates line at nearest word. 
♦Printout of specified lines to specified spacinst Margins, line length. 
♦Control of Printer with control characters. Headers. Page length control. 



♦ORDERING INFORMATION 
♦Send $29.95 Plus $3.88 for handling 
Check or Money order accepted. 






FGA Software 
" } 191 WoburnSt. 



For Model I or III 32K or 48K Disk or Tape 



Reading, MA 01867 
^'66(617)468-1634 



PROGRAM DISCS 

CLASSROOM TESTED APPROACHES TO 
A FIRST COMPUTER CLASS 

• INTRO TO BASIC 

Questions & Answers and Sample Programs 

• INTRO TO DATA PROCESSING 
Drill & Practice and Learning Games 

• LOWER DIVISION COLLEGE COURSE 

Vocabulary, Class Exercises, BASIC & Games 

DESIGNED TO SUPPLEMENT TRADITIONAL LEARNING 

$29.95 EACH-$75. THE SET C-CAL, P.O. Box 6413 

MODEL III ONLY ^325 King Station, Santa Ana, CA 92706 



statement number following also ends 
the program. 



)DEF TEST 


1 


-(X 


= Y)/5 


2 


-*(X > Y)/ 4 


3 


'X< Y*;— 6 


4 


'X > Y';— 6 


5 


'X = 


Y' 


Enter: 


X-5. 000001 


Enter: 


Y^5 


Enter: 


TEST 


Result: 


X>5 


Enter: 


X— 5.0000001 


Enter: 


TEST 




Result: 


X = Y 



Besides illustrating the program Test, 
the two examples above show that 
APL80 stores only seven significant 
digits. The value of X in the second ex- 
ample is equivalent to five, because the 
eighth digit is dropped internally. 

Two conditions are required in a 
branch statement, as in the examples 
that follow: 

-*( (X > Y) & v > W) / 

Read: "If X > Y and V > W, then stop." 

-*(0 = 1 ,JN)/5 

Read: "If N is an integer, go to statement 5." 

-(0 = 2 |J N) / 5 

Read: "If N is an even integer, go to statement 5." 

In APL80, the residue function can- 
not be used with negative numbers. In 
the last two examples, N must be 
positive. 

Labeled Branches 

Execution can be directed to a label 
rather than a statement number. This 
feature simplifies programming and 
editing, because lines do not have to be 
counted and changed as the program is 
developed. Labels also make a program 
easier to read. The program Test is 
rewritten below with labels. Any name 
that is not a variable can be used as a 
line label. The name must be followed 
by a colon and a statement. 

)DEF TEST 



-*(X = Y) / EQUALS 
-*(X > Y)/ GREATER 
4 X< Y' ;— 
GREATER: 'X > Y';-0 
EQUALS: 'X = Y' 



Next month we will consider APL 
program types and special functions. ■ 

Margaret Grothman can be reached 
at 5117 Denton Place, Madison, WI 
53711. 
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SOFTWARE you can BET ow 

ST 



I STUDS 



A live card slud program so realistic 
you'll swear you're facing six professionals 
You decide who's bluffing and who has 
the cards Your opponents learn 
your style and that of the others and 
modify their belting strategies as 
the game proceeds You can define Ihe 
players' characteristics to match those 
ol your Friday night poker club or let your 
computer detine them randomly 

Only $15.00 



TOUT 3 

A vastly improved version ol the 
original TOUT horse race handicapper 
Now. thousands ol races are simu- 
lated in seconds to give you each 
horse's probability ol winning and 
identily overlays Horses are 
screened using factors derived from 
an operations research study This 
handicapper outperlorms programs 
and calculators selling tor much more. 

Only $19.00 



DRAWS 



This is Ihe poker playing program lhal s 
getting the rave reviews 

"Alter a while each ol ihe simulated players 
lakes on its own individual peisonaiity - 
it's most uncanny DRAWS has delmitely 
sharpened my playing skills " I Lloyd 
Martin 80 Microcomputing. Jan 1982) 
"/( you tike playing poker, buy this program 
II will be a long lime before a better one 
comes along.' (Richard Clope Computer 
Shopper. Jan 198?) 

Only S20.00 



TRADE IN your old advertised handicapping and poker- All programs on cassette lor Level II 16K (Models I and III) 

playing programs and receive a $6.00 credit include original Loading guaranteed. Add $3.50 to get one or more programs on 
cassette/disk and documentation with your order a lormatted diskette. Pa. residents add 6% sales tax 

WILSON ^192 

_ . _ . , , TRS-80 is a Tandy Corporation trademark. 

Software Division • 539 Springhouse Lane • Camp Hill, PA 17011 



STATEMENT OF 7 OWNERSHIP, MANAGE- 
MENT AND CIRCULATION 
1. Title of publication, 80 Micro. A. ISSN 
07447868 2. Date of filing, Oct. 1, 1982. 3. Fre- 
quency of Issue, Monthly. A. No. of issues pub- 
lished annually, 12. B. Annual subscription price, 
$25.00. 4. Location of known office of publica- 
tion, 80 Pine Street, Peterborough, Hillsboro 
County, NH 03458. 5. Location of headquarters or 
general business offices of the publishers, Same. 6. 
Names and complete addresses of publisher, edi- 
tor, and managing editor. Publisher and Editor, 
Wayne Green, 80 Pine Street, Peterborough, NH 
03458. Managing Editor, Eric Maloncy, 22A Pine 
Street, Peterborough, NH 03458. 7. Owner, 
1001001 Inc., Peterborough, NH 03458. Stock- 
holders, Wayne Green, Peterborough, NH 03458. 
8. Known bondholders, mortgagees, and other 
security holders owning or holding 1 percent or 
more of total amount of bonds, mortgages or other 
securities. None. 9. For completion by nonprofit 



organizations authorized to mail at special rates 
(Section 41 1.3 DMM). The purpose, function and 
nonprofit status of this organization and the ex- 
empt status for Federal income tax purposes 
(Check one) Not applicable. 10. Extent and nature 
of circulation. (X) Average No. copies each issue 
during preceding 12 months. (Y) Actual No. copies 
of single issue published nearest to filing date. A. 
Total no. of copies printed (X) 1 16,207 (Y) 136,935 
B. Paid circulation 1. Sales through dealers and 
carriers, street vendors and counter sales, (X) 
34,899 (Y) 48,775 2. Mail subscription (X) 65,184 
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I PDBSoft I 
Eictllnct in IkohiciI Soda 



LINEAR CONTROL SYSTEMS 

Stat* Variable Analysis — »25 

Advanced S. V. Analysis — S25 

Transfer Function Anal. — S25 

Al 1 Three »60 

ACTIVE FILTER DESIGN 

Butterworth l> Chebychev I - »17 

Chebychev II SI 7 

Elliptic S17 

Al 1 Three »40 

* Professional Programmers 

* Fast Machine Language 

» Tape or Disk (Specify) 

Tape Assumes Non-DOS System 

* For Disk Specify DOS 

« Model I or III (Specify) 
Minimum 48K ram 

* Output to Video or Printer 
or Both 

* Write for Catalog 

» Update PABSoft Software to 
Different Computer for 1/3 
the Price 

PAB Software, Inc. 
P.O. Box 13377 

Fort Wayne, Indiana 46883 



^ 



nn oPEn nno shut case \ 

FOR COmPUTERS 



RS204 




Your sizable investment in your computer should be protected. If you have 
to load and unload your computer every time you want to move it, you 
must consider the possible damage. Computer Case Company has solved 
your computer protection problem. Once your equipment is safely inside 
the attache-style carrying case, it never has to be taken out again. Simply 
remove the lid, connect the power, and operate. For storage, disconnect 
the power, enclose your disks, working papers, and manuals in the 
compartments provided, and attach the lid. Case closed. Judge for yourself. 

CALL TOLL FREE: (800) 848-7548 

• RS201 TRS-80 Model I, Expansion Unit & Drives S109 

• RS202 TRS-80 Monitor or TV set 84 

• RS204 TRS-80 Model III 129 

• RS205 Radio Shack Color Computer 89 

• P401 Paper Tiger 440/445/460 99 

• P402 Line Printer ll/IV 89 

• P403 Epson MX70. MX80 or IBM Matrix 89 

• P404 Epson MX1 00 99 

• CC80 Matching Attache Case (5") 85 

• CC90 Matching Attache Case (3") 75 

• CC91 Matching Accessory Case 95 



5650 Indian Mound Court • Columbus, Ohio 43213 • (614) 868-9464 — ^— j 
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TECHNIQUE 



Cassette Merge 



by John Nicolettos 



Y 



ou can combine old Color Computer programs 
with new ones. This technique tells you how, 
and you won't have to retype anything. 



POINTER 
VALUE 


DECIMAL 
ADDRESS 

1 — 32767 




LOCATION 
CONTENTS 




16383 


PROGRAM AND VARIABLE 
STORAGE 


(54)(l) 


1382 5 — 

PAGE 8 




PCLEAR-8 


(48MI) 


12289 — 

PAGE 7 




PCLEAR-7 


(42MI) 


10573 

PAGE 6 




PCLEAR -6 


(36X1) 


9217 1 

PAGE 5 




PCLEAR -5 


(30HI) 


7681 

PAGE 4 




PCLEAR -4 


(24)0) 


6145 

PAGE 3 




PCLEAR -3 


(I8)(l) 


4609 

PAGE 2 




PCLEAR -2 


(12)0) 


3073 

PAGE 1 




PCLEAR -1 


(6)(l) 


1537 










TEXT 


SCREEN 




1024 — 










SYSTEM USE 
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Fig. I. Simplified Memory Map for the Color Computer 
80 Micro, January 1983 



I was frustrated by my inability to 
merge Color Computer cassette pro- 
grams. The thought of being able to 
blend the best features of my old pro- 
grams into new ones, without retyping, 
became more than I could bear. So I 
gathered all the technical information I 
could find and sat down in front of my 
Color Computer, vowing not to move 
until I could merge my cassette pro- 
grams. After a great deal of reading, 
PEEKing and POKEing I developed 
the following simple cassette merge 
technique. 

Basic and the Color Computer 

Figure 1 shows a simplified memory 
map for a Color Computer with Ex- 
tended Basic. Locations 0-1023 are 
used by the Color Computer for sys- 
tem functions. Locations 1024-1535 
store the text screen information and 
locations 1537-13,824 are reserved for 
graphic displays. This area is divided 
into eight 1,536-byte pages. The 
PCLEAR command determines how 
much memory will be reserved for 
graphics. A PCLEAR 1 reserves 1,536 
bytes while PCLEAR 8 reserves 8 by 
1,536 or 12,288 bytes. 

The Extended Basic version of the 
Color Computer automatically does a 
PCLEAR 4 when first turned on. If the 
Color Computer's status is not. 
changed by another PCLEAR com- 
mand, then Basic programs start load- 



The Key Box 

Color Computer 
32KRAM 
Extended Color Basic 




64KCP/M2.2 
FOR MODEL III 

$299. 




SpellGuard 




Now you can run WordStar, SuperCalc, 
SpellGuard, MailMerge and other CP/M 
based software on your TRS-80 Model III. 

And walk away with incredible savings. 

Memory Merchants new Shuffleboard 
III is the first and only 64K CP/M 2.2 
system available for your Model III. 

SOPHISTICATED DESIGN 

The Shuffleboard Ill's advanced design 
includes 16K of RAM, giving your Model 
III the power of full 64K CP/M 2.2, with- 
out interference of the ROM or the 
video memory 

COMPLETE CP/M SYSTEM 

The Shuffleboard III is not a kit, nor a 
skeleton. You will receive a top quality, 
high performance system that is shipped 
to you completely assembled, burned-in, 
tested and insured with one of the 
A industry's best warranties. 

■ EASY INSTALLATION & USE 

Illustrated step-by-step instructions 
insure fail-safe installation and reliable 
operation. No permanent modifications, 
cut traces or soldering is required. 

The Shuffleboard III easily plugs into 
two existing sockets inside your Model III. 
Simple keyboard commands switch 
between CP/M and normal TRS-80 
operation. 

NO RISK TRIAL 

We are so convinced that you will 
be absolutely delighted with your 
Shuffleboard III system that we offer 
a no risk trial. After purchasing the 
Shuffleboard III system, you may return it 
(intact) for any reason within 15 days 
after shipment and we will refund the 
purchase price (less shipping). 

SHIPPED DIRECT FROM STOCK 

The Shuffleboard III is shipped to you 
direct from stock, normally within 48 
hours after receipt of your order. 

INTRODUCTORY PRICE 

For a limited time, Memory Merchant 
is offering the Shuffleboard III with CP/M 
2.2 at an introductory price of only $299. 

1 YEAR LIMITED WARRANTY 

The Shuffleboard Ill's reliability, through 
quality controlled production and proven 
performance, has enabled us to offer 
a full 1 year limited warranty. 

HOW TO ORDER 

Please send check, money order, VISA 
or MASTERCHARGE (add ICA #) with 
your order. Sorry, no C.O.D's. Specify 
quantity desired. Shipping and handling 
charge is $5.00 per board ($9.00 outside 
USA & Canada)* California residents 
add 6% or 6'/2% Sales Tax where applicable. 
Credit card purchases may be telephoned 
to (415) 483-1008. Order Today! 

OEM and DEALER inquiries invited. 
"Air Mail shipments to Canada & all other countries. 



w 



memory 
merchant 



14666 Doolittle Dr., San Leandro.CA 94577 
Telephone (415) 483-1008 _ 4 6i 

Trademarks: Shuffleboard Ill/Memory Merchant, TRS-80 Model Ill/Tandy Corporation; MailMerge; WordStar/MicroPro; SuperCalc/Sorcim; SpellGuard/ ISA, Inc.; CP/M 2.2/Digital Research 

Prices, terms and specifications are subject to change without notice. 



ing at location 7681 . Since the 4K Col- 
or Computer does not have the 
PCLEAR function, it starts loading 
Basic programs at 1537. 

The Basic program continues to fill 
memory from the bottom up until the 
program ends. Figure 2 shows that the 
Color Computer appends an end-of- 
Basic (EOB) flag and establishes a stor- 
age area for the program variables im- 
mediately following the flag. If the 
Color Computer had been command- 
ed into another PCLEAR mode, this 
process would take place at the loca- 
tions identified in Fig. 1. For example, 
a PCLEAR 1 command causes the Ba- 
sic program to load at 3073. 

Since a Basic program can reside in a 
number of different memory loca- 
tions, the Color Computer needs to de- 
termine the precise starting location. 
Memory locations 25 and 26 provide 
this information. Specifically, these lo- 
cations are two-byte pointers contain- 
ing the Basic program's start address. 
To see these locations in action, type 



UNUSED 
MEMORY 



VARIABLE 
STORAGE 



END OF 
BASIC FLAG 



END OF PROGRAM 



BASIC 
PROGRAM 



START OF PROGRAM 



GRAPHICS 

OR 

SYSTEM USE 



NEXT LINE 
ADDRESS 


CURRENT LINE 
NUMBER 


CODE FOR 

BASIC 

FUNCTION 



Fig. 3. Simplified Block Diagram of a Basic Program Line 



PRINT PEEK(25);PEEK(26). 

The Color Computer displays the 
numbers 30 and 1 for Extended Basic 
or 6 and 1 for Color Basic. These num- 
bers are decimal representations of the 
binary numbers stored in the two loca- 
tions. To translate these numbers into 
their decimal value you need to know 
which number represents the most sig- 
nificant byte (MSB). For the Color 
Computer, location 25 contains the 
most significant byte. To determine the 
decimal equivalent, multiply the value 
in location 25 by 256 and add the value 
from location 26 to the product. In our 
example, the decimal equivalent is 30 
x 256 + 1 = 7,681 for Extended 

4K, I6K, OR 32K 
END OF MEMORY 



2 BYTES (0,0) 



7681 EXTENDED BASIC 

OR 

1537 COLOR BASIC 



OOOO START OF MEMORY 



Fig. 2. Typical Basic Program in Memory 
312 • 80 Micro, January 1983 



Basic or 6 x 256 + 1 = 1,537 for 
Color Basic. 

In Fig. 1 you'll see that for 
PCLEAR 4 Basic starts at 7681 and the 
first free space in lower memory is 
1537. The pointer values and their dec- 
imal equivalents are included in Fig. 1 . 
If you have Extended Basic you can ex- 
ecute a different PCLEAR command, 
then check the pointer values in loca- 
tions 25 and 26 against those in Fig. 1. 
Figure 3 is a model of a Basic program 
line. The Color Computer stores three 
specific items for each program line. 
These items are shown as information 
blocks in Fig. 3. The first block is the 
address of the next program line; the 
second block is the current program 
line number and the last block contains 
a code number that represents the Ba- 
sic function to be performed. The Col- 
or Computer executes the Basic func- 
tion, then moves to the next address. 

Each block shown in Fig. 3 is made 
up of two bytes of information, so one 
program line requires at least six bytes 
of memory. These bytes are interpreted 
as most significant byte (MSB) and 
least significant byte (LSB). Complex 
functions can have many bytes of in- 
structions associated with them. The 
Color Computer steps through each 
line of the program until it arrives at 
the EOB flag. It is this linking of in- 
structions that provides the capability 
to merge cassette programs. To illus- 
trate this process enter 10 CLS. Find 
the start of Basic pointer by entering 
PRINT PEEK(25);PEEK(26). Then 
convert the pointer to a decimal ad- 
dress and PEEK at that and the next 
seven memory locations. Extended Ba- 
sic models at PCLEAR 4 display 30, 7, 
0, 10, 158, 0, 0, in locations 
7681-7688. Color Basic models display 
6, 7, 0, 10, 158, 0, 0, in locations 
1537-1544. 

The first two bytes are a pointer 
to the address of the next program 
line (7687 or 1543). The second 
two bytes are the current line number 
(10). The following byte (158) is the 
code for the CLS function. The zero 
after 1 58 indicates the end of the cur- 
rent program line. The final two bytes 
are the EOB flag (two consecutive 




Our Users asked for it, and we made the 
best TRS-80 disk assembler even better! 
Now M-ZAL has: 

■ Recursive MACROS with full symbolic parameter 
substitution 

■ Conditional assembly with unlimited nesting 

■ Text Editor warm-start/recovery option 

■ Support for all popular source file formats 

■ Load Module inspect/superzap using LINKER 

and the features that made it famous: 

■ True multi-pass assembly 

■ Full Screen Option Menus 

■ ENTRY/ EXTERN symbols, relocation, and object 
module linking 

■ 8 character labels with sorted symbol table 

■ Built-in symbol table cross-reference 

■ Nested "INCLUDES (source file chaining/nesting) 

■ Lower case support (Model 3 only) 

■ Over 175 pages of documentation including 
Z-80 Technical Manual 

■ Full Screen Text Editing and much, much more! 

M-ZAL provides a modular, structured development 
environment that makes programming your TRS-80 
a truly enjoyable experience. Order yours today. 
(Requires 32k, 2 disk system) 

#1050-10 Mod 1 $149.00 

# 1250-10 Mod 3 $149.00 

CAU Development Software- 
Full Screen Text Editor for BASIC: we were the first to 
give the TRS-80 this indispensable ability! A must for 
every BASIC programmer: 

#1210-20 Mod 18c 3 $29.95 

T-ZAL: custom designed for the Model 3, this tape 
based assembler has many of M-ZAL's most 
desired features. 

#1250-20 Mod 3 only $49.95 

XBUG: for machine language analysis and 
debugging— this tiny (2.5k) but powerful program 
lets you do it all! 

#1020-10 Mod 1 $19.95 

#1220-10 Mod 3 $19.95 

FILEXFER: transfer any disk file between two TRS-80s. 
Use direct cable link or RS modems. Mod 1 and 
Mod 3 can be mixed. RS-232 and disk reqd. 
#1040-10 Mod 1 and 3 $49.95 




"We've been using M-ZAL heavily for 
over two months now, and it's been 
worth its weight in gold," 

* / ■■ . —Chuck Tesler 

PROSOFT 

"...well written software fhat is long 

Overdue." -Bruce Douglass 

80 Microcomputing 
BASIC Editor Review 

"During the first 3 days of use, M-Z/ 
saved more money in programmei 
time than we had paid for the 

)fOdUCt." —William Denrnan 

Author of Asylum 
MED SYSTEMS 

"The editor has at least doubled my 
productive capacity. .Having spent 
)ood deal of money on so called 
'utilities' that don't work, it's a delight 
to find one that not only lives up to 
:laims but surpasses the advertising: 

—BASIC Editor user 



Our choice 


for the best TRS-80 DOS: 


DOSPLUS 3.4 


Modi 


$149.00 


DOSPLUS 3.4 


Mod 3 


$149.00 



Call or write for more information, 
All products require level II. 
Mail orders specify catalog #. 
Send check, money order, or MC/VISA 
numbers and expiration date to: 

Computer Applications Unlimited 

P.O. Box 214, Dept. ABM Rye, New York 10580 

(914) 937 6286 

N.Y.I State residents add applicable sales tax. 
Outside USA and Canada add $ 1 0,00 shipping. 
Dealer Inquiries Invited, tr X 1 

[MactofCard] 

ni I COMPUTER 



tA/i 



APPLICATIONS 
UNLIMITED. 



i dlv of CAU, Inc. 



TRS-80 is a TM of Tandy Corp. M-ZAL is a TM of CAU, Inc. 
Z-80 is a TM of Zilog, Inc. 
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zeros). Notice that the address identi- 
fied by the first two bytes is the EOB 
flag address, which is the next (and 
last) line of the program. 

Locations 27 and 28 store the end- 
of-Basic pointer in a manner similar to 
the way locations 25 and 26 store the 
beginning-of-Basic pointer. PEEK at 
these two values; you should get either 
6,9 or 30,9 for this one-line program. 
This address is the very next memory 
location after the EOB flag. 

The Cassette Merge Procedure 

We now have the knowledge to un- 
derstand the cassette merge procedure. 
The first program is CLOADed into 
memory. We know the Color Comput- 
er adds a two-byte EOB flag to the pro- 
gram. We also know that the program 
daisy-chains its way to this point. We 
can serve two purposes by starting the 
second program at the EOB flag ad- 
dress. First, the EOB flag is overwrit- 
ten; next, the first program automatic- 
ally feeds into the second program. 
The Color Computer then appends 
another EOB flag at the end of the sec- 
ond program, reserves variable space, 
and executes both programs as though 
they were one. 

Table 1 lists the six steps required to 
merge two cassette programs. These 
steps mechanize the process described 
earlier. With a little experience the 
steps become automatic and the entire 
process takes only a little more time 
than CLOADing the two cassette pro- 
grams. The following example illus- 
trates the process by merging two sim- 
ple programs. Type and CSAVE the 
programs in Program Listings 1 and 2. 
Now CLOAD Listing 1 and find the 
start and end of Basic pointers by 
PEEKing locations 25,26,27 and 28. 
For Extended Basic Color Computers 
the following should be displayed: 30, 
1, 30, 69. While Color Basic displays: 
6, 1,6,69. 

You will not get 69 for the value in 



"With practice you 

can relocate 

program lines without 

retyping them. " 



location 28 unless you typed Listing 1 
exactly as shown. Each character, 
space or punctuation mark that's dif- 
ferent from Program Listing 1 causes a 
one-byte change in location 28. The 
absolute value 69 is not critical; so if 
your program is longer or shorter than 
Listing 1, use the number you got (as 
long as your program runs). 

To relocate the start of Basic pointer 
so the second program overwrites the 
EOB flag, enter POKE 26,67. If you're 
wondering where 67 came from, recall 
that locations 27 and 28 specify the 
end-of-Basic address, not the address 
of the EOB flag. You know the flag is 
two bytes long; therefore, you must 
subtract two from the value in location 
28 (least significant byte) to cause the 
second program to overwrite the EOB 
flag. The value in location 25 (most sig- 
nificant byte) is equal to value in loca- 
tion 27; therefore, it doesn't have to be 
changed. If you didn't get 69, then sub- 
tract two from whatever number you 
did get and POKE the result into loca- 
tion 26. You can now CLOAD the sec- 
ond program. At this point anything 
done to the second program, such as 
renumbering, does not affect the first 
program. Move the start-of-Basic 
pointer back to its original location by 
entering POKE 26,1. The cassette 
merge operation is now complete. You 
can list, run or CSAVE the merged 
programs. 

This technique isn't limited to merg- 



ing two cassette programs. You can use 
it to merge three or more programs, or 
as a page editor, to move blocks of Ba- 
sic program lines within a single pro- 
gram. This is tricky, but with practice 
you can relocate program lines without 
retyping them. 

Caution 

Make sure there's no conflict of line 
numbers. The Color Computer doesn't 
know how to handle two lines num- 
bered 10. The Color Computer cannot 
deal with line numbers that are not in 
ascending order. Make sure the second 
program starts with a line number 
greater than the last line number of the 
first program. Be careful about your 
new program flow; make sure the 
merged program performs as intended 
and that you did not inadvertently 
change the logic. Variables can also be 
a source of problems. Be extra careful 
with any variable used by both pro- 
grams. Finally, locate and confirm all 
transfers between the two programs. 

Owners of Extended Color Basic 
computers can get an additional 1,536 
bytes of program storage by using the 
techniques in this article. For some rea- 
son Radio Shack did not provide a 
PCLEAR capability for Extended 
Basic. Therefore, the Color Computer 
reserves 1,536 bytes of memory for 
graphics, even if the graphics capabili- 
ty is not used. Once again look at Fig. 
1, notice that the memory from 
1537-3072 is not used to store a Basic 
program. These 1,536 bytes can be 
used by changing the start of Basic 
pointer (locations 25 and 26) to 6, 1 or 
decimal 1537. Once you do this you'll 
lose any program in memory. There- 
fore, POKE these values into locations 
25 and 26 before you CLOAD your 
program. ■ 

John Nicolettos (8612 Snowden 
Loop, Laurel, MD 20708) enjoys 
photography and racquetball. 



1 . CLOAD first cassette program 

2. Find address for start and end of Basic 

PEEK at locations 25 and 26 (start) 
PEEK at locations 27 and 28 (end) 

3. Save these values for later use 

4. Relocate start of Basic to overwrite EOB flag 

POKE value found in 27 into 25 

POKE 2 less than value found in 28 into 26 

5. CLOAD second cassette program 

6. Relocate start of Basic to original location 

POKE original value (step 2.) back into 25 
POKE original value (step 2.) back into 26 

Table I. Cassette Merge Procedures 



10 CLS 




20 


1=1 




30 


PR1NT@262,"THIS IS PROGRAM NO.";I 


40 


FORT = 


TO 100: NEXT 
Program Listing 1 


100 CLS 




110 


1 = 1+1 




120 


PRINT@262,"THIS IS PROGRAM NO.";I 


130 


FORT = 


= 0TO 100: NEXT 


140 


GO TO 10 






Program Listing 2 
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TRS-80 



® 



2-Disk Model III 
#26-1066 $1849.00 




^^— ■■■ ■■■■ — — ^^ 

#26-3004 Color Computer 

$299.95 
#26-6001 TRS-80 Model 16 

$4099.00 

2%OFF! with cash 

BODEX CORP 

222 E. Main St. 
Marlboro, MA 01752 
(617)485-5115 



COLOR HI-RES 

GRAPHICS 

FOR THE TRS-80™ MODEL l-lll 
Create spectacular color 

graphic displays with your 
TRS-80 Model l-lll with 

COLOR GRAF 

Connects to the expansion port of 
your computer and uses your color 
TV for the graphics display. 

You control a color display that Includes: 

■ 256 x 1 92 pixel resolution 

■ 1 5 colors plus transparent 

■ 4 graphics modes 

■ easily movable animated patterns 

Complete documentation and software 
allows you to set each pixel, create 
patterns, draw lines, and much more! 

COLOR-GRAF comes in a IV?" x 6" x 3" 
cabinet complete with 40 pin connector, 
power supply, RF modulator, documen- 
tation and software. 

Model I, SI 95, Model III, S235. 
For information, or to order, write or call 

Solectronics 

400 Asbury Ave., Evanston, IL 60202 
(312)866-8737 .322 



ARRANGER 



100% Machine Language Disk Index Program 

for the TRS-80 Model l&lll. 

Automatically recognizes ALL major DOS's! 

The Arranger is a master index system that 
automatically records the names of your 
programs, what disks those programs are 
on and type of DOS. Features include — 

• Automatic single and double density 
recognition. 

• Accepts LDOS, DOS+, TRSDOS, 
DBLDOS, NEWDOS/80, MULTIDOS . . . 

• Works interchangeably with Model III, I 
double density. 

• Capacity of 200 disks, 44 filenames/disk 

• Quickly locates any amount of free 
granules 

• Finds a program in less than 30 seconds! 

• Alphabetizes 1500 filenames in 40 sees.! 

• Option to sort by any extension 
(/BAS./CMD,/???) 

• Easily updates diskettes previously 
added with only 2 keystrokes. 

• Backup function built in. 

• Uses 1 to 4 drives, 35, 40 or 80 tracks. 

• Radio Shack doubler compatible 
Requires 32k 

1 disk minimum 

JUST $29.95 

FREE SHIPPING 

Specify: TRS-80 Model number 

(If you've added double density to 
your Model I, please indicate) 

TRIPLED SOFTWARE ^ 

P.O. Box 642 

Layton, Utah 84041 VISA OR 

(801)546-2833 MASTERCARD 





We've done it again! 

We said we had the best system, and now... 
8" double density is here for Model Ill's. 



Check out these Features - 

«^568K of storage on a single sided 8 inch drive, when used with our controller & speedup MOD and DOS plus 3.4. 
,^The maximum storage capacity of your Model 3 will be 4.544 Megabytes - without a hard disk. ^One 5V< single 
sided and one 8 inch single sided drive will store 676K, with a full blown DOS plus 3.4. ^One 5V4 single sided and 
one 8 inch double sided drive will store 1.244 Megabytes, with a full blown DOS plus 3.4. •Mix and match 5V* and 
8 inch drives, in any density, single or double sided. - All under software control. 

We will also be able to provide DOS plus 3.4 on 8 inch diskettes. (Final price being negotiated). 

1. Speedup tor 8 inch drives only $89.00. 2. General purpose speed-up, which also works with 8 inch drives $129.00. 

Here's 3 good reasons to buy our system - 



1. VERSATILITY 

Our own proven, dependable drive controller will give you the 
hardware to run almost any drive contiguration you can imagine/ 

• 5% and 8 inch drives in any combination 

• Internal/external drive combinations (Up to all 4 drives external) 

• Single - and dual - headed drive combinations. 



DEALERS, WE HAVE DEALS FOR YOU TOO WRITE OR PHONE - 




2. QUALITY 

• We use quality drives - MPl and now new generation Siemens. 

• We construct our own disk drive installation kits ol heavy 
steel - no shielding Problems' 

• We are now using a field proven switching supply 



3 


PRICE 






• 


Drive controller kit with first drive . . . 


$679 


• 


Second (internal drive) 




$279 


• 


Third drive (5'/< Hippy with dablel . . . 


$359 


• 


Fourth drive (5'/< Hippy) . . . 




.... $329 


It these sound like good deals. 


but you 


don't have the Model III 


ye 


we ve got the answer. 






TRS-80 Model III, 48K TRS DOS 


2 drives 


$1899 



^P Proce// Control Technology 

^T 8030 Lorraine Ave., Suite 328 • Stockton, California 95210 • (209) 952-6576 



/ 



^See List ol Advertisers on Page 435 
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SEMES 



LOAD 80 



Bit Smitten— Part VI 



by Jay Chidsey 



A 



re your title and credit pages hard to read? 
This utility makes them easy to set up, and 
teaches you a thing or two about programming. 



I've often spent a frustrating half 
hour or more trying to get the title and 
credits page at the beginning of a pro- 
gram to look the way I wanted it to. Ta- 
ble 1 shows the 16 lines available on the 



Model I and III screens along with the 
corresponding PRINT @ number for 
the left margin of the screen on each 
line. Just add 10 or 15 to that left mar- 
gin number, and type each title and 



1 




2 




3 




4 




5 




6 




7 




8 




9 




10 




11 




12 




13 




14 




15 






Please Press Enter To Continue? 




Fig. 1. Screen Read for Formatting 



credit line in. You can adjust by sub- 
tracting from that PRINT @ value to 
move the line left, or adding to it to 
move the line right. The xxx in Table 1 is 
the suggested spacing for 2-6 lines 

Program Listing 1 offers a more ele- 
gant method for setting up a title and 
credits screen. If you start even one pro- 
gram per month, it will be worth your 
time to type this short utility into your 
machine and save it. It runs just a shade 
over 4K as is, but could fit into 4K by 
dropping most of the easy reading 
spaces; be sure to cut the Clear value to 
200 or less in line 80. Figures 1-3 
show how the program works in three 
important stages. 

This program is offered this month to 
illustrate several useful programming 
tips. Notice the unusual number of 
string Data lines at the end, running 
from lines 1000 to 1290. These 30 Data 
lines contain all the instructional ma- 



The Key Box 



Cassette or Disk Basic 
Model I or HI 
16K RAM 
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JPC PRODUCTS CO. 



Poor 
Floppy 

HIGH SPEED CASSETTE SYSTEM 



Now for the TRS-80 Color Computer 



The JPC Products High Speed Cassette System, 
in operation for over 4 years, is now available 
for all versions of the Radio Shack Color Computer. 

• TC-8C 

The TC-8C plugs directly into the expansion 
port of your TRS-80 Color Computer. It is fully 
compatible with all versions of the Color Computer 
from the Standard 4K up to the Extended 
32K systems. 

• FAST 

The TC-8C saves and loads files at more than 
twice the speed of the built in Color Computer 
system. 

• RELIABLE 

All of JPC Products high speed cassette systems 
have a proven reliability of less than one 
error in a million bits. 

• TWO DRIVES 

The TC-8C fully supports two cassette 
drives. Save and load through either drive by 
simple software selection. You can use 
standard Radio Shack CTR-80A tape recorders 
or their equivalent. 

• ALL FILE TYPES 

The CCCOS operating system allows you to 
save, load, verify or run both BASIC and 
machine language files. Data files are 
also supported. 

• MOTOR CONTROL 

On board relays are provided for both cassette 
ports on the TC-8C. 

• SPARE EPROM SOCKET 

The TC-8C has a spare EPROM socket on 
the board. You can install either 2716 or 2732 
EPROM's. This memory space can be used for 
any of your application programs or you 
could install the optional JPC Products 
monitor program - JBUG. 

TC-8C 

JBUG (EPROM) 

JBUG (CASSETTE) . . 



• JBUG MONITOR 

The JBUG Monitor is a 2K relocatable monitor 
program with fantastic features for the Color 
Computer user. 

• ASSEMBLER 

Line assemble any machine language program 
directly into memory using standard 6809 
assembly language mnemonics. 

• DIS-ASSEMBLER 
Dis-assemble any memory resident program 
(ROM or RAM) directly on the screen. 

• MEMORY MODIFY & LIST 
Modify memory directly or list memory in both 
HEX and ASCII. 

• BREAK POINT TRAPS 

Set, clear or continue from break points. 

• CASSETTE OR EPROM 

The TC-8C is not required in order to use the 
JBUG Monitor. It is available on cassette 
or a 2732 EPROM. 

• SUPERB DOCUMENTATION 

The TC-8C and the JBUG Monitor come with 
complete and extensive user manuals 
(JPC's documentation is praised almost as 
highly as our hardware and software). 
Complete command descriptions and 
background information are provided. 
Examples and sample programs are provided 
to help the novice and experienced 
individual take full advantage of the TC-8C 
and the JBUG Monitor. 

• READY TO GO 

The TC-8C comes completely assembled 
and tested with the CCCOS operating system. 
It is backed with a 30 day Money Back 
Guarantee and a 90 day Full Warranty. 

$129.95 

$34.95 

$29.95 



Terms: Cash, Master Card or Visa 

Shipping & Handling $ 3.50 (US) 
$5.50 (Canada) $15.00 (Foreign) 

Technical Inquiries: Phone 5:00 - 6:00 PM MST 




JPC PRODUCTS CO. 

Phone (505) 294-4623 
12021 Paisano Ct. N.E. 
Albuquerque, N.M. 87112 



• 42 



sSee List ol Advertisers on Page 435 



80 Micro, January 1983 • 317 





1 

2 
3 
4 


TITLE AND CREDITS 




6 
7 


FORMATTER 




9 
10 


By Jay Chidsey 


» 


12 
13 


Green Springs OH 44836 




15 


Please Press Enter To Continue? 
Fig. 2. Title and Credits Formatted in Lines 180-250 



216 




TITLE AND CREDITS 


412 




FORMATTER 


601 




By Jay Chidsey 


789 




Green Springs OH 44836 
Please Press Enter To Continue? 


Fig. 3. Formatted title and 


credits 


are displayed with proper PRINT @ numbers at left of screen 



terial presented in the program. The 
first set runs from line 1000 through 
1080, the second from line 1090 through 
1180, and the third from line 1190 
through 1290. Note how much easier it 
is to keep these lines about the same 
length for neat block appearance. Note 
also that I used the same array, A$(Q), 
to present the three information blocks 
at lines 90, 170, and 300. 

In each case the Data lines are first 
read into A$(Q) in a For. . .Next loop 
and then printed by a similar For . . . 
Next loop. Q is incremented by one on 
each pass through the loop, and thus 
produces a subscript larger by one on 
each pass. A single spacing command 
TAB(10) sets all the lines printed to be- 
gin in the same column on the screen. 
Note the commas in Data lines 1050, 
1 190 (fore and aft), and 1240; these are 
read as empty data entries, and create 
spacing lines on the screen. Commas 
can be used in Data lines, as illustrated 
in line 1210, if the entry is preceded by a 
quote (") or enclosed (" ") if more 
than one entry is placed on the Data 
line. The third information page con- 
sists of 15 lines, including blank spacers, 
and thus exceeds the TRS-80's auto- 
matic acceptance of up to 1 1 array sub- 
scripts (0-10). In line 80 the array field is 
dimensioned to 15. 



»OISIOI«iaiBIOIOIOIOIOIBIOIOIOIOIOIOtOIOIOI8IOlOIOIDiaiOiaiOiaiOIOIfiieiQIOI8IOtOIQIfitOIBI6IQI91OIOIOIOISIOIOIOIBI0l0IOI0ISlOiaiBIOI0IO 

reottiissivi: ismxronics 

>TRS-80* MOD-III COMPUTER. .2 DRIVE ,( 40 tr),A8K Ram $1699.00 

>DISK DRIVES. ..40 track, 5ms. step BARE $199.00 

COMPLETE with CASE and POWER SUPPLY $249.00 

>M0DEL III *** FIRST DRIVE INSTULATION KIT *** COMPLETE with 
MICRO-DESIGN controller board, (fully socketed) with schematic 
Power Supply, 1 DISK Dr., CABLES, and Mtg. Brks $399.00 

>MDX-2 MOD-I EXPANSION INTERFACE ready to run $469.95 

Bare board and manual ....$ 74 .95 complete parts kit. .$199.95 

■ We STOCK ALL MICRO DESIGN BOARDS and PARTS KITS... m 

>D0UBLERS for MICRO-DESIGN or RADIO SHACK* Expansions ... $99 . 00 
>CHARACTER GENERATORS (MOD-I) TRUE lower case decender s . $ 18 . 9 5 
>M0NITER ROM.. plugs into Z-80 socket ocupies the empty slot 

at 3000h in your Model-I $39.95 

>THE CURE., the ultimate DOUBLE DEN. data seperator $39.95 

PROGRESSIVE ELECTRONICS 

643 E. CHESTNUT ST 
LANCASTER, OHIO 43130 VISA 

PHONE 614-687-1019 HC. 

* TRADEMARKS of TANDY CORP . 

y' 143 



OIBIOIfiiaiOlfllOIOI8IBiaiOIOI0IBIBieiOI0l8IBIBIOI0IQI9IOIBI8IOIOlOI8l8IBIOIOieiOIOiaiBISl0IBl8l8l8IOIBIBiaiOiaiaf8IOIBI8iaiOI8ISIOIBII 



r^l 



m 



>i 




2 DRIVE MODEL II MASS STORAGE FROM inte»«atio«al ppP 

INSTRUMENTATION INC. |_j JJ; 

AT LAST! An Alternative to Radio Shack's Over-Priced, Model II Disk Expansion! 



The International Instrumentation FUNDAMENTAL 
DRIVE ENCLOSURE (FDE022) is the perfect altern- 
ative to RADIO SHACK'S expensive disk expansion 
package for the Model II. The FDE002 is designed to 
hold 2 Siemens, Shugarl or Qume compatible 8" 
floppy disk drives. The FDE002 has been designed 
with engineering features that put it far ahead of its 
class without sacrificing cost or quality. Best of all, 
the FDE002, with drives, data cable, and internal 
power cabling, is priced at just $795.00! 

8AIIIFDE002 Cabinet Only $360.00 



TWO SIEMENS 8" 

FLOPPY DISK DRIVES 

ONE IIIFDE002 CABINET 

AND ONE DATA CABLE 




OVER 1 MEGABYTE OF ADDITIONAL 
FLOPPY DISK STORAGE 

If Bought Separately: $875.00 

$795.00 

8APDBIIISIETRS 

Shipping Weignts 15 IBs ca on disk drives (shipped separalelyi 
23 lbs on llir-DfOO? 

■B j ffllliMm^m"l^i«l!i1gt !I li 1 1 1 1 1 UtlWMWW^B M 



FEATURES: 

• Connects directly to the disk expansion port on the back 
of your Modem, no hardware modifications are required - 
completely Model II compatible 

• Positive pressure forced air cooling for reliable disk drive operation 

• AC input via 3 wire 7 toot international cord/socket set 

• AC input EMI filtered to six amps to help prevent disk crashes due to 

power spikes and line noise 

• V aluminum rear panel with socketed power pass devices for cool 
trouble free power 

• 14 gauge mam chassis 

• Integral power supply with 5V@6A/-5V@1A/24V(8>6A 

• Double- sided custom PC power board and supply 

• Each DC supply and AC separately fused 

III TRSDOS UTILITY ENHANCEMENTS 

This package of 12 individually selectable utility programs is designed 
for the sophisticated Model II TRSD0S'" user Each utility is designed 
to increase system efficiency by overcoming the limitations of 
TRSDOS" Here are three examples. 

• Modifies TRSDOS'" 2.0 or 2.0A to run with DC motor disk drives 
such as the Tandon TM848-1 

• Elimination of password protection onTRSDOS" files to allow tot I 
user manipulation of these files 

• Changes TRSDOS'" step rate from 20ms t 1 2ms. user may adjust 
to as low as 6ms 

When purchased with the 
special package above: $50.00 

If purchased separately: 
8AIIIM2PATCH Supplied on 8" disk S99.95 

TRS80 Model II. TRS80 Model 16. TRSDOS. and Radio Shack are 
trademarks of Tandy Corp 



MORE PERIPHERALS FOR THE TRS-80 MODEL II 

Also For Your TRS-80 Models I and HI H ^- 
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DATACARD 
SGLWABER 

LINE MONITOR POWER 
CONDITIONERS 




Before you plug in your computer, you'd better 
consider how you are going to insure or pro- 
tect your investment from unwanted electrical 
pollution. 

DATAGARD Performance Specifications 





D63I5P, DG315S 
and DG3I5R 


DG115P and DG115S 


Maximum spike energy 
dissipation 


50 joules one time. 25 
loules repeated usage, 
sell restoring 


50 joules one time. 25 
loules repeated usage, 
self restoring 


Maximum spike voltage 


7 000 volts 


6.000 volts 


Clamping spike voltage 


55 volts 


1 55 volts 


Surge current 
clamping ratio 


No greater lhan 1.5 t 


No greater lhan ? 03 1 


Maximum spike current 
(For an 8 x 20 micro- 
second spike pulse) 


2.000 amps 


2.000 amps 


Clamping response 
lime 


10 nanosecond-- 
(10x10- 9 sec| 


10 nanoseconds 
(10xirr 9 sec) 


Noise reaction 
Filter network 
Frequency range 
Attenuation 


1KHZ 10 100 MHz 
20 10 40 0B 
voltage ratio) 




Mode noise protection 


Transverse and 
common 


— 


Leakage current 


Leakage lo ground lead 
does not exceed t 
rmcioamperes 


Leakage lo ground lead 
does not exceed 1 
microamperes 


0G115 SERIES 

SINGLE STAGE SPIKE PROTECTION 


MODEL DESCRIPTION INT. LIST 1-9 10-24 



8AWBRDG115P Wall unit plug in 2 $4995 $39.95 $34.95 

8AWBRDG115S fj outlet strip wSW&LT 3 S6» 95 $49.95 $42.00 

DG315 
3 STAGE SPIKE FILTER AND FOUR STAGE NOISE FILTER 

8AWBRDG315P Wall unit plug in 2 SI53 OS SI 19.95 $ 99.95 

8AWBR0G315S 6 outlet Strip w/SWS LI 3 S193.95 $149.95 S1 19.95 

8AWBR0G3I5R 6 Outlet lack w'SWSLT 8 S19395 $149.95 $119.95 




COMPUTERS 




5'A DISK CABINET FOR 
SINGLE OR DOUBLE DRIVES 

SIN6LE DOODLE 

5V.°.- 1 A 12Viai5A 5V@2A 12VjS3A 

Shipping Weight 5 lbs. Shipping Weight 9 lbs. 

8AJMRIC5 Single 5'A" Drive Cabinet $79.00 

8AJMR2C5 Dual 5 V Drive Cabinet $99.00 

DOAl 5'A CADINET WITH INTERNAL DATA CABLES 
8AJMR2C5C With Internal Data Cable $115.00 

landon 

5'A' FLOPPY DISK DRIVE 
40 TRACKS 48TPI DOUBLE DENSITY 



8ATND1001 Bare Drive 
Qty - 1 $195.00 ea. 

2 - 9 $180.00 ea. 

10-24 $170.00 ea. 

25+ $160.00 ea. 

OEM and Dealer Inquiries invited 
(Shipping Weight 4 lbs. each! 



MODEMS 



GD Hayes 



SMARTMODEM 




SEND $1.00 TODAY 

FOR THE NEW, FULL COLOR 

FALL 1982 ENGINEERING 

SELECTION GUIDE! 



PRIORITY 




The HAYES Smartmodem will alow you to take advantage of the many 
database services available for your TRS-80 such as Dow- Jones, the 
Source, and others. The Smartmodem runs directly off an RS232 serial 
port 

FEATURES: • Auto Answer, Auto Dial • Variable data formats • 0- 
300 baud • Internal Z8 Microprocessor with 2 Kb control program • 40 
character command buffer • Easy lo program with simple commands 
from your keyboard. 

PART NO. DESCRIPTION LIST PRICE SALE 

8ADCH0200P Smartmodem (Sh. Wt 6 lbs) S279 00 $225.00 
8ADCH0400P Smartmodem 1200 baud S69900 $649.00 

8ADCH0300P Chronograph (Sh Wt. 3 lbs) $24900 $205.00 

8ACNDRS2328F 8' RS232 Class 1 Cable $ 19.95 

THE STAR 

by 
PRENTICE 

• to 300 baud • Bell 103 and 1 13 '■' 

• Exclusive triple seal acoustic chamber 

• Self Test • Runs oft RS232 Port 
8APRNSTAB RS232.TTL20Ma Current Loop 
8ACN0RS2328F: 8' RS232 Class 1 Cable 

5 DISKETTES! 

SOFT SECTOR 

40 TRACK SINGLE SIDED 

DOUBLE DENSITY WITH 

HUB REINFORCING RINGS 

PACKAGE OF 10 $19.95 

- 477 BONUS! 

FREEH KASSETTE 10 
LIBRARY CASE WITH 
PACKAGE OF 10 DISKETTES 

A $4.25 VALUE!! 8APRI5SD0 (Sh. Wt. 2 lbs.) 

8APRI580 package ot 80 less Library Case $120.00 




ggoo $127.00 

$19.95 





ELECTRONICS 




9161 DEERING AVE • CHATSWORTH, CA9131 1 S?5^ 
ORDER TOLL FREE (800) 423-5922 CA, AK, HI CALL (213) 709-5464 

Terms US VISA. MC. BAG. Check. Money Order. U S Hinds Only CA residents add 6fe% Sales Tax MINIMUM PREPAID ORDERS15.00. Include MINIMUM 
SHIPPINGS HANDLING ol S3 00 lor Ihe lirst 3 lbs plus40t loi each additional pound Orders over 50 lbs. sent freight collect Just in case, please include your 
phone number Prices subject to change without notice We will do our best to maintain prices through January 15, 1983. Credit Card orders will be charged 
appropriate freight II you haven I received your rail 82 Engineering Selection Guide, send $1 00 lor your copy today! Sale prices are lor prepaid orders only 



1 













2 


64 










3 


128 






XXX 


XXX 


4 


192 




XXX 






5 


256 


XXX 


XXX 


XXX 


XXX 


6 


320 










7 


384 




XXX 




XXX 


8 


448 




XXX 


XXX 




9 


512 








XXX 


10 


576 


XXX 


XXX 


XXX 




11 


640 




XXX 




XXX 


12 


704 






XXX 




13 


768 




XXX 




XXX 


14 


832 










15 


896 










16 


960 




Press Enter To Continue? 
Table 1 







Q 


Dummy variable; For. . .Next loops 


A$(Q) 


Content of arrays for program instruction 


SI 


Vertical (line) location on screen of first line of title 


Tl 


Calculation of PRINT @ location, first line of title 


LI 


Screen location of PRINT @, first line of title 


Tl$ 


Content (in words) of first line of title 


YY 


Dummy variable for "To Continue" subroutine 


X 


Dummy variable for numbering of vertical lines (must reset to 0) 


C 


Counter for number of Title/Credit lines after the first 


S(C) 


INPUT of vertical (line) location of subsequent title lines 


T(C) 


Calculation of PRINT @ location, subsequent title lines 


L(C) 


Screen location of PRINT @, subsequent title lines 


T$(C) 


INPUT of content of subsequent title lines 


S(Q) 


Vertical (line) location of subsequent lines 


L(Q) 


PRINT @ location of subsequent lines 


T$(Q) 


Content of subsequent lines 




Table 2. Variables Used in Title Page Formatting Program 



Program Listing 1 
GOTO 10 

FOR N=l TO 15: PRINTgX, N: X = X + 64: NEXT: X=0 : RETURN 
PRINT @977, "Please Press ENTER To Continue";: INPUT YY: RETUR 



Zl$="PROGRAM TITLE": Z2$="AND CREDITS FORMATTER" 

Z3$="By Jay Chidsey": Z4$="Green Springs, Ohio 44836" 

Zl=210: Z2=330: Z3=594: Z4=710 

CLS: PRINT CHR$(23) @Z1, Zl$: PRINT @Z2, Z2$ 

PRINT @Z3, Z3$: PRINT @Z4, Z4$ 
70 PRINT @902, "PRESS ENTER TO CONTINUE";: INPUT YY 
80 CLEAR 1000: DIM A$(15): FOR Q=l TO 10: READ A$(Q) : NEXT 
85 CLS: PRINT: PRINT: PRINT 

90 FOR Q=l TO 10: PRINT TAB(10) A$(Q): NEXT: GOSUB 3: CLS 
100 GOSUB 2: GOSUB 3: CLS: PRINT: PRINT: PRINT 
110 PRINT "Please ENTER location of first screen line (1-15)";: 

INPUT SI 
115 IF SKI OR S>15 RESTORE: GOTO 80 
120 SI = (SI - 1) * 64: PRINT: PRINT 

130 PRINT "Please type in Title or first Title line": PRINT: INP 
UT Tl$ 

135 IF Tl$ = "" RESTORE: GOTO 80 
140 Tl = LEN(T1$): Tl = INT(Tl/2) 
150 CLS: LI = SI + 32 - Tl: PRINT @L1 , Tl$ 

160 FOR Q=l TO 9: READ A$(Q): NEXT: FOR Q=l TO 1000: NEXT 
170 FOR Q=l TO 9: PRINT TAB(10) A$(Q): NEXT: GOSUB 3: CLS 
180 GOSUB 2: PRINT @Ll , Tl$: GOSUB 3: C=l 
190 CLS: PRINT: PRINT: PRINT: C=C+1 

Listing continues 



Since the former content of A$ is 
written over and wiped out on each suc- 
ceeding use, you can reserve much less 
string space. The CLEAR 1000 at line 
80 is extravagant, but is no problem in a 
16K machine. The TRS-80's automatic 
CLEAR 50 is not enough. That 
CLEAR 1000 also nulls the strings in 
lines 10 and 20, to save further string 
space. 

The restore commands in lines 340 
and 370 deserve comment also. Once 
A$(Q) has read and printed the data 
and has nulled that information by re- 
placing it with new data, the data stack 
has been read out or used up. In line 340 
it is restored so that the user can loop 
back to the beginning of the program. 
In line 370 it is restored and then the top 
19 items are read but not stored so that 
the data beginning with line 1200 is 
available. 

Note lines 0-10. I always start a pro- 
gram with the line GOTO 10. This re- 
serves lines 1 -9 for subroutines that are 
frequently used. There are several ad- 
vantages to this technique: It requires a 
lesser number of bytes to GOSUB3 than 
it does to GOSUB 10000 and the com- 
puter finds the GOSUB right away, 
rather than having to scan every line 
from to 10000 to find the item — a sav- 
ing in execution time. If you're forget- 
ful or bad at keeping program develop- 
ment notes you always know where to 
look for the important subroutines — 
between lines 1 and 9. 

Lines 140 and 230 use Basic's LEN 
function, the computer's string length 
function. If you are going to center lines 
on the screen, you have to know how 
long each line is. LEN ( ) tells you. 
Then subtract 1/2 of LEN ( ) from the 
midpoint location in the line, and you 
can then center the title or credit entry. 
Use of the INTeger function gives a 
whole number, avoiding half spaces 
that the computer cannot use. Table 2 
records the variables used in this 
program. 

Useful Subroutines 

One of the subroutines I often in- 
clude in an instructional program, or in 
any case where several successive pages 
of material are to be presented. The 
space bar trigger is CHR$(32), and you 
set it up for the bottom of your screen: 

5 PRINT® 915, "Press SPACE BAR To 
Continue": 

6 K$ = INKEYS: IF K$< >CHR$(32)THEN 6 
ELSE RETURN 

Else is often useful in If instructions. 
Had I written IF xxxx GOTO 6, it 
would have been necessary to add line 7 
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"Oh No, 

It's going to take 
hours to make all 

those changes!" 



Don't let this happen to you too! 



Order your Editor NOW before you forget. This is one 
utility you can't do without. A must for beginner or 
advanced Basic programmers alike. 

Now type a whole screen full of program lines at a time. 
Move the cursor to any position on the screen and make 
changes as often as needed just by typing over an exist- 
ing line. 

Control Keys allow you to insert or delete characters, whi- 
le commands do such things as adding or deleting lines, or 
scrolling the screen display. 

Renumber command renumbers all program lines plus all 
references to program lines. 



EDIT VI. 3 Mod III Tape 
EDIT V2.0 Mod III Disk on 
EDIT V2.0 Mod III Disk on 



Tape 
Disk 



19.95 
21.95 
24.95 



des 



SOFTWARE 



86 Mansel Drive, Landing, N.J., 07850 

Tel. 201 398-8281 






tor the TRS-80 from Micro-Mega 



The Original GREEN-SCREEN 




The eye-pleasing Green-Screen fits over the front of your 
TRS-80 Video Display and gives you improved contrast with 
reduced glare. You get bright luminous green characters and 
graphics like those featured by more expensive CRT units. 
Don't confuse the Original Green-Screen with a piece of thin 
film stuck to the face of your video tube, such as that adver- 
tised by others. The Original Green-Screen is mounted in a full 
frame perfectly matched to the color and texture of the 
TRS-80 Video Display. It is attached with adhesive strips 
which do not mar your unit in any way. 

The full frame design of the Original Green-Screen "squares 
off" the face of your video display and greatly improves the 
overall appearance of your system. 

(Specify whether for Model I or Model III) 

THE GREEN-SCREEN $13.95 

Add $1.50 for postage and handling. 



Terms: Check or money order, no CODs or credit cards, please Add amount 
shown lor postage and handling to price ot the item. All items shipped within 48 
hours by lirst class or priority mail. Virginia residents, add 4% sales tax ^ig2 




Micro- Mega • P.O. Box B265 • Arlington, Va 222Q6 



TRS 80™ Model I & III 

External Mini Disk Drives 





Single Chassis w/Power Supply: 

Fully assembled silver chassis with external card edge connector for easy 
cable installation. Chassis includes power supply & one Tandon drive. 



TM 100-1 w/chassis 
TM 100-2 w/chassis 
TM 100-4 w/chassis 



S249 
$329 
$409 



Tandon Bare Drives: 

• TM100-1 $195 

5 'A", single sided, 40 TI?K, 48 TPI. Capable of single or 
double density 

• TM 100-2 



$265 

5 'A", double sided, 40 TRK, 48 TPI. Capable of single or 
double density 

TM 100-4 $359 

5'A". double sided, 80 TRK, 96 TPI. Capable of single or 
double density 



FREE SHIPPING 

ORDER MOW - TOLL FREE 

1-800-531-5475 

(512) 250-1523 in Texas 

"If we can't ship the next working day, 
we won't take the order." 



CompuAdd Corp. Visa, MasterCard, Money Order 

1 30 1 Research Blvd. £^™ ? dd 5% $a,es 
Suite 218 

. .. .,. ____,» TRS 80 is a Trademark of 

AUStin, Texas 78750 Tandy Corp. 



All hardware has a 120 Day Limited Warranty. 



^252 



sSee List of Advertisers on Page 435 
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GOTO 300 

= S(C) + 32 - T( 



Listing continued 
200 PRINT @195, "Please ENTER location of next Title/Credit line 

': INPUT S(C): S(C) = (S(C) - 1) * 64 
205 IF S(C) = OR S(C)<0 GOTO 300 
210 PRINT @389, "Type in and ENTER next line, or N if finished" 

: PRINT (2517,"";: INPUT T$(C) 
220 IF T$(C) = "N" OR T$(C) = "n" OR T$(C) = "" 
230 T(C) = LEN(T$(C)): T(C) = INT(T(C)/2): L(C) 
C) 

240 CLS: GOSUB 2: PRINT @Ll , Tl$: FOR Q=2 TO C: PRINT @L(Q) , T$( 
Q) : NEXT 

250 GOSUB 3: GOTO 190 

300 CLS: FOR Q=l TO 14: READ A$(Q): PRINTTAB(10) A$(Q): NEXT 
310 PRINT @970, "";: INPUT "ENTER 1 or 2"; YY 
320 IF YY=0 OR YY>2 GOTO 310 
330 ON YY GOTO 340, 350 
340 RESTORE: GOTO 80 

350 CLS: PRINT @Sl , Ll : PRINT @Ll , Tl$ 

360 FOR Q=2 TO (C-l) : PRINT @S(Q), L(Q) : PRINT @L(Q) , T$(Q): NEX 
T: GOSUB 3 

370 RESTORE: FOR Q=l TO 19: READ A$: NEXT: GOTO 3 00 
1000 DATA Next to be displayed on the screen are 
1010 DATA the sixteen lines which are available to 
1020 DATA you in formatting Titles and Credits for 
1030 DATA your program. Line 16 is reserved for the 
1040 DATA 'Press ENTER To Continue' line... so you 
1050 DATA have only 15 lines to work with. , 
1060 DATA Be prepared (before you press ENTER) to choose 
1070 DATA the first screen line you will want to use 
1080 DATA and to type that line in. 

1100 DATA When you press ENTER the 16 line page format 
1110 DATA will appear again... and you will be able to 
1120 DATA input the next line. After each such input 
1130 DATA the Title and Credit page as formatted so far 
1140 DATA will be presented. Enter an N when you have 
1150 DATA ended your entries of Title and Credit lines. 
1160 DATA At that point your page format will appear with 
1170 DATA numbers at the left indicating the PRINT AT or 
1180 DATA @ numbers you should use to achieve that format. 
1190 DATA , YOU HAVE A CHOICE AT THIS POINT IN THE PROGRAM , 
1200 DATA 1. You may return right now to begin over in 

DATA "choosing line locations and/or line content, or 
DATA 2. You may view the PRINT AT ( @ ) locations 
DATA for your lines and then return to this menu 
DATA to choose reformatting if you wish. , 
DATA The numbers at the left of the screen will be 
1260 DATA those you would type in as @ or PRINT AT to 
1270 DATA format your Title/Credits page as shown here. 
1280 DATA Locations can be moved to left or right by sub- 
1290 DATA tracting or adding to the @ given. 



121 
122 
123 
124 
125 



GOTO 10 

1 A$=INKEY$: S = 0: X=X+1 : IF AS = "" GOTO 1 

2 S = X/67: PRINT @768, "YOUR ANSWER, #" AS ", REQUIRED" 
INT(S * 100) / 100 "SECONDS": RETURN 

3 TS = TS + S: TM = INT(TS/6 0) : X = 

: PRINT "TOTAL TIME SO FAR ELAPSED: " TM "MINUTES AND" 

INT(TS - (TM * 60)) "PLUS SECONDS.": PRINT @980, 

"PRESS ENTER TO CONTINUE";: INPUT YY: RETURN 
10 A=0 
100 CLS: PRINT : PRINT: PRINT, 

"WHICH OF THESE IS A MAMMAL?": PRINT: PRINT 
110 PRINT, "1. SHARK": PRINT, "2. DUCK": PRINT, "3. WHALE" 

: PRINT, "4. BOA CONSTRICTOR": PRINT, "5. ALLIGATOR": GOSUB 1 
120 IF A$ = "3" GOTO 150 

130 PRINT @832, "SORRY, WRONG NUMBER.": GOSUB 3: GOTO 200 
150 PRINT @832, "RIGHT! THE WHALE IS A WARM BLOODED MAMMAL" 

: GOSUB 3 
200 CLS: PRINT: PRINT: PRINT, 

"WHICH OF THESE IS A EGG-LAYING MAMMAL?": PRINT 
210 PRINT, "1. BAT": PRINT, "2. PLATYPUS": PRINT, "3. MANATEE" 

: PRINT, "4. CROCODILE": PRINT, "5. ARCHEOPTERYX" : GOSUB 1 
220 IF A$ = "2" GOTO 250 

230 PRINT "NO GO THIS TIME.": GOSUB 3: GOTO 300 

250 PRINT "RIGHT! THE PLATYPUS OF AUSTRALIA IS THE ONLY EGG-LAYI 
NG MAMMAL . " : GOSUB 3 
300 CLS: PRINT "THIS BEING A DEMO PROGRAM, PRESS ENTER GO ON" 

: INPUT YY: GOTO 10 

Program Listing 2 



RETURN. Else saves a line and saves 
bytes. 

You can also use the INKEYS func- 
tion to strobe the keyboard and move 
on if any key is pressed: 

7 PRINT® 917 "Press Any Key To Continue": 

8 IF INKEYS = " " THEN 8 ELSE RETURN 

The " " following INKEYS (inkey 
string) must have no space between the 
quote marks; it represents a null string 
meaning no key was pressed during that 
strobe of the keyboard. 

I have not been able to find a way to 
position these two lines (space bar or 
any key) on the bottom line of the 
screen, say at 979 or 981 respectively. 

Add a Timer 

If you construct instructional pro- 
grams or game programs, you will find 
uses for a simple timer that records how 
long the program's user took to answer 
a question or to make some other re- 
quired response (see Program Listing 
2). Lines 1-3 are the timer program. 
Lines 100-300 present a simple quiz se- 
quence that loops back to line 100 from 
line 300 to permit demonstration of the 
time accumulation function. 

If you do not want to give the user the 
time used in each response, delete the 
part of the print section of line 2 that 
follows AS; if you do not want accumu- 
lated time displayed, delete the print 
section of line 3. You can use response 
time in ways that do not involve feed- 
back to the user; as a factor in determin- 
ing the final score, for example. 

The heart of the timer is S equals 
X/67 at the beginning of line 2. That 
formula works well in my Model III, 
but Model I programmers will have to 
adjust it for the slightly slower process- 
ing time of their machine. Run the pro- 
gram for a measured minute, or half 
hour, and adjust the formula. You can 
achieve great precision by going out to S 
equals X/59.2598 or some such deci- 
mal. Listing 2 as given accepts either 
one number (0-9) or one letter (A-Z) as 
a response. This is accepted on lines 120 
and 220. A program that accepts a 
word, such as mammal, or a multi-digit 
number, such as 98.6, is somewhat 
more complex. It was the timer that we 
were illustrating here. 

The Model III has a built-in clock, 
but I find it more difficult to set and ac- 
cess this function than to use the simple 
subroutine. ■ 



Jay Chidsey can be reached at 205 E. 
Adams St., Green Springs, OH 44836. 
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Innovation. . . 



MULTIDOS.. .C.EC.s deluxe disk operating system for the TRS 80 Model I and Model III. Has 
forty library commands, twelve utilities, a MIGHTY-MULTI mini-dos, supports three densities 
(MODEL I version), read/write to/from practically any DOS format and is compatible with most double 
density boards. Supports clock speeds up to 5.32 MHz. MULTIDOS has, standard, two super BASICs, 
including BBASIC, the popular "BOSS" single step king and a host of Basic program editing utilities. 
Versatile, user friendly, fast, efficient. Get into the world of DOS FANTASTIC!... $99. 95 

Z'DOS... economical disk operating system for TRS 80 Model I and Model III. Inexpensive and 
feature packed. Forty library commands, supports three densities (Model I version), read/write 
compatible with most DOS formats and double density boards. Has SUPERBASIC II with 41K of free 
memory, cross reference, renumber and global editing. The fastest DOS in town!... $39. 95 

EBASIC... extended disk Basic. Adds high-speed graphics, versatile special functions, twenty-four 
types of formatted keyboard INPUT, program line labeling, array operations, and multi-key SORT of 
unlimited arrays. All in low RAM along with Disk Basic and still leaves over 38K of free memory. 
EBASIC just... $29. 95 

(EBASIC requires Z'DOS or MULTIDOS Model I version 1.4 or greater, or MULTIDOS Model III 
version 1.3 or greater.) 

BOSS / RENUM90...Best operated single stepper. This machine language BASIC program 
debugging utility allows you to single step BASIC programs, trace in a controlled area on the display, 
trace to the line printer, save the screen and display variables, control program execution speed, save 
Basic programs to high RAM and insert breakpoints into your Basic program. RENUM90 allows you to 
renumber all or part of your Basic program. On tape or disk, BOSS/RENUM90 for $24.95 or 
BOSS only, $15.95 



— Available from the System Innovators — 

COSMOPOLITAN ELECTRONICS CORPORATION 

5700 PLYMOUTH ROAD 

ANN ARBOR, MICHIGAN 48105 

Telephone: (313) 668-6660 

Add $3.00 shipping/handling. Foreign orders add $10.00. Michigan residents add 4% sales tax. C.O.D. add $1.50. Model I orders 
specify single, double or P density. Personal checks take 2 weeks to clear. VISA & Master Card accepted. 

^58 







AUTHORIZED DEALERS 






ABC SALES 


COMPUTER SHACK 


POWER SOFT 


BYTES & NAILS 


SIMUTEK 


MICRO-PROG-80 


13349 Michigan Avenue 


1691 Eason 


1 1 500 Stemmons Expressway 


51 1 6th Avenue 


Computer Prod., Inc. 


PO. Box 606 


Dearborn, Ml 48126 


Pontiac, Ml 48054 


Dallas, TX 75229 


Sioux City, IA 51106 


4877 East Speedway 


Sunnymead, CA 92388 


(313) 581-2896 


(313) 673-2224 


(214) 484-2976 


(712)274-2348 


Tucson, AZ85712 


(714) 653-9429 




1-800-392-8881 


1-800-527-7432 




(602) 323-9391 
1-800-528-1149 





TRS-80 is a registered trademark of Tandy Corp. 
c'See List of Advertisers on Page 435 
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UTILITY 



Tape File Manager 



by Roger W. Faulds 









Program Listing 




00010 




DSEG 








00020 




THIS SET OF SUBROUTINES 


ARE AN ENHANCEMENT 


00030 


TO 


THE RESIDENT LI I 


OR DISK 


BASIC. IT ALLOWS 


00040 


THE 


USER TO 


MANAGE HIS DATA FILES ON TAPE BY 


00050 


THE 


USE OF A 1-12 CHARACTER FILE NAME AND A PHYSICAL 


00060 


TAPE 


LAYOUT 


SIMILAR 


TO THAT OF THE IBM VARIABLE 


00070 


BLOCKED DATA SET ORGANIZATION 




00080 




GLOBAL 


EQUATES 


& MISC MACROS 


00090 


PRSDOS 


EQU 


40 2DH 






00100 


CESTVC 


EQU 


4304H 


;USED TO 


DETERMINE MACHINE TYPE 


00110 I 


CEYBD 


EQU 


2BH 


;ROM KEYBOARD RTN 


00120 1 


/ARPTR 


EQU 


260DH 


;LOOK UP 


BASIC VARIABLE 


00130 


rYPE 


EQU 


40AFH 


.•VARIABLE TYPE KEPT HERE 


00140 


rRSBAS 


EQU 


5200H 


;DISK BASIC ENTRY POINT 


00150 


rasoFF 


EQU 


1371H 


; TRSDOS 


DISK VECTOR OFFSET 


00160 1 


TOOFF 


EQU 


2651H 


;NEWDOS/80 DISK VECTOR OFFSET 


00170 ] 


-,OAD 


EQU 


4430H 


;LOAD A 


CMD FILE 


001.80 ( 


:lose 


EQU 


4428H 


;DOS CLOSE 


00190 I 


)OSPRT 


EQU 


4467H 


; DISPLAY 


MESSAGE TILL CR 


00200 I 


:rror 


EQU 


28A7H 


; PRINT HL TIL=0 


00210 I 


ITAPE 


EQU 


0235H 


;READ BYTE FROM TAPE 


00220 I 


/TAPE 


EQU 


0264H 


; WRITE 1 


TO TAPE 


00230 I 


)EFDRV 


EQU 


0212H 


; DEFINE 


DRIVE 


00240 i 


5TOPIT 


EQU 


01F8H 


;STOP TAPE 


00250 I 


UJLDR 


EQU 


0296H 


;READ LEADER & SYNC 


00260 I 


)OSTOP 


EQU 


4049H 


;TOP OF 


HEM 


00270 I 


JEDIT 


EQU 


1A11H 


;EDIT LINE IN ERROR 


00280 I 


]RR 


EQU 


40 9 AH 


; BASIC ERR (1 BYTE) 


00290 I 


ENABLE 


EQU 


0FBH 


; ENABLE 


INTERRUPTS INSTR 


00300 1 


JEW 


EQU 


1B49H 


; BASIC NEW ADDR 


00310 I 


IESET 


MACRO 


FIELD 






00320 




LD 


HL,(A&FIELD) 




00330 




LD 


DE, (OFFSET) 




00340 




ADD 


HL,DE 






00350 




PUSH 


HL 






00360 




LD 


DE,V&FIELD 




00370 




LD 


BC,3 






00380 




PUSH 


BC 






00390 




LDIR 








00400 




POP 


BC 






00401 




POP 


DE 






00420 




LD 


HL,N&FIELD 




00430 




LDIR 








00440 




ENDM 








00010 E 


NTRY 


EQU 


S 




START OF INIT 


00020 




LD 


(PARMS) 


HL 


SAVE HL PARMS 


00030 




LD 


IX,FILEl+262 


POINT TO FILE2 


00040 




SET 


l,(IX+3) 




SET LOGICAL FILE2 


00050 




LD 


A,(TESTVC) 


PU VECTOR BYTE 


00060 




LD 


HL,NEW 




PERFORM A LEV II "NEW" 


00070 




PUSH 


HL 




PLACE AS RET 


00080 




CP 


X'll' 




RET IF BASIC2 


00090 




CALL 


Z,DISKBL 


USING DISK BASIC 


00100 




RESET 


OPEN 




ADD/MOVE OFFSET 


00110 




RESET 


CLOSE 




TO ALL 


00120 




RESET 


INPUT 




DISK BASIC 

Listing continues 



These four routines 
will increase the 
speed with which your buf- 
fer reads and writes data. 

Tape File Manager (TFM) includes 
four subroutines that were designed for 
a Level II nondisk TRS-80 to reduce the 
time needed for reading and writing 
large amounts of data to and from the 
cassette recorder. 

The routines will enhance the tape 
operation of a TRS-80, with or without 
a disk system or expansion interface, 
and provide the user with the following 
enhancements to Level II Basic: 
OPEN# + n (readies a tape file for use); 
INPUT#+n (reads data from a TFM 
tape file); PRINT#+n (outputs data 
from variables to the tape file); 
CLOSE#+n (finishes processing the 
file); and it eliminates the need for 
special tape programming, such as 
packing data before printing it to tape. 

Tape File Manager also increases the 
efficiency of the original cassette hard- 
ware by using programming techniques I 
learned while working with various IBM 
data-management access methods. The 
benefits of TFM include the following: 

• TFM buffers data into a 256-byte 
buffer before writing the data to 
the tape. 

• You can have two files open concur- 
rently, even if you have no expansion 
interface. 



The Key Box 

Model I 
16KRAM 
Assembly Language 
MACRO-80 Editor/ Assembler 
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PROGRAMMING TOOLS FOR YOUR 
TRS-80® MODEL I AND MODEL III 



INSTANT ASSEMBLER 

The INSTANT ASSEMBLER is a powerful disk or tape- based assembler and debugger for 
the TRS-80. Now you can assemble directly to memory and immediately debug your 
program with the built in single stepping debugger. Quickly switch from assembler to 
debugger and back again without losing the source code. This feature makes INSTANT 
ASSEMBLER an excellent learning tool for assembly language programming. 
INSTANT ASSEMBLER is absolutely unique among tape based assemblers in that it 
produces relocatable code modules that can be linked with the separate LINKING LOADER, 
which is supplied in two versions for loading programs into either high or low RAM. This lets 
you build long programs with small modules. INSTANT ASSEMBLER also features im- 
mediate detection of errors as the source code is entered, a compactly coded source format 
that uses 1/3 as much memory as standard source, and many operational features including 
single stroke entry of DEFB and DEFW, pinpoint control of listings, alphabetic listing of 
symbol table, separate commands for listing error lines or the symbol table, block move 
function, and verification of source tapes. 

INSTANT ASSEMBLER'S debugger provides single stepping with full register displays, 
decimal or hex entry of addresses, forward or backward memory displays, disassembly of 
object code in memory, memory display in ASCII format, and hex-to-decimal or decimal- 
to-hex conversion. The single-stepper will step one instruction at a time or at a fast rate to any 
defined address. 

INSTANT ASSEMBLER occupies less than 8400 bytes of memory. In a 16K machine this 
will leave you enough memory to write assembly language programs of around 2000 bytes. 
This and its module-linking feature make INSTANT ASSEMBLER ideal for users with only 
16K machines. The instruction manual may be purchased separately for $5, which will apply 
towards the purchase of the INSTANT ASSEMBLER. In addition to disk I/O, the disk version 
includes a stand-alone version of the debugger program MICROMIND. 

Specify Model I or Model HI. TAPE INTASM $29.95 on tape 

Specify Model I or Model III. DISK INTASM $35.95 on disk 

INSIDE LEVEL II 

The Programmers Guide to the TRS-80 ROMS 

INSIDE LEVEL II is a comprehensive reference guide to the Model I and Model III ROMs 
which allows the machine language or Basic programmer to easily utilize the sophisticated 
routines they contain. Concisely explains set-ups, calling sequences, and variable passage 
for number conversion, arithmetic operations, and mathematical functions, as well as 
keyboard, tape, and video routines. Part II presents an entirely new composite program 
structure which loads under the SYSTEM command and executes in both Basic and machine 
code with the speed and efficiency of a compiler. In addition, the 18 chapters include a large 
body of other information useful to the programmer including tape formats, RAM useage, 
relocation of Basic programs, USR call expansion, creating SYSTEM tapes of your own 
programs, interfacing of Basic variables directly with machine code, and special precautions 
for disk systems. INSIDE LEVEL II was reviewed in the April 1982 issue of 80 Micro which 
said "The book has no flaws; it is a perfect gem. " Byte Magazine said "I recommend this book 
to serious machine language programmers." 
Includes updates for Model III. INSIDE LEVEL II $15.95 

SINGLE STEP THROUGH RAM OR ROM 

STEP80 allows you to step through any machine language program one instruction at a time, 
and see the address, hexadecimal value, Zilog mnemonic, register contents, and step count 
for each instruction. The top 14 lines of the video screen are left unaltered so that the "target 
program" may perform its display functions unobstructed. STEP80 will follow program flow 
right into the ROMs, and is an invaluable aid in learning how the ROM routines function. 
Commands include step (trace), disassemble, run in step mode at variable step rate, display 
or alter memory or CPU registers, jump to memory location, execute a CALL, set break- 
points in RAM or ROM, write SYSTEM tapes, and relocate to any page in RAM. The display 
may also be routed to your line printer through the device control block so custom print 
drivers are automatically supported. 
Specify Model I or Model III. STEP80 $16.95 on tape, $21.95 on disk 

DUPLICATE SYSTEM TAPES WITH CLONE 

Make duplicate copies of almost any tape including Basic, SYSTEM, data lists, assembler 
source, or "custom loaders". The file name, load address, entry point, and every byte (in 
ASCII format) are displayed on the video screen. Model III version allows changing tape 
speed so you can make 1500 baud copies of 500 baud programs like SCRIPSIT 
Specify Model I or Model III. CLONE $16.95 on tape, $21.95 on disk 

RESTORE DAMAGED TAPES WITH RESQ2 

RESQ2 will repair cassette tapes that can no longer be loaded because of "crashed" data. It 
can restore BASIC. SYSTEM. ASSEMBLER, and DATA tapes. RESQ2 compares two copies 
of the damaged tape to attempt a restoration, though restoration can often be accomplished 
with only one copy. After the damaged data is corrected in memory, a new tape may be 
recorded and verified which does not contain any errors. The success rate of RESQ2 will 
depend on the severity and quantity of errors. RESQ2 comes with a comprehensive user 
manual and examples of two types of "crashed" programs to practice on. 
Specify Model I or Model III. RESQ2 $19.95 on tape 



DISK INDEX VERSION 3 

Our excellent disk indexing program has now been entirely rewritten in machine language. 
DISK INDEX will assemble a master index of your entire program library by automatically 
reading the program names and free space from each disk. The index may then be 
alphabetized or searched for any disk, program, or extension. It will alphabetize 2400 
programs in less than 50 seconds and will find any program out of 2400 in less than 3 
seconds. Disks or programs may be added or deleted manually, and the whole index or any 
selected part may be printed on paper in several different formats. The index itself may also 
be stored on disk for future access and update. A 48K machine will hold up to 255 disks and 
over 2400 programs in each index, and you may build as many indexes as you need. There is 
no limit to the number of filenames it can read on any one disk. It will run on either a Model 1 
or Model III and catalog disks for either machine regardless of which one is running it, though 
Model I owners must have double density to catalog Model 111 disks. It will automatically 
recognize any DOS and disk density. DISK INDEX works with any operating system written 
for the Model I or Model III except CP/M, and is extremely fast and easy to use. 
Specify Model I or Model III. DISK INDEX VERSION 3 $29.95 on disk 

TELCOM II 

Our popular smart terminal program has just gotten a lot smarter. After two years of 
experience with TELCOM and many requests from customers, we have created TELCOM II 
for the most demanding telecommunications applications. TELCOM II maintains the same 
ease of operation and all the features of our original program (see below), and includes many 
enhancements. The terminal mode now has a help menu, a large spooler for simultaneous 
printer output at high baud rates, acknowledges receipt of all commands, and displays 
control characters. You can now load disk files into the memory buffer from within the 
terminal mode, transmit the buffer with a single command, and send files a line at a time. You 
can even view the buffer or data that has already scrolled off the screen. TELCOM II has 10 
different 40 character programmable messages that can each be sent with a single command, 
and the messages can now include control codes and delays. It also has 5 different character 
translation tables for compatibility with different systems. One of the most substantial 
additions to TELCOM is a full protocol file transfer mode which is compatible with the LYNC 
program available on CP/M systems and the IBM PC. TELCOM II will exchange disk files 
with any computer running this protocol (including another TRS-80 running TELCOM II), 
and will automatically correct errors in transmission! Files can be sent to or fetched from an 
unattended computer with ZERO errors. The extreme ease of use TELCOM is known for has 
not been compromised. Reconfiguration of the programmable features is done internally 
from clear menus for fast, easy operation. TELCOM II comes with a comprehensive 
instruction manual which is available separately for $5 (which will apply to subsequent 
purchase of the program), You won't find a smarter or easier to use terminal program at any 
price. 
Specify Model I or Model HI. TELCOM II $69.95 on disk 

TELCOM I 

Our original and popular smart terminal program has most of the features needed to 
communicate with time share systems or for high speed file transfers between two disk- based 
micros over modems or direct wire. It is menu driven and extremely simple to use. Functions 
include terminal mode, save RAM buffer on disk, transmit a disk file, receive a disk file, 
examine and modify UART parameters, 8 programmable log- on messages, automatic 
checksum verification of accurate transmission and reception, and many more user conveni- 
ences. Supports line printers, lowercase characters, Xon/Xoff protocol, programmable 
character keys, and even saves itself on disk in different configurations. It will also exchange 
binary files without conversion to ASCII. 
Specify Model I or Model III. TELCOM I $39.95 on disk 

RAM SPOOLER AND PRINT FORMATTER 

This program is a full feature print formatting package featuring user defineable line and page 
length (with line feeds inserted between words or after punctuation), indentation, screen 
dump, and printer pause. In addition, printing is done from a 4K expandable buffer area so 
that the LPRINT or LLIST command returns control to the user while printing is being done. 
Works with cassette or disk systems. Allows printing and processing to run concurrently. 
Output may be directed to either the parallel port, serial port, or the video screen. 80 Micro 
said "I can only give my highest recommendation of Spooler and Mumford Micro Systems. " 
Specify Model I or Model HI. SPOOLER $16.95 on tape, $21.95 on disk 

4 SPEEDS FOR YOUR MODEL I 

The SK-2 clock modification allowsCPU speeds to be switched between normal, an increase 
of 50%, or a 50% reduction; selectable at any time without interrupting execution or crashing 
the program. Instructions are also given for a 100% increase to 3.54 MHz. The SK-2 may be 
configured by the user to change speed with a toggle switch or on software command. It will 
automatically return to normal speed any time a disk is active, requires no change to the 
operating system, and has provisions for adding an LED to indicate when the computer is not 
at normal speed. It mounts inside the keyboard unit with only 4 necessary connections for the 
switch option (switch not included), and is easily removed if the computer ever needs service. 
The SK-2 comes fully assembled with socketed IC's and illustrated instructions. 
Model I only. SK-2 $24.95 



MUMFORD 

MICRO 

SYSTEMS.* 



ORDERING: Complete satisfaction is guaranteed or a full refund will be made. Include $2.00 
for postage and handling. California residents add 6% sales tax. Visa. Mastercharge and COD 
orders accepted. SPECIFY MODEL I OR MODEL III. Dealer inquiries invited. 

Box 400-E Summerland, California 93067 (805) 969-4557 

Quality software since 1978 



sSee List of Advertisers on Page 435 
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Listing continued 








00130 




RESET 


PRINT 


; VECTORS 


00140 




LD 


HL, OFFSET- 1 ;SET 


00150 




LD 


(DOSTOP) , 


HL ;TOP OF DISK MEM 


00160 




LD 


HL, (PARMS) ;RELOAD PARAMETERS 


00170 




RET 






00180 


DISKBL: 


POP 


HL 


; REMOVE CLEAR RET 


00190 




EX 


(SP) f HL 


; REPLACE RET W/ CLEAR 


00200 


DISK1: 


LD 


DE, BASICD ; POINT TO DCB 


00210 




LD 


A, ENABLE 


;SET ENABLE INSTR 


00220 




LD 


(EI) ,A 


;ONLY FOR DISK SYSTEMS 


00230 




CALL 


LOAD 


;LOAD IT 


00240 




JR 


Z, BASLD 


;IT WORKED 


00250 




LD 


HL,MMSG 


; MOUNT MESSAGE 


00260 




CALL 


DOSPRT 


; DISPLAY MESSAGE 


00270 


TKA 


EQU 


$ 




00280 




CALL 


KEYBD 


;GET A CHAR 


00290 




CP 


X'0D' 


; CARRIAGE RET 


00300 




JR 


NZ,TKA 


;NO 


00310 




JR 


DISK1 


;LOAD AGAIN 


00320 


BASLD 


EQU 


$ 




00330 




EX 


(SP) ,HL 


; EXCHANGE ENTRY W/RET 


00340 




CALL 


CLOSE 


; CLOSE IT 


00350 




POP 


DE 


;PUT ENTRY INTO DE 


00360 




PUSH 


DE 


; RESTORE ENTRY TO STACK 


00370 




PUSH 


HL 


; RESTORE RET TO STACK 


00380 




EX 


DE,HL 


;PUT ENTRY INTO HL 


00390 




LD 


DE,TRSBAS ; ENTRY TO RS DISK BASIC 


00400 




XOR 


A 


; REMOVE CARRY 


00410 




SBC 


HL,DE 


; COMPARE THEM 


00420 




LD 


HL,TRSOFF ;SET TRSDOS OFFSET 


00430 




JR 


NZ,NEWD80. ;IT IS NEWDOS 80 BASIC 


00440 


STROFF: 


LD 


(OFFSET) 


HL ; STORE OFFSET 


00450 




RET 






00460 


NEWD80 


EQU 


$ 




00470 




LD 


HL,NDOFF 


;LOAD NEWDOS/ 80 OFFSET 


00480 




JR 


STROFF 


;GOTO STORE 


00490 


PARMS : 


DW 


0000H 


SAVE AREA FOR HL 


00500 


BASICD: 


DB 


'BASIC/CMD' ,13,' 


00510 


MMSG: 


DB 


'* INSERT DISKETTE CONTAINING BASIC/CMD 


*\13, 


00 








00520 


OFFSET: 


DW 


0000H 


DISK VECTOR OFFSETS 


00530 


AOPEN: 


DW 


4179H 


OPEN VECTOR 


00540 


ACLOSE: 


DW 


4185H 


CLOSE VECTOR 


00550 


AINPUT: 


DW 


41D6H 


INPUT VECTOR 


00560 


APRINT; 


DW 


41CAH 


PRINT VECTOR 


00020 




CSEG 






00030 


; 


ROUTINE 


: r 


CAPE OPEN 


00040 


TOPEN 


EQU 


$ 




00050 




CALL 


CHECK 2 


;IS IT TAPE OPER 


00060 




JP 


NZ,VOPEN 


;NO 


00070 




INC 


HL 


;SKIP # 


00080 




INC 


HL 


;SKIP + 


00090 




CALL 


FSELCT 


;SET IX FILE BASE 


00100 




JP 


NZ , IFNO 


;BAD FILE NUMBER 


00110 




BIT 


7,(IX+3) 


;IS FILE OPEN 


00120 




JP 


NZ,FAOP 


;YES 


00130 




INC 


HL 


;SKIP FILE NO 


00140 




INC 


HL 


;SKIP , 


00150 




LD 


A,(HL) 


;PU DRIVE NO 


00160 




CP 


30H 


;IS DRIVE<0 

Listing continues 



• TFM returns an input/output com- 
pletion status in the Basic error variable, 
ERR, for input operations. 

• You can supply up to a 12-character 
file name to be written to the file header 
with no restrictions on the content of 
the name. 

• TFM displays English error messages 
on the display when it detects an error 
instead of the two-character abbrevi- 
ated error message inherent in Level II 
Basic. 

• You can read and write any data 
without losing any of it to the infamous 
"Extra Ignored," since these routines 
do not look at the data but at its length. 

• If you forget the name that is on a 
file, you can open it with the name 
parameter equal to 12 question marks; 
TFM will open the file and replace the 
question marks with the name from the 
file header. 

TFM does not replace the INPUT#-n 
and PRINT#-n functions, but adds 
itself to the many Level II functions. 

Example of Increased Efficiency 

Here is an example of a short pro- 
gram that creates a tape output file 
from a string array: 

10 FOR 1 = 1 TO 100:PRINT#-1,A$(I):NEXT 

If the average string length were 50 
bytes, then the above loop would take 
about 10 minutes to complete. 

With my routines, and with no 
change in baud rate, the same data 
could be written as follows: 

10 OPEN#+ 1,1,0, "TESTF1LE" 
20 FOR I = 1 TO 100:PRINT#+ 1,A$(I):NEXT: 
CLOSE#+l 

This code would need six seconds to 
write the header from the open state- 
ment and two minutes to write all the 
data (based on six seconds for each data 



BTA MODEL 953B EPROM PROGRAMMER -$359 




BAY TECHNICAL A8SOCIATES. inc. 

HWY. 603, P.O. BOX 387 
BAY ST. LOUIS, MISSISSIPPI 39520 

(601)467-8231 "** 



Programs 2508, 2758, 2516, 2716, 27C16, 2532, 2732, 2732A, 27C32, 2564, 

2764, 27C64, MCM68766, 27128. 

RS-232, 3 line serial interface, Xon/Xoff format, DB-25 I/O connector. 

No personality modules - software control EPROM selection. 

Extended diagnostics. 

LED warning indicates power applied to EPROM socket. 

Supports Intel, Motorola, and Intel 8086 data formats as well as HEX data 

dump. 

Automatic baud rate selection. 

Textool zero insertion force socket. 

Available CP/M software. 



Model 953A, programs most 24 pin EPROMS. 



Price - $269.00 
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Mod III GRAFYX SOLUTION^ $299.95 . 46 

• 512 x 192 Dot Graphics increases resolution 16 X (better than Apple) 

• Extensive Business, Personal, Educational, and Scientific applications 

• 14 BASIC commands set and reset Points, Lines, Circles, Boxes, etc. 

• Allows Display and Printout of detailed Line, Bar, and Pie graphs 

• 80 Character/line display compatible with BASIC programs and DOS 

• Price includes 98K bits memory, 30 programs, 52 page manual 

• Plug-in, clip-on board eliminates soldering for easy installation 




Mod I, III Mi-ukAHA- $169.95 

• Create and Save 128 programmable hi-resolution characters/shapes 

• Characters are generated within an 8 x 12 matrix (Mod I: 6 x 12) 

• Great for creating game figures, symbols, and alternate character sets 

• Excellent software support (20 programs) & extensive documentation 

• Module easily installs within the computer with no soldering 



Manual only $15 
Products guaranteed 
Dealers welcome 



Micro-Labs, Inc. 214-235-0915 

902 Pinecrest, Richardson, Texas 75080 



FREE shipping 

Prepaid or COD 

Tx. res add 5% 



-See List of Advertisers on Page 435 
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Listing continued 








00170 


JP 


C,BDN 


;BAD DRIVE NO 


00180 


SUB 


33H 


; SUBTRACT 33H 


00190 


JP 


NCBDN 


;BAD DRIVE NUMBER 


00200 


ADD 


A,02H 


; RESTORE DRIVE NO 


00210 


RES 


0,(IX+3) 


;SET DRIVE 


00220 


RRC 


A 


;IS IT DRIVE 1 


00230 


JR 


NCDSET 


;N0 


00240 


SET 


0, (IX+3) 


;SET DRIVE 1 


00250 DSET 


EQU 


$ 




00260 


INC 


HL 


;SKIP DRIVE NO 


00270 


INC 


HL 


;SKIP , 


00280 


RES 


4, (IX+3) 


;SET INPUT FILE 


00290 


LD 


A,(HL) 


;PU FILE OPTION 


00300 


CP 


'I» 


;IS IT INPUT 


00310 


JR 


Z, OPTSET 


;YES 


00320 


SET 


4, (IX+3) 


;SET OUTPUT 


00330 


CP 


'0' 


;IS IT OUTPUT 


00340 


JP 


NZ,IFO 


; INVALID FILE OPTION 


00350 OPTSET 


EQU 


$ 




00360 


INC 


HL 


;SKIP OPTION 


00370 


INC 


HL 


;SKIP , 


00380 


LD 


A,(HL) 


;PU BYTE OF FILE NAME 


00390 


CP 


22H 


;IS IT " 


00400 


CALL 


Z,BDPTR 


; YES-BUILD PTRS 


00410 


CALL 


NZ,LUVAR 


;LOOK UP VARIABLE 


00420 


LD 


A,(DE) 


;MOVE LEN 


00430 


LD 


(IX) ,A 


;T0 FILE AREA 


00440 


CP 


13 


;IS LEN < 13 


00450 


JP 


NCVTL 


;FILE NAME TOO LONG 


00460 


INC 


DE 


; DE=ADDR ( ADDR ( STR) ) 


00470 


LD 


($+6) ,DE 


;MOVE ADDR (STR) 


00480 


LD 


DE,($) 


;INTO DE 


00490 


LD 


(IX+1) ,E 


;SET MSB 


00500 


LD 


(IX+2) ,D 


;SET LSB 


00510 


LD 


(BLINE) ,HL 


;SAVE ADDR (BASIC LINE) 


00520 


CALL 


SETBUF 


;SET HL=ADDR( BUFFER) 


00530 


LD 


(HL) ,20H 


; BLANK OUT 


00540 


PUSH 


HL 


;PUT HL 


00550 


POP 


DE 


;INTO DE 


00560 


INC 


DE 


; ADVANCE TO NEXT ONE 

Listing continues 



record containing five variables). 

Record Formats 

All tape records have the same basic 
format as described below: 

• BDW— Block Descriptor Word. 
Contains an 8-bit unsigned integer that 
is a count of how many bytes follow. 

• DATA— Data for the record. (See 
Fig. 3 for a breakdown.) 

• CKSB— Checksum Byte. Eight-bit 
sum of all DATA plus BDW bytes. 

The format and content of the header 
record is: 

• BDW— Block Descriptor Word. 

• DATA— Header Data Segment. 
x'OD'— Record Descriptor Word 
x'C3'— Header Record Designator 

12 bytes— File Name 

• CKSB— Checksum of all DATA plus 
BDW bytes. 

The data record contains: 

• BDW— Block Descriptor Word. 

• DATA— Data Segment. 

• RDW— Record Descriptor Word. 
Eight bit unsigned integer indicating 
how long the data is that follows. 

• DATA— The data associated with 
the RDW. (There can be as many occur- 
rences as RDW/DATA as will fit in the 
256-byte buffer.) 

• CKSB— Checksum of all DATA plus 




• OKIDATA 82A CALL • 83A 

• OKIDATA 84A .... CALL • 82A TRACTOR 

• OKIDATA80 

OTHER PRINTERS 

• NEC PC-8023A-C 

• NEC 3550 

• NEC 3510, 3515, 3530 

• NEC 771 0, 771 5, 7730, 7720, 7725 

• C.IT0H8510AP CALL • 8510ACD 

• CIT0H 1541SP CALL • 1541SRE 

• C.IT0H F1 0-40PU & F1 0-40RU 

• C.IT0H F10-55PU & F10-55RU 

• EPSON MX80F/TGRAFTRAX PLUS 

• EPSON MX100 GRAFTRAX PLUS 

• TALLY MT 1602 MT1605 

TALLY MT 1802 MT1805 

DIABLO 630 and 620 SERIES 

QUME SPRINT 5 45/RO.KSR & 55/RO.KSR . 

ANADEX ADX-9500-P, ADX-9501 -P 

C0MREX CR-1 -S, CR-1 -C, CR-1 -Q 

SMITH-CORONA TP-1 

BROTHER HR-1 

DAISY WRITERS 



CALL 

S55 

S325 



CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
S1495 
S1795 
CALL 
CALL 
S1295 
CALL 
CALL 
CALL 
CALL 



NEC PC-8001 A, PC-801 2A, PC-8031 A, and 
JB-1201 (NEC SYSTEM) with CP/M 

and BASIC 

NEC Other CPU's and Software 



MODEMS 

• HAYES SMARTMODEM (300 BAUD) 

• HAYES SMART MODEM (300 & 1200 BAUD) 

• RS-232C COMPATIBLE 

• FULL and HALF-DUPLEX OPERATION 
WITH BOTH 

• TOUCH TONE and PULSE DIALOG 

• AUTO-ANSWER/DIAL/REPEAT 

• COMPLETELY PROGRAMMABLE 

• BUILT-IN AUTO MONITOR 

• STATUS AT A GLANCE 

• DIRECT-CONNECT DESIGN 

• HAYES CHRONOGRAPH 

• NOVATION AUTO-CAT AUTO ANS 

• SIGNALMAN MARK 1 (300 BAUD) 

• U.D.S. 1 03 0ALP (300 BAUD) 

• U.D.S. 1 03 JLP (300 BAUD) 

• U.D.S. 202 SLP (1 200 BAUD) 



S2149 
CALL 



S229 
S595 



SANYO MBC-1 000 

• SANYO MBC-2000 

• SANYO MBC-3000 

• above with CP/M and BASIC 



S1599 
S2699 
S4999 



SANYO ACCESSORIES & SOFTWARE CALL 



$209 
S219 
$89 
$175 
$199 
$249 



OTHER COMPUTERS 

• ALTOS Computer Systems 

• ADDS Computer Systems 

• NEC PC-8001 A, PC-801 2A, PC-8031 A, and 
JB-1201 (NEC SYSTEM) with CP/M 

and BASIC 

• NEC Other CPU's and Software 

• DYNABYTE 5605-6-1 

• DYNABYTE OTHER SYSTEMS 

• XEROX 820 SYSTEM w/5 1/4" DRIVES . . . . 

• XEROX 820 SYSTEM w/8" DRIVES 

• SOFTWARE FOR THE ABOVE 



CALL 
CALL 



S2149 
CALL 

$5999 
CALL 

$2499 

$2995 
CALL 



C00S0L, INC. P.O. BOX 743, ANAHEIM. CALIFORNIA 92805-0743 or 
C00S0L, INC. 2845 MESA VERDE DR. E, #1, COSTA MESA, CA. 92626 



COOSOL SPECIAL DISCOUNTS 

APPLE SOFTWARE CALL 

IBM SOFTWARE CALL 



PHONE 7 DAYS 



Calif. (714)545-2216 
(800) 854-8498 



• 105 
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BDW bytes. 

The trailer record does not follow the 
uniformity rules. The RDW is x'FO', 
but the data is only one byte long: 

• BDW— Block Descriptor Word. 

• DATA— Data Segment. 
x'FOOF'— Trailer Designator. 

• CKSB— Checksum of all DATA plus 
BDW bytes. 

What Is a Buffer? 

A data buffer collects data from 
Basic until it is full. Then the contents 
are written to the tape. In the routines 
described here, up to 256 bytes of data 
can be sent to the buffer before they are 
transferred to the tape. This results in 
much faster tape I/O due to reduced 
physical drive movement. 

Loading the Routines 

Loading the routines is easy, but disk 
and nondisk loading procedures are dif- 
ferent. To load TFM under a nondisk 
system, the memory size must be set ac- 
cording to the amount of RAM your 
system contains: 16K— 30983; 32K— 
47367; and 48K— 63751. 

Once the memory size is set and you 
have a ready prompt you can proceed to 
load TFM as you would any System 
tape. TFM, as part of its initialization, 



Listing continued 








00570 




LD 


BC,16 


;SET LEN=16 


00580 




LDIR 




;FILE NAME AREA 


00590 




BIT 


4,(IX+3) 


;IS IT INPUT 


00600 




CALL 


Z, RHEAD 


;YES 


00610 




BIT 


4,(IX+3) 


;IS IT OUTPUT 


00620 




CALL 


NZ,WHEAD 


;YES 


00630 




LD 


HL f (BLINE) 


; RESTORE ADDR( BLINE) 


00640 




CALL 


ADVLIN 


; ADVANCE BASIC LINE 


00650 




SET 


7,(IX+3) 


;SET FILE OPEN 


00660 




RET 






00670 


; 


ROUTINE: 


RHEAD 




00680 


; THIS 


ROUTINE 


READS THE HEADER AND COMPARES IT TO THE 


00690 


; HEADER IN THE OPEN STATEMENT 


„ 


00700 


; 








00710 


RHEAD 


EQU 


$ 




00720 




CALL 


READP 


;READ A PHYSICAL BLOCK 


00730 




LD 


E,(IX+1) 


;L0AD ADDR OF FILE NAME 


00740 




LD 


D,(IX+2) 


;INT0 DE 


00750 




LD 


B,(IX) 


;LOAD LEN 


00760 




CALL 


SETBUF 


;HL=ADDR OF FILE NAME-1 


00770 


CPN1 


EQU 


$ 




00780 




INC 


HL 


; ADVANCE 1 FILE BYTE 


00790 




LD 


A,(HL) 


;PU FIRST BYTE 


00800 




CP 


X'C3' 


;IS IT HEADER 


00810 




JP 


NZ r NDF 


; NO-RET IF HEADER ERR 


00820 


CPN2 


EQU 


$ 




00830 




INC 


HL 


;SKIP C3 


00840 




LD 


A,(DE) 


;PU VAR BYTE 


00850 




CP 


(HL) 


;IS IT EQUAL 


00860 




JR 


NZ,CFAF 


; NO-CHECK FOR ANY FILE 


00870 




INC 


DE 


;NEXT VAR 


00880 




DJNZ 


CPN2 


; REPEAT FOR NEXT 


00890 


RSIX 


EQU 


$ 




00900 




LD 


A,0 


;RC=0 


00910 




LD 


(IX+4) ,A 


;READ INDEX=0 


00920 




LD 


(IX+5) ,A 


; BLOCK DESC WORD=0 


00930 




RET 




;EXIT 


00940 


CFAF 


EQU 


$ 




00950 




LD 


E, (IX+1) 


; RELOAD STRING 


00960 




LD 


D,(IX+2) 


; ADDRESS 

Listing continues 




LEVEL IV PRODUCTS. INC. 
PREMIUM GRADE TR5-B0® 

LEVEL IV MEflNG, I VALUE I DUALITY I SERVICE I SUPPORT 




BUILDINO A PREMIUM BRADE COMPUTER IB A CLAIM FEW COMPANIES CAN MAKE, 
AND EVEN FENER CAN BACKUP, ME DO IT EVERY DAY. EACH LEVEL IV MOD III 
IB CAREFULLY ASSEMBLED FROM PRE-TEBTED COMPONENTS OF THE HIBHEBT 
BUALITY, AND TE8TED FOR PERFORMANCE TO A LEVEL FAR ABOVE THAT FOR 
WHICH IT MAfi ORIBINALLY DEB I 0NE3. AFTER BURN-IN, EACH UNIT IB 
DELIVERED KITH THE FAMOUS LEVEL IV SIX MONTH LIMITED PARTS AND LABOR 
WARRANTY (COPIES ARE AVAILABLE ON REQUEST) . 

A LEVEL IV MOD III IS DE8IBNED TO BE COMPLETELY COMPATIBLE WITH THE 
MOUNTAIN OF SOFTWARE AND HARDWARE READILY AVAILABLE FOR IT. ANY ITEM 
THAT WORKS ON, OR ATTACHES TO, A STANDARD MOD III WILL FUNCTION WITH 
OURS. 

CONSIDER THE FOLLOWINB OPTIONS TO ENHANCE YOUR MOD III 

D...BINBLE OR DOUBLE HEAD, 40 OR BO TRACK DRIVES 

2J...EIBHT INCH 8INBLE OR DOUBLE HEAD DRIVES 

3). . .WINCHESTER 6.4 OR 14. S MSB DRIVES 

4>...B.I HE8AHERTZ CPU CLOCK SPEED (SUPER FAST G0HPUTIN8) 

S>...MULTI-U8ER/MULTI-TABKINB CAPABILITY, (44 TERMINALS) 

6)... BO COLUMN BY 24 LINE DISPLAY, 64K RAH 

CP/M CAPABILITY, RUNS STANDARD CP/M PROBRAM8 



7>.., 

BUILDINO A MOD III CAPABLE OF THE ABOVE CERTAINLY NAKEB IT A PREMIUM 

8RADE UNIT, BUT THE MOST IMPORTANT THINS WE OFFER 18 AFTER-THE-8ALE 

SERVICE AND SUPPORT. 



NOW FOR THE SURPRISE, OUR' 4BK 2-DRIVE UNIT, SELLS FOR ONLY 
REMEMBER LEVEL IV MEANS, 'VALUE "QUALITY -SERVICE »8UPPORT 
SOME MAY BET CLOSE TO OUR PRICES, BUT NONE WILL MATCH OUR 



$1639 



MUM 

"is . 

slg' 

fes : 

U.U1 

!* 2 M 

hi*' 1 



MS 5 
a \tt*2 

id 

eibCc 



COMPRRV 5T0RE L0CRTI0H5 

MAIL RN» PHONE DRREE CENTER 
3Z1Z1 5CH00LCRRFT BOND 
LIVDMIR. nXEHIERN 11150 

COMPUTES 5MLE5 CERTEE 
1BZ RORTH ZOTH STREET 
BOTTLE CREEK. MI 11015 

POLL LIRE R/S SRLES CERTER 
131 50UTR FRONT 5TREET 
BDMHEIRC. MICHIEHN 11017 



DESK TOP 

COMPUTER 

SYSTEMS 



□s 




CALL FOR OUR CURRENT LOM PRICES CHI) 313-525-6200 OTHERS B00-521-3305 
NE ACCEPT CVItffl-fC-CHECKB-COOJ INQUIRE RBDUT OUR PRE-PAY DI0C0UNT8 TOO 
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Listing continued 








00970 




LD 


A, (IX) 


RELOAD LEN 


00980 




CP 


12 


IS IT 12 


00990 




JP 


NZ,FNF 


NO-FILE NOT FOUND 


01000 




LD 


A,(DE) 


GET FILE NAME CHAR 


01010 




CP 


■?' 


IS IT QUERY 


01020 




JP 


NZ,FNF 


NO-FILE NOT FOUND 


01030 




CALL 


SETBUF 


SET HL=FILE-1 


01040 




INC 


HL 


SKIP LEN DESC 


01050 




INC 


HL 


SKIP HEADER DESC X'C3* 


01060 




LD 


BC,12 


SET LEN 


01070 




LDIR 




MOVE FILE NAME 


01080 




JR 


RSIX 




01090 


; 


SUBROUTINE: WHEAD 




01100 


; THIS SUBROUTINE WRITES THE HEADER ON THE OUTPUT TAPE 


01110 


; 








01120 


WHEAD 


EQU 


$ 




01130 




LD 


ClX+6) ,0DH 


SET RDW 


01140 




LD 


(IX+5) ,0EH 


SET BDW 


01150 




LD 


(IX+7) ,X'C3' 


SET HEADER 


01160 




CALL 


SETBUF 


HL=FILENAME-1 


01170 




INC 


HL 


SKIP LEN DESC 


01180 




INC 


HL 


SKIP C3 


01190 




EX 


DE,HL 


DE=FILE NAME 


01200 




LD 


H,(IX+2) 


LOAD STR ADDR 


01210 




LD 


L,(IX+1) 


INTO HL 


01220 




LD 


C,(IX) 


PU FILENAME LEN 


01230 




LD 


B,0 


B=0 


01240 




LDIR 




MOVE IT 


01250 




LD 


A, 255 


SET HEADER LEN 


01260 




LD 


(NUMZ) ,A 


TO 255 


01270 




CALL 


WRITEP 


WRITE PHYSICAL BLOCK 


01280 




LD 


A, 50 


SET NEW HEADER LEN 


01290 




LD 


(NUMZ) ,A 


STORE NEW LEN 


01300 




XOR 


A 




01310 




RET 






00010 




SUBROUTINES 




00020 


; 








00030 


SELCT2 


EQU 


S 




00040 




INC 


HL 


SKIP # 


00050 




INC 


HL 


SKIP + 


00060 




CALL 


FSELCT 


SET FILE # 


00070 




JP 


NZ,IFNO 


INVALID FILE # 


00080 




BIT 


7,(IX+3) 


IS IT OPEN 


00090 




JP 


Z,FC 


NO 


00100 




BIT 


4,(IX+3) 


CHECK HOW OPEN 


00110 




INC 


HL 


SKIP FILE # 


00120 




INC 


HL 


SKIP ' , ' 


00130 




RET 






00140 


FSELCT 


EQU 


$ 


SET IX/IY 


00150 




LD 


IX,FILE1 


IX=FILE1 


00160 




LD 


IY,FILEl+262 


IY=FILE2 


00170 




LD 


A,(HL) 


PU FILE NUMBER 


00180 




CP 


■1' 


IS IT 1 


00190 




RET 


Z 


YES 


00200 




PUSH 


IX 


SWAP 


00210 




PUSH 


iy 


IX 


00220 




POP 


IX 


WITH 


00230 




POP 


IY 


IY 


00240 




CP 


'2' 


FILE 2 


00250 




RET 




EXIT Z=YES,NZ=BAD 


00251 


; 


BUILD 


STRING POINTERS 




00260 


BDPTR 


EQU 


? 




00270 




INC 


HL 


SKIP " 


00280 




LD 


(DUMADD) ,HL 


STR ADDRESS 


00290 




LD 


BC0FF00H 


B=FF,C=0 


00300 




LD 


A,22H 


A=" 


00310 


CNCFQ 


EQU 


$ 




00320 




CP 


(HL) 


END OF STR 


00321 




INC 


HL 


NEXT LINE BYTE 


00330 




JR 


Z, SDLEN 


YES 


00340 




INC 


C 


ADD 1 TO LEN 


00360 




DJNZ 


CNCFQ 


LOOP IF MORE 


00370 




JP 


VTL 


VAR TOO LONG 


00380 


SDLEN 


EQU 


$ 




00390 




LD 


A,C 


SET 


00400 




LD 


(DUMLEN) ,A 


STR LEN 


00410 




LD 


DE,DUMLEN 


DE=PTRS 


00420 




CP 


C 


SET Z 


00430 




RET 






00440 


SETBUF 


EQU 


$ 




00450 




PUSH 


IX 


PUT IX 


00460 




POP 


HL 


INTO HL 


00470 




REPT 


6 




00480 




INC 


HL 


•SET HL=ADDR( BUFFER) 


00490 




ENDM 




Listing continues 



will execute a Clear. However, to com- 
plete the initialization you must key in 
Clear and hit enter. If you have a pro- 
gram that has run and has variables 
established, you will lose the contents of 
the variables when you load in TFM. 

Loading TFM from DOS is slightly 
different. From DOS command level, 
key in TFM; DOS will load in the TFM 
program, and then begin its execution. 
TFM will then attempt to load Disk 
Basic from the file named BASIC/ 
CMD, and if it does not find it, a 
message will be displayed. When it 
loads Disk Basic, it will determine 
which Basic you are using. 

TFM can distinguish between Radio 
Shack Disk Basic and NEWDOS80 
Disk Basic, since they store the vectors 
that TFM needs to modify at different 
addresses, before moving them into the 
vector area. When TFM determines the 
Basic being used, it modifies the vectors 
and jumps to the beginning of Basic 
that was returned from DOS in the HL 
register pair. 

TFM is easy to use since it has only 
four instructions. The first two are al- 
most identical to the Level II Basic IN- 
PUTS- 1 and PRINTS- 1 instructions. 

PRINT#+ n,V$,IVo,S!,D# 

The first instruction, PRINTS +n, is 
identical in format to the PRINTS- 1 
instruction, but it differs in the way it 
outputs data to the tape file. Print will 
accept any type of Basic variable in the 
instruction, whether it is integer, string, 
single, or double precision. However, 
Print outputs only the data portion of 
all variables into the buffer to be written 
to the tape. In this way, the Input 
routine can be simplified, and the effi- 
ciency of data transfer increased. The 
data portions stored on tape are as 
follows: 

• the RDW byte (see Fig. 3) 

• String— LEN(string) 

• Integer — 2 bytes 

• Single — 4 bytes 

• Double— 8 bytes 

If you have a double-precision 16- 
digit number, it can be stored on tape in 
half the space it would need if it was 
written out via the PRINT#-1 function. 

Another major difference between 
PRINTS +n and PRINT#-n is that 
TFM puts the data into 256-byte buffers 
before doing a physical I/O. 

Additionally, the n in the PRINT 
#+n is used differently than with 
PRINT#-n. With PRINT#-n, the n is 
the cassette to which the data is written, 
whereas with TFM the n is the logical 
file that is to be accessed on either 
logical drive 1 or 2. 
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YOU'VE JUST FOUND 

THE MISSING LINK! 




Computer Shopper is your link to 
individuals who buy, sell and trade 
computer equipment and software 
among themselves nationwide. No 
other magazine fills this void in the 
marketplace chain. 

Thousands of cost-conscious com- 
puter enthusiasts save by shopping 
in Computer Shopper every month 
through hundreds of classified ads. 
And new equipment advertisers offer 
some of the lowest prices in the nation. 

Computer Shopper's unbiased 
articles make for some unique 
reading among magazines and 
there's a "help" column to answer 
difficult problems you may have with 
interfacing, etc. 



For a limited time you can subscribe 
to Computer Shopper with a 6 
month trial for $6 or 12 months for 
$10. 

You risk nothing, because if you're 
not 100% satisfied after receiving 
the first issue, you may cancel and 
receive a full refund. No questions 
asked! 

If you want faster service, call in 
your subscription and charge on 
your MasterCard or VISA account. 

Our business office is open from 
8 a.m. to 5 p.m. Monday through 
Friday. Call for charge card orders 
or send your check or money order 
TODAY while the offer is still good. 



6 month trial, $ 6 or 12 months for $ 10 



# 



CamPUTBR SHOPPSR 

P.O. Box F-711 •Titusville, FL 32780 
305-269-321 1 
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Listing con 


inued 






00500 


RET 






00520 


; LOOK UP VARIABLE 




00530 


J 






00540 


LUVAR EQU 


S 




00550 


CALL 


VARPTR 


;LOOK UP VARIABLE 


00560 


LD 


A, (TYPE) 


; PICKUP VAR TYPE 


00570 


CP 


03H 


;IS IT STRING 


00580 


RET 


Z 


; ALREADY STRING 


00590 


BIT 


4,(IX+3) 


;IS IT OUTPUT 


00600 


RET 


Z 


; RETURN. IT IS INPUT 


00610 


; THE NEXT 3 


LINES WILL MAKE 


INT,SNG,DBL VARIABLES 


00620 


; APPEAR TO BE 


STRING SO THEY 


CAN BE PUT ON TAPE 


00630 


LD 


(DUMLEN) ,A 


; STORE LEN 


00640 


LD 


(DUMADD) ,DE 


; STORE ADDR OF STRING 


00650 


LD 


DE f DUMLEN 


;DE=ADDR(VAR) 


00660 


RET 




; EX IT- VAR FOUND 


00670 


MOUNT EQU 


$ 




00680 


BIT 


5 f (IX+3) 


;IS IT MOUNTED 


00690 


JR 


NZ, ALMTD 


; ALREADY MOUNTED 


00700 


BIT 


7 f (IY+3) 


;IS OTHER OPEN 


00710 


JR 


Z, MOUNTM 


;NO 


00720 


LD 


A,(IX+3) 


;PU STATUS 


00730 


AND 


X'01' 


;SET DRIVE NO 


00740 


LD 


C,A 


;IN C 


00750 


LD 


A, (IY+3) 


;PU STATUS-2 


00760 


AND 


X'01' 


;SET DRIVE-2 


00770 


CP 


C 


;SAME?? 


00780 


JR 


NZ, MOUNTM 


;NO 


00790 


BIT 


5, (IY+3) 


;IS OTHER MOUNTED 


00800 


JR 


Z, MOUNTM 


;NO 


00810 


RES 


5, (IY+3) 


;SET NOT MOUNTED 


00820 


LD 


A, (IY+3) 


;PU STATUS BYTE 


00830 


SRL 


A 


;MOVE RIGHT 


00840 


AND 


X'01 1 


; LEAVE ONLY FILE# 


00850 


ADD 


A,31H 


; RESET DRIVE FILE2 


00860 


PUSH 


HL 


;SAVE HL 


00870 


LD 


H,A 


;H=FILE # 


00880 


LD 


L f 'R' 


; REMOVE MESSAGE 


00890 


LD 


(3C3EH) ,HL 


; DISPLAY IT 


00900 


JR 


APHL 




00910 


MOUNTM EQU 


$ 




00920 


PUSH 


HL 


;SAVE HL 


00930 


APHL EQU 


$ 




00940 


LD 


A,(IX+3) 


;PU DRIVE 1 


00950 


SRL 


A 


;MOVE RIGHT 


00960 


AND 


X'01' 


;REM ALL BUT FILE « 


00970 


ADD 


A,31H 


;SET FILE NUM 


00980 


LD 


H,A 


;H=FILE # 


00990 


LD 


L, 'M' 


; MOUNT MESSAGE 


01000 


LD 


(3C7EH) ,HL 


; MOUNT MESSAGE 


01010 


GETC EQU 


$ 




01020 


CALL 


KEYBD 


;GET A CHAR 


01030 


CP 


13 


; ENTER PRESSED 


01040 


JR 


NZ,GETC 


;NO 


01050 


SET 


5,(IX+3) 


•SET FILE OPEN 


01060 


LD 


HL,2020H 


; BLANK 


01070 


LD 


(3C3EH) ,HL 


;OUT MESSAGE 


01080 


LD 


(3C7Eh) ,HL 


; AREAS 


01090 


POP 


HL 


; RESTORE HL 


01100 


ALMTD EQU 


$ 




01110 


LD 


A, (IX+3) 


;PU STATUS BYTE 


01120 


AND 


X'01' 


;SET DRIVE IN A 

Listing continues 



INPUT# + n,S$,I<7o,S!,D# 

INPUT#+n is identical in format to 
INPUT#-n, with the exception that the 
variables listed in the instruction must 
either be all string or match the data on 
the data file exactly. 

The input routine looks up the IN- 
PUT variable, and, before moving the 
data to the variable, it checks the vari- 
able type. If the type is 03 (string) the 
variable's pointers are changed to point 
to the data in the buffer. If the type is 
anything else, the length of incoming 
data is compared to the data type. 

The reason for this comparison is 
that the integer, single, and double- 
precision variables have their data por- 
tion the same length as their type code. 
Integer type code is 02, single type code 
is 04, double type code is 8, and string 
type code is 03. If the types don't match 
a type-mismatch error appears. If the 
data type matches the RDW, the data in 
the buffer is moved to the data segment 
of the INPUT variable. 

The type-mismatch error differs 
from the Level II messages in that it 
prints the variable type and the data 
type. The data type is derived by ORing 
the RDW with X'30' and if greater than 
X'39\ X'33' is used. So the data type 
sometimes can't be 2, 3, 4, or 8. 

Input also uses the complement to 
Print data buffering technique, and the 
n is used the same way as the n in the 
print statement. 

OPEN# + n,DN,H,F$ or "file name" 

In discussing the Open instruction, I 
will first explain its parameters as they 
are used with TFM. The logical number 
with which to associate the open file is 
n, and it can be only 1 or 2. 

DN is the drive number on which the 
file will reside when open, 1 for the stan- 
dard cassette, and 2 for the second drive 
used with the expansion interface. You 





**' 
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• Enclosures 

and power supplies 

• with or without drives. 

• Low minimum orders. 

• Attractive quantity pricing. 

Durable, textured, color compatible 

finish looks great on your display counter! 

Fully engineered product, high reliability design. 

• All standard configurations, plus: Canon Vz height, 

TEAC 1 /2 height, mini-Winchester and Tandon 8" Vz height. 

• Available only through your local computer dealer. 

or write for the name of the dealer in your area. 






Ann Arbor Precision 

7536 Jackson Road 
Ann Arbor, Ml 48103 
Order Desk: 9-5 EST 
(313) 426-5477 Mon-Thu 
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tP/M 112K 
•del III $2699. 

This system runs like a standard two drive 
Model III untill CP/M is loaded. System 
includes a 80 column green phosphor CRT 



48K MODEL III $1695. 

with two double sided drives $ 1895. 

Includes a 48K Model III with Two Tandon Disk Drives. 
Ready to plug in go. 

One Drive 48K Starter System $1595. 

Options For Our Systems with Free Installation 
Green CRT$89 RS 2 32C $89 DOS PLUS 34 $100 



AL,BOB,KEVIN,ROBERT,andthe rest of 
the Crew ! 



NEW HARD DRIVE 
MODELIII $3295. 

Includes a 48K Model III with one Double Sided Disk 
Drive, a 5Mega byte Hard Drive System, and DOSPLUS 4.0 



TANDON DISK DRIVES 

TMlOO-1 40Track Single Sided $199 

TMlOO-2 40Track DoObleSided $299 

CASES, POWER SUPPLIES and CABLES 
onedrive case with power supply $49.95 
2 drive cable $2455 

drive extender cable 1 1435 

printer cable $29.95 

astec power supply $ 7435 



COMPUKIT COAST TO COAST DEALERS 
COMPUTER KITS BOCA RATON FL. 
KIT-N-COMPUTER TACOMA WA. 

NAUTILUS EDMONTON ALBERTA CAN. 
MICROTECH SOFTWARE DUDLEY MA. 
SELECT COMPUTER SERVICE ANOKA MN. 



DOSPLUS 3.4 $125 
NEWSCRIPT 7.0 $110 




C.IT0H PRINTERS 

Parallel 



'lj\e ac 
sand C 



Prowriter n 
Prowriter? 14 
F10 40CDS 

F10 55CpS 



1449 
.1699 



Serial 

rS19 
799 

m 



MODEL III DISK DRIVE EXPANSION KITS 

High Quality, Low Prices 

Dont Be Fooled By The Competition 

All Drive KitsContain a .Switching Power Supply . Double Density Disk Controller. 
32K Ram .All Cables and Necessary Hardware . and an 
Installation Manual That is Simple and Easy to Use. 

Drive kit withone 40 track TM- 100-1 drive 180 KB$479. 
Drive kit withtwo 40 track TM -100-1 drives 360 KB$699. 
Drive kit with two 40 track TM- 100 -2 drives 720 KB$899. 
Drive kit with two 80 track TM100-4drives 1.4 MB$ 1099. 



NEWHARD DRIVE 
INTERNAL Model III 
KIT $1745. 

Everything You Need to upgrade a One Drive Model III 
with a 5 Meg Hard Disk Including DOSPLUS 4.0 
SAVE$70,wrth a oneDrive Kit, both for only $2 154 



NEW EXTERNAL 

MODELIII HARD DISK $1849, 

INCLUDES DOSPLUS 4.0.READY TO PLUG IN,5 MEG 

OPTIONS INCLUDE MULTIUSER CAPABILITIES, 
UPTO 120MEG.REMOVEABLE HARD DRIVE, AND 
STREAMER BACKUP SYSTEMS 



CALL US FREE 
1-80O231-6671 





\P 




713-474-7342 
713-480-6000 

MAIL ■ P.O.BOX 306 K EMAHJEX AS 77565 

or visrr our showroom in Houston 

16206 HICKORY KNOLL 

CLOSE TO JOHNSON SPACECENTER 



FREE SHIPPING 120 DAY WARRANTY 



UPS GHDUND CONTINENTAL US. PREPAID 



verbatim lObox $23 95 

SS-DD WHEN MAILED IN WITH THIS 
COUPON AND YOUR CHECK ONLY! 



cept:Visa MasterCard Certified Checks Money Order, 
.0. 0. .. C.O.D. add $1.50, Air UPS extra. 



1////A 
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Listing continued 










01130 




DI 




; DISABLE INTERRUPTS 


01140 




CALL 


DEFDRV 


; DEFINE DRIVE 


01150 




RET 




;EXIT 


01160 


CHECK2 


EQU 


$ 




01170 




PUSH 


HL 


•PUT HL 


01180 




POP 


IX 


•INTO IX 


01190 




LD 


A, (IX+1) 


PU BYTE 2 


01200 




CP 


X'CD 1 


IS IT ENCODED '+'? 


01210 




LD 


A r (HL) 


; RESTORE A VARIABLE 


01220 




RET 






01240 


ADVLIN 


EQU 


$ 




01250 




LD 


A,(HL) 


PU 


01260 




CP 





•IS IT END OF LINE 


01270 




RET 


Z 


YES 


01280 




CP 


' : ' 


•IS IT END 


01290 




RET 


Z 




01300 




CP 


i i 

r 


IS IT ANOTHER 


01310 




INC 


HL 


•DO NEXT ONE 


01320 




JR 


NZ, ADVLIN 


•YES 


01330 




CP 





•SET NZ 


01340 




RET 






01350 


CKSUM 


EQU 


$ 




01360 




PUSH 


HL 


•SAVE HL 


01370 




PUSH 


DE 


•SAVE DE 


01380 




CALL 


SETBUF 


;HL=ADDR( BUFFER) 


01390 




DEC 


HL 


•BACK UP TO BDW 


01400 




LD 


A,(HL) 


•PU BDW 


01410 




LD 


B,A 


•SET FOR LOOP 


01420 




LD 


C,A 


SET START CKSUM 


01430 


RNCSB 


EQU 


S 




01440 




INC 


HL 


NEXT BYTE 


01450 




LD 


A, (HL) 


PU BYTE 


01460 




ADD 


A,C 


ADD TO CKSUM 


01470 




LD 


C,A 


PUT CKSUM IN C 


01480 




DJNZ 


RNCSB 


DO NEXT 


01490 




POP 


DE 


RESTORE DE 


01500 




POP 


HL 


RESTORE HL 


01510 




RET 






01520 


STOPTP 


EQU 


$ 




01530 




CALL 


STOPIT 


STOP TAPE 

Listing continues 



can have both files open on the same 
drive since TFM will prompt for the 
mounting and dismounting of the cor- 
rect files. 

H is used for accessing the file, I is for 
input, O is for output, and F$ is the 
variable containing the file name; or, 
the file name can be coded as a string 
literal. 

When TFM encounters an Open, it 
first validates the logical file number 
and then the drive. Then it checks to see 
if you wish to open the file for input or 
output. If you are opening an output 
file, TFM constructs a header record, 
used for opening the file for a later read, 
and writes the header onto the tape. 

If you are opening the file for input, 
TFM reads the first record on the tape, 
and determines whether or not it is a 
TFM data file (first data byte = 
X'C3'). If it is not a TFM data file, then 
an error is printed and the file remains 
closed. If it is a TFM file, then the name 
in the header is compared with the name 
coded in the Open statement; if they 
match, the file is marked as opened in 
the file status byte. When the files don't 
match, you will get a file-not-found 
message. 

If you forget what a file name is, you 
can make the file name in Open equal to 



FREE SHIPPING 




EEElffl 

W/48K, 2 TANDON 

5 1 /4" DISK DRIVES 

NCLUDESTRS DOS 

W/RS232 

$1725 




TRS-80 MOD III Disk Controller 



Includes Disk Controller, 
Power Supply, Mounting 
Hardware, Cables and 
Instruction Manuals 



$269 

COMPLETE 




ADD COLOR to your Model I & III - $169 

TRS80 MOD III Disk Controller w/5 1 /4 & 8 Capability, RS232 and COLOR — $345 



PRINTERS 

MX80 Call 

MX80F/T $535 

MX100 685 

SMITH-CORONA TP-1 585 

(Letter Quality Daisy Wheel Printer] 

Printer Cable $26.95 ($20 w/purchase of printer) 



VISA, MASTERCARD ($ioo Mia, Add 2%) 

Or Certified Check 
90 Day Warranty (Parts & Labor) 

TRS 80 is a Registered Trademark, Tandy Corp. 
Prices Subject to Change Without Notice 




TM100-1 Single 40 Track Drive $199 

With Cabinet & Power Supply $249 

TM100-2 Double 40 Track Drive $289 

TM 100-3 Single 80 Track Drive $289 
TM100-4 Double 80 Track Drive $399 



8" Dual Slim Line Power Supply & Cabinet $249 
$Va" External Power Supply & Cabinet 49 



DATA— MAIL 

P.O. Box 81 8 Reseda. CA 91 335 
1-800-635-5555 ^45; 



FREE SHIPPING IN CONTINENTAL U.S. 
(TRS 80 MOD III EXCEPTED) 

(213) 993-4804 

(IN CALIF.) 
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12 question marks, and TFM will copy 
the file name from the tape header into 
the Open file name area. 

CLOSE#+n 

The instruction CLOSED + n tells 
TFM that you are done processing an 
open file and it is to be closed. If the file 
was an output file, then TFM checks to 
see if any data remains in the buffer 
from output operations. If it does, the 
buffer is written to the tape and then a 
short trailer record is written. The 
logical file number n is used to open 
the file. 

ERR Completion Status 

TFM only returns a completion 
status for input operations. TFM will 
return the following status codes: 

• — Normal Completion 

• 1 — End of Input File 

• 4— Input Read (CKSUM) Error 
A sample input routine is: 

100 INPUT* + 1,A$:1F ERR=0 THEN 

GOTO 130 
1 10 IF ERR = 1 THEN CLOSE* + 1 :PRINT 

"END OF FILE, RUN":END 
120 IF ERR =4 THEN ?"READ ERROR": 

CLOSE* +1:END 
130 remainder of program goes here. 



Listing continued 










01540 


EI 




RET 




ENABLE INT IF DISK 


01550 


; 




RETURN 


IF NON-DISK SYSTEM 


01560 






RET 






01570 


CKCKS 


EQU 


$ 




01580 






CALL 


CKSUM 


A=CKSUM OF BLOCK 


01590 






LD 


B,A 


SAVE IT 


01600 






LD 


A,(RCK) 


A=CKSUM READ 


01610 






CP 


B 


EQUAL 


01620 






LD 


A,0 


SET A=0 


01630 






RET 


Z 


YES 


01640 






LD 


A, 4 


SET 


01650 






RET 






00010 






ROUTINE: 


CLOSE TAPE 


FILE 


00020 




THIS ROUTINE WRITES OUT ANY UNFILLED BUFFER AND 


00030 




THEN 


WRITES 


A TRAILER BLOCK. 




00050 












00060 TCLOSE 


EQU 


$ 




00070 






CALL 


CHECK2 ; 


IS IT TAPE 


00080 






JP 


NZ,VCLOSE ; 


NO 


00090 






CALL 


SELCT2 ; 


SET FILE # TO CLOSE 


00100 






DEC 


HL ; 


BACK UP 


00110 






DEC 


HL ; 


TO BEFORE ' : ' 


00120 






JR 


Z, CLOSIN ; 


INPUT 


00130 






LD 


A,(IX+5) ; 


DATA LEFT TO WRITE? 


00140 






CP 


; 


CHECK IT 


00150 






LD 


(BLINE) ,HL ; 


SAVE ADDR( BLINE) 


00160 






CALL 


NZ,WRITEP ; 


YES-WRITE IT OUT 


00170 






LD 


(IX+5),02H ; 


BDW=2 


00180 






LD 


(IX+6),X'F0' ; 


RDW=F0 


00190 






LD 


(IX+7) ,X'BF' ; 


DATA=0F 


00200 






CALL 


WRITEP ; 


WRITE IT OUT 


00210 






LD 


HL, (BLINE) ; 


RELOAD BASIC LINE 


00220 CLOSIN 


EQU 


$ 




00230 






RES 


7,(IX+3) 


SET STATUS=CLOSED 


00240 






RES 


3,(IX+3) 


RESET EOF 


00250 






RES 


5,(IX+3) 


SET NOT MOUNTED 


00260 






CALL 


ADVLIN ; 


ADVANCE TO END 

Listing continues 



CONVERT YOUR SERIAL PRINTER TO PARALLEL 



The UP1 serial printer interfaces allow an ASCII serial printer 
to be connected to the parallel printer port on TRS-80 
Models I, II and III. 

Software compatibility problems are totally eliminated because 
the TRS-80 "Thinks'that a parallel printer has been attached. 
No machine language driver needs to be loaded into high 
memory. VISACALC, SCRIPSIT, BASIC, FORTRAN, etc. all 
work as if a parallel printer was in use. 

The UPI interfaces are completely self contained and ready 
to use. A 34 conductor cable and connector plugs onto the 
parallel printer port of the Model I expansion interface or 
onto the parallel printer port on the back of Models II and 
III. A DB25 socket mates with the cable from your serial 
printer. The UPI interfaces convert the parallel output of the 
TRS-80 printer port into serial data in both the RS232-C and 
20 MA. loop formats. 



, 



bd 



BINARY DEVICES 

Formerly SPEEDWAY ELECTRONICS 
11560 TIMBERLAKE LANE 
NOBLESVILLE, IN 46060 
(317) 842-5020 ^ 106 



is a trademark of Tandy 



VISA MasterCard 




Switch selectable options include: 

• Linefeed after Carriage Return 

• Handshake polarity (RS232-C) 

• Nulls after Carriage Return 

• 7 or 8 Data Bits per word 

• 1 or 2 Stop Bits per word 

• Parity or no parity 

• ODD or EVEN parity 

NEW VARIABLE BAUD RATE MODELS 

Switch selectable from 110-9600 BAUD 

UPI-3VB for models I or III $149.95 

UPI-2VB for model II $149.95 

UPI-3VB-6 for model I or III with 6 ft. cable $159.95 

UPI-2VB-6 for model II with 6 ft. cable $159.95 

Shipping and handling on U.S. orders. $4.00 

90 day warranty on all interfaces, ten day return privilege. 



sSee List of Advertisers on Page 435 
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Listing continued 








00270 




RET 






00010 




ROUTINE 


INPUT 


TAPE VARIABLE 


00020 


THIS 


ROUTINE 


WILL READ A VARIABLE FROM TAPE INTO THE 


00030 


BASIC VARIABLE(S) LISTED IN 


THE INPUT STATEMENT UNTII 


00040 


END OP FILE. 


BASIC 'IF ERR= 


1' 


00050 










00060 TINPUT 


EQU 


$ 




00070 




CALL 


CHECK2 


;IS IT TAPE OPERATION 


00080 




JP 


NZ,VINPUT 


; NO-GO TO ORIG VECTOR 


00090 




CALL 


SELCT2 


; SELECT 2 


00100 




JP 


NZ,BFM 


;BAD FILE MODE 


00110 RPTIN 


EQU 


$ 




00120 




CALL 


LUVAR 


; LOOKUP VARIABLE 


00130 




LD 


(BLINE) ,HL 


;SAVE BASIC LINE 


00140 




CALL 


READV 


;READ VARIABLE 


00150 




LD 


HL, (BLINE) 


; RELOAD BASIC LINE 


00160 




CALL 


ADVLIN 


;NEXT VARIABLE 


00170 




JR 


NZ, RPTIN 


;DO NEXT ONE 


00180 




POP 


BC 


;REM RET TO KEYBD INPUT 


00190 




RET 






00200 READV 


EQU 


$ 




00210 




BIT 


3,(IX+3) 


;IS IT AT EOF 


00220 




RET 


NZ 


;YES 


00230 




LD 


B,(IX+4) 


;B= READ INDEX 


00240 




LD 


A,(IX+5) 


;LOAD BDW 


00250 




CP 


B 


; COMPARE TO BDW 


00260 




CALL 


Z,READP 


; YES-READ BLOCK 


00270 




RET 


Z 


;END OF FILE 


00280 




CALL 


SETBUF 


;HL=BUFFER 


00290 




PUSH 


DE 


;SAVE DE 


00300 




LD 


E,(IX+4) 


;PU READ INDEX 


00310 




LD 


D,0 


;SET D=0 


00320 




ADD 


HL,DE 


;HL=ADDR(NEXT DATA) 


00330 




LD 


A,(HL) 


;PU RDW 


00340 




POP 


DE 


; RESTORE VAR PTRS 


00350 




LD 


B,A 


;SAVE RDW 


00360 




LD 


A, (TYPE) 


;LOAD VAR TYPE 

Listing continues 

— 



Blocking for Efficiency 

You can use TFM blocking to your 
advantage. TFM stores data on tape by 
storing an RDW in the buffer for each 
data string to be written. Therefore, to 
use TFM blocking efficiently, do not 
write large variables, such as 255-byte 
strings, to tape. You will get only one 
variable per I/O if you write 255-byte 
strings. However, if you are writing 
smaller strings, such as 50 bytes, you 
will get five variables output per 
physical block. The algorithm for out- 
put blocking is as follows: 

If the current block length plus 
LEN(V1$) plus one is greater than 255, 
then the buffer is written to tape. Other- 
wise, the data and RDW is added to the 
current end of the buffer and the cur- 
rent block length is adjusted to reflect 
the new length. 

TFM does not close any open files 
unless told to do so. So, if you edit your 
program with tape files open, they will 
remain open even after the edit. ■ 



Roger Faulds can be reached at 533 
Village Drive, Edison, NJ 08817. 



TRS-80™ "CAN YOU BUY DIRECT?" 



Buying a GENUINE TRS-80 direct, literally, means buying from 
the Tandy Warehouses in Fort Worth. For the end user this is not 
possible. However, the closer a retailer is located to the source 
the lower his cost per unit and the closer his buyer can come to 
"almost" buying direct. WE ARE CLOSER so WE SELL LOWER. 
It only takes a FREE phone call to verify this FACT. 



WARRANTY: 



ONLY A GENUINE TRS-80 purchased 
from an Authorized-Outlet can have 
the Radio Shack Warranty. 
BUYER BEWARE OF IMITATIONS. 




SAVE SALES TAX* 
PLUS DISCOUNT 




TM: TRADE MARK OF THE TANDY CORPORATION 



FORT WORTH COMPUTERS 

IN TEXAS CALL 817-573-4111 

TOLL FREE ORDER NUMBER: 1 •8 00-4 33-S-A-V-E 

377 PLAZA GRANBURY • FORT WORTH • TEXAS 76048 
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Listing continued 






00370 


CP 


3 


;IS IT STRING 


00380 


JR 


Z,STR$ 


;YES - STORE STRING 


00390 


CP 


B 


;IS LENGTH ( DATA) =TYPE 


00400 


JP 


NZ ,VTMM 


;NO. VAR TYPE MISMATCH 


00410 


INC 


HL 


;SKIP RDW 


00420 


LD 


C,B 


;LEN IN C 


00430 


LD 


B,0 


;B=0 


00431 


LDIR 




;MOVE DATA INTO VAR 


00432 


JR 


NEWRIX 


;MAKE NEW READ INDEX 


00433 


STR$ EQU 


$ 




00434 


LD 


A,B 


; RESTORE LEN 


00440 


LD 


(DE) ,A 


;SET NEW LEN 


00450 


INC 


HL 


;ADD OF TEXT 


00460 


INC 


DE 


;ADV TO ADD OF STR 


00470 


LD 


(ISA) ,DE 


; STORE ADDR OF TEXT 


00480 


ISA EQU 


$+1 




00490 


LD 


(ISA) ,HL 


; STORE ADDR OF TEXT 


00491 


NEWRIX EQU 


$ 




00500 


LD 


B f (IX+4) 


; RELOAD READ INDEX 


00510 


ADD 


A,B 


;ADD LEN TO IT 


00520 


INC 


A 


; STORE INDEX OF NEXT 


00530 


LD 


(IX+4) ,A 


; STORE NEW INDEX 


00540 


RET 






00550 


READP EQU 


$ 




00560 


BIT 


3,(IX+3) 


;IS IT AT EOF 


00570 


RET 


NZ 


;YES 


00580 


PUSH 


HL 


;SAVE HL 


00590 


PUSH 


DE 


;SAVE DE 


00600 


CALL 


SETBUF 


;SET BUFFER INTO HL 


00610 


CALL 


MOUNT 


; MOUNT TAPE 


00620 


CALL 


RDLDR 


;READ LEADER 


00630 


CALL 


RTAPE 


;READ BDW 


00640 


LD 


(IX+5) ,A 


; STORE IT 


00650 


LD 


B,A 


;SET READ LOOP 


00660 


RT1 EQU 


$ 




00670 


CALL 


RTAPE 


;READ BYTE 


00680 


LD 


(HL) ,A 


; STORE IT 


00690 


INC 


HL 


;NEXT ONE 


00700 


DJNZ 


RT1 


; REPEAT IF MORE 


00710 


CALL 


RTAPE 


;READ CKSUM 


00720 


LD 


(RCK) ,A 


; STORE READ CKSUM 


00730 


CALL 


STOPTP 


;STOP TAPE 


00740 


CALL 


CKCKS 


; CHECK CKSUM 


00750 


LD 


(ERR) ,A 


;SET STATUS 


00760 


POP 


DE 


; RESTORE DE 


00770 


POP 


HL 


; RESTORE HL 


00780 


LD 


A,0 


;SET READ 


00790 


LD 


(IX+4) ,A 


; INDEX TO 


00800 


; THE FOLLOWING CODE 


CHECKS FOR EOF 


00810 


LD 


A, (IX+5) 


;LOAD BDW 


00820 


CP 


2 


;IS IT TRAILER 


00830 


RET 


NZ 


; RETURN IF NOT TRAILER 


00840 


LD 


A,X'F0' 


;LOAD F0 


00850 


CP 


(IX+6) 


;IS IT 


00860 


RET 


NZ 


; RETURN IF NOT 


00870 


LD 


A,X'0F' 


;IS IT X'OF' 


00880 


CP 


(IX+7) 


; TRAILER?? 


00890 


RET 


NZ 


;NO 


00900 


SET 


3,<IX+3) 


;SET EOF 


00910 


LD 


A,l 


;SET END OF FILE 


00920 


LD 


(ERR) ,A 


;IN ERR 


00930 


RET 






00010 


ROUTINE 


TPRINT DATA TO TAPE 


00020 


THIS ROUTINE WILL TAKE 


THE VAR(S) OR "STR" FROM 


00030 


THE PRINT#+D,V1,V2,V3 


INSTRUCTION AND PUT INTO 


00040 


THE TAPE OUTPUT BUFFER 


UNTIL THE CURRENT BUFFER 


00050 


LENGTH + STR LENGTH > 


255, THEN THE ENTIRE BUFFER 


00060 


IS WRITTEN 


OUT. 




00070 








00080 


rPRINT EQU 


$ 




00090 


CALL 


CHECK 2 


;IS IT TAPE OPER 


00100 


JP 


NZ,VPRINT 


;NO 


00110 


CALL 


SELCT2 


;SET IT 


00120 


JP 


Z,BFM 


;BAD FILE MODE 


00130 


rPRl EQU 


$ 




00140 


LD 


A,(HL) 


;PU BYTE 


00150 


CP 


22H 


;IS IT LITERAL 


00160 


CALL 


Z,BDPTR 


; BUILD POINTER 


00170 


CALL 


NZ,LUVAR 


; LOOKUP VARIABLE 


00180 


LD 


(BLINE) ,HL 


;SAVE ADDR(BLINE) 


00190 


CALL 


WRITEL 


; WRITE VARIABLE 


00200 


LD 


HL, (BLINE) 


;RELOAD ADDR(BLINE) 


00210 


CALL 


ADVLIN 


; ADVANCE TO NEXT/ END 


00220 


JR 


NZ,TPR1 


;NEXT VARIABLE 


00230 


POP 


BC 


;REM RET TO PRINT RTN 

Listing continues 



COMPUTER REPAIRS 
CONSULTATIONS 




E & G UMLOR ENTERPRISES 

RFD#l,Box48A 
FITZWILUAM, NH 03447 



Disk Drive With Power Supply and Case 

40 Track Single Side S260 

40 Track Double Side S310 

80 Track Single Side S320 

80 Track Double Side S420 

All Drives Double Density Compatible 

For Further Information Call: 
(603) 585-3142 



Sh 




own: 



i" Mdx 



°£M/- 



CASF 



Encloses LNW & MDX I & II 

P.C. Boards, plus 

Cabling, A/C Cords, etc. 

Silver-gray Fiberglass 

$32.50 plus $2.50 shipping 
N.Y.S. residents add 7% tax 

SYRACUSE R&D CENTER 

Box 125, Dewitt, NY. 13214 

"Specializing in Electronic Packaging" 



\ferbatim 

flexible disks 

Call Free (800) 235-4137 for 

prices and information. Dealer 
inquiries invited. C.O.D. and 
charge cards accepted. 




V/SA 



PACIFIC 
EXCHANGES 

100 Foothill Blvd. 
San Luis Obispo, CA 
93401. In CaL call 
(800) 592-5935 or 
(805) 543-1037. 

^207 



vSee List of Advertisers on Page 435 
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— Professional — 

REAL ESTATE SOFTWARE 

for APPLE. TRS-80 & CPM SYSTEMS 
• PROPERTY MANAGEMENT SYSTEM: $450 



Tenant History 
Late Rent Report 
Vacancy Report 
Income Report 
Auto Late Charge 
Returned Checks 



Operating Stmt. 
Building Reports 
Utilities Report 
Tax Expense Report 
Prints Checks 
Prints Receipts 



PROPERTY LISTINGS/COMPARABLES: $325 

— SCREEN BY — —- Max/Min Price 

22 Items/Listing Max Price/Income 

1000 Listing/Disk Max Price/Sq Foot 

Listing Memo Field Min Cashflow 

REAL ESTATE ANALYSIS MODULES: $50/Module 
Home Purchase Tax Deferred Exchange 

Income Prop Analysis APR Loan Analysis 
Property Sales Loan Amortization 

Construction Cost/Protit Depreciation/ACRS Analysis 
Loan Sales/Purchase Loan Wrap Analysis 

WORD PROCESSOR - WORD STAR: $295 





Maxell 
Diskettes 



The floppy disks that meet 
or exceed every standard 
of quality. Dealer inquiries 
invited. 

Call Toll Free N 
1-800-237-8931. 

In Florida, call 
813-577-2794. y 



V 



Tech • Data Corporation 

3251 Tech Drive North 

St. Petersburg, FL 33702 ^ 44 



SEND AND RECEIVE 

MORSE CODE 

•SEND UP TO 40 WPM 
•COPY OVER 100 WPM 

Your Model I or III becomes a pro- 
grammable keyboard keyer that can 
send morse from the keyboard or 
from stored messages. Keying Is done 
either by the relay or by the audio 
output. Received morse is decoded, 
displayed, stored and printed. The 
cassette earphone plug connects to 
the receiver speaker to copy off the 
air. No hardware except patch cords 
is required for many setups. 

satisfaction guaranteed 
Cassette with instruction booklet 
only $19.95 postpaid. Model I or III, 
LEVEL II, with at least 16k required. 

ROGO Computer Products 
4752 DeBeers Drive 
El Paso, Texas 79924 ^343 



Listing conn 


nued 








00240 




RET 






00250 


WRITEL 


EQU 


$ 




00260 




LD 


C,(IX+5) j 


LOAD BDW 


00270 




LD 


A,(DE) ; 


PU VAR LEN 


00280 




CP 


X ' FF ' j 


IS IT MAX 


00290 




JR 


NZ, NORMCK , 


NO-NORMAL CK 


00300 




LD 


A,0 i 


SET A=0 


00310 




CP 


C , 


ANY DATA TO WRITE 


00320 




CALL 


NZ, WRITEP 


YES 


00330 




LD 


A,X'FF' 


RELOAD LEN 


00340 




JR 


NOWRC 




00350 


NORMCK 


EQU 


$ 




00360 




ADD 


A,C 


ADD LEN OF BDW TO IT 


00370 




JR 


CWRC 


WRITE BUFFER (FULL) 


00380 




INC 


A 


ADD 1 TO A 


00390 


WRC 


EQU 


$ 




00400 




CALL 


C, WRITEP 


BUFFER FULL-WRITE OUT 


00410 


NOWRC 


EQU 


$ 




00420 




CALL 


SETBUF 


HL=BUF 


00430 




LD 


C,(IX+5) 


LOAD BDW 


00440 




LD 


B,0 


B=0 


00450 




ADD 


HL f BC 


ADD BDW TO BUFFER 


00460 




LD 


A,(DE) 


•RELOAD LEN 


00470 




ADD 


A f C 


•ADD TO A 


00480 




INC 


A 


;ADD 1 MORE 


00490 




LD 


(IX+5) ,A 


; STORE NEW BDW 


00500 




LD 


A,(DE) 


j RELOAD STR LEN 


00510 




LD 


(HL) ,A 


; STORE RDW 


00520 




OR 


A 


;IS IT NULL STRING 


00530 




JR 


Z, NULLST 


;YES 


00540 




LD 


C,A 


;SET LEN IN C 


00550 




INC 


DE 


;ADV TO ADDR(STR) 


00560 




LD 


(LDDE1) ,DE 


;SET ADDR TO LOAD FROM 


00570 




LD 


DE,(LDDEl) 


;DE=ADDR(STR) 


00580 


LDDE1 


EQU 


$-2 




00590 




INC 


HL 


;NEXT ONE 


00600 




EX 


DE,HL 


;SWAP DE/HL 


00610 




LDIR 




•MOVE STRING INTO BUFFER 


00620 


NULLST 


EQU 


$ 




00630 




LD 


A, (IX+5) 


;PU BDW 


00640 




CP 





;IS IT ZERO 


00650 




CALL 


Z, WRITEP 


;WRITE OUT IF ZERO 


00660 




RET 






00670 


WRITEP 


EQU 


$ 




00680 




CALL 


CKSUM 


;CALC CKSUM 


00690 




LD 


(RCK) ,A 


; STORE WRITE CKSUM 


00700 




CALL 


SETBUF 


;SET BUFFER INTO HL 


00710 




CALL 


MOUNT 


; MOUNT TAPE 


00720 




LD 


A, (NUMZ) 


;PU NUM OF FOOF ' S 


00730 




LD 


B,A 


;PUT INTO B 


00740 




SRL 


B 


;B/2 


00750 


WL1 


EQU 


$ 




00760 




LD 


A,X'F0' 


; REPEAT 


00770 




CALL 


WTAPE 


;X'F00F' 


00780 




LD 


A f X'0F' 


; INSTEAD OF X'0000' 


00790 




CALL 


WTAPE 


;FOR SYNC 


00800 




DJNZ 


WL1 


; LEADER 


00810 




LD 


A,X'A5' 


;SYNC BYTE 


00820 




CALL 


WTAPE 


;WRITE IT 


00830 




LD 


A, (IX+5) 


;LOAD BDW 


00840 




LD 


B,A 


;SET LOOP 


00850 




CALL 


WTAPE 


;WRITE IT 


00860 


WT2 


EQU 


$ 




00870 




LD 


A,(HL) 


;PU BYTE OF BUFFER 


00880 




CALL 


WTAPE 


;WRITE IT 


00890 




INC 


HL 


;NEXT 


00900 




DJNZ 


WT2 


; REPEAT 


00910 




LD 


A, (RCK) 


;L0AD WRITE CKSUM 


00920 




CALL 


WTAPE 


; WRITE IT OUT 


00930 




CALL 


STOPTP 


;STOP TAPE 


00940 




LD 


A,0 


;SET 


00950 




LD 


(IX+5) ,A 


;NEW BDW=0 


00960 




RET 






00010 




ROUTINE 


: ERROR ROUTINES 


00020 


• THESE ARE 


THE ERROR ROUTINES. 


00040 


• 








00050 


IFNO 


EQU 


$ ; INVALID FILE NUMBER 


00060 




LD 


HL,ERRBFN 




00070 


ERREXX 


EQU 


$ 




00080 




CALL 


ERROR 




00090 




JP 


EDIT 




00100 


FAOP 


EQU 


$ ;FILE ALREADY OPEN 


00110 




LD 


HL,ERRFO 




00120 




JR 


ERREXX 


Listing continues 
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A NEWSLETTER FOR POCKET COMPUTER USERS 
This timely, compact publication provides up to the minute 
information on pocket computers, including models such as 
the Radio Shack TRS-80 PC-1 and PC-2, Sharp Electronic's 
PC-1500 and PC-1 211, and others as they are announced. Sub- 
scribe now to receive a valuable bonus absolutely FREE! 

■ Up to the Minute News ■ Product & Equipment Reviews 

■ Important Operating Tips ■ Practical Programs ■ More 
By Subscription Only: for a calendar year period (January — 
December). You get all issues published to date for the calen- 
dar year in which you subscribe, at the time you subscribe. 

MC/VISA Phone Subscriptions: (203) 888-1946 

D I am interested. Please send me more information. I have a: 

□ Radio Shack PC-2 □ Sharp PC-1500 □ 

D 1982 Regular Subscriber (Issues 11 - 20). $30.00 in U.S. 

(U.S. $36.00 to Canada. U.S. $45.00 elsewhere.) 
D 1982/83 Subscriber (Issues 1 1 - 30). $60.00 in U.S. 

(U.S. $72.00 to Canada. U.S. $90.00 elsewhere.) 
D 1983 Regular Subscriber (Issues 21 - 30). $36.00 in U.S. 

(U.S. $42.00 to Canada. U.S. $50.00 elsewhere.) 
Orders must be accompanied by payment in full. We do not 
issue invoices for the POCKET COMPUTER NEWSLETTER. 
Thank you for your remittance. 



Name: 

Addr: 

City: 

MC/VISA #: 

Signature: 

POCKET COMPUTER NEWSLETTER 
P.O. Box 232, Seymour, CT 06483 



State: Zip: 

_ _ Expires: 



I 
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□•□•□•□•on 

□ 



COMPUTERS °. 

□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□ 




□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□ 

• IN STOCK NOW!! call for special • 

□ prices on LNWSOs, NEC printers, □ 

• RGB color monitors, and TANDON • 

□ disk systems, □ 



□ 
□ 
□ 
□ 



***#* 



NEW LNW SOFTWARE! 



#*##•* 



□ 
□ 
□ 
□ 

□ (213) 650-5754 - (714) 973-1939 □ 

•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□•□• 



7180 Woodrow Wilson Dr 
Los Angeles, CA 90068 



express 



3K1 $ 199 



SINGLE SIDE 
SINGLE DENSITY 
W/HUB RING 



SOFT, 

100% CERTIFIED 'JJ.0R 16 

2 YEAR WARRANTEE SECTORS 



aai$2 

cimci c cine ^^■•f 



19' 



OOUBLE DENSITY 
W/HUB RING 



SOFT, 

100% CERTIFIED 10 Or 16 

2 YEAR WARRANTEE SECTORS 



r\»"Mioi c cine b»^~j 



99 



DOUBLE DENSITY 
W/HUB RING 



SOFT, 

100% CERTIFIED '" "" " 

2 YEAR WARRANTEE SECTORS 



d 



M 



99' 



SINGLE SIDE 
SINGLE DENSITY 

SOFT 

100% CERTIFIED ™ " 

2 YEAR WARRANTEE SECTORS 



$2 



49 



SINGLE SI0E 
DOUBLE DENSITY 

SOFT 

100% CERTIFIED "" " 

2 YEAR WARRANTEE SECTORS 



01 $qoa* 

DOUBLE SIDE ^^ 
DOUBLE DENSITY 

SOFT 

100% CERTIFIED "" " 

2 YEAR WARRANTEE SECTORS 



Minimum order 10 

Packed 10 boxes of 10 diskettes with sleeves and labels 

Quantity discounts - 100 deduct 5%, 

1,000 deduct 7%, 5,000 deduct 10% 

Add S5.00 per case 5V4", $7.00 per case 8" (case of 100) 

For shipping and handling Continential U.S.A.. U.P.S. ground. 



VINYL STORAGE PAGES 
5%"or8" 10/S5 



SNAP-IT POWER CENTER u^. 

Turn one outlet into six V * 

• Shock-sate .Jk • 

• Unbreakable *v '*» 

• 15 Amp Circuit Breaker ~^ 

• Lighted On-Oft Switch SI 9.95 



HAHDHOLE DISK PROTECTORS 

Reinforcing rings 
ol tough mylar 
protect disk hole 
edge Irom damage. 

Applicators 

Hardhole Rings '50) 



5W 8" 
S3 S4 
S6 S8 



DISK DRIVE HEAD 
CLEANING KITS 

Prevent head 
crashes and 
ensure error-tree 
operation 
514" or 8" 




$19.50 



SFDC- 10 CASSETTES 

(All cassettes include box and 
Get 8 cassettes, C-10 
Sonic, and Cassette/8 
Library-Album, 
as illustrated, 
for only S8 



I0/S7 




LIRRARY CASES 

8" Kas-sette/10 $2.99 

514" Mini Kas-sette/10. . . $2.49 




We also slock ai FANTASTIC low prices 

MAXELL 3M DYSAN 

BASF OPUS 

Floppies. Tape, Oala Cartridges, 

Data Cassettes, and Oi'k Packs 



• Written purchase orders accepted from government 
agencies and well rated firms for net 30 day billing.* International orders 
accepted with a 15.00 surcharge for handling, plus shipping charges. • C.O.D. 
requires a 10% deposit. • We accept Visa, Mastercharge, Money Orders, and 
Certified checks. • Checks require bank clearances. • All shipments FOB. San 
Diego. • Minimum shipping and handling 2.00. minimum order 10.00. • California 
residents add 6% sales tax. Prices and terms subject to change without notice. • 
All sales subject to availability, acceptance, and verification. • All sales are final. • 
Satisfaction guaranteed or full refund. 



We also offer printer ribbons, printwheels, type elements, 
equipment covers, power consoles, paper supplies, storage and 
filing equipment, furniture and many other accessories for word 
and data processing systems. Write for our free catalog. 



ABC 



Toll Free Order Only ^^^ 

ftnn-RR/i 1 RRR DATA PRODUCTS 

OUU 004 1000 (FORMERLY ABM) 



For Information 
or California Orders 



(FORMERLY ABM) 

^286 
8868 CLAIREMONT MESA BLVD. 



(1 \ h\ OCO OCOl oooo ^lmihciviuin i ivitsA blvu. 
I / I 4 J C DO'OUO I SAN DIEGO, CALIFORNIA 9*2123 
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Introducing: 
THE ALL-PURPOSE SHOPPER 

A complete guide to 
fast and economical shopping 

*•••**•••*••**•*•* 

• Models I & III, IBM 

• Menu driven for efficient operating 

• Complete documentation 

• All systems are disk based 

• Run-time diskette 

• Soon to be available on models II & 
Apple II 

•••••••••••••••••a 

Due to the number of options available, please write 
for more details and price information 

(Written inquiries, please include a 
self-addressed stamped envelope) 

AFTER PLAYING GAMES SO LONG 

IT'S TIME FOR SOME: 
SERIOUS PERSONAL COMPUTING 
P.O. BOX 7059 S. NASHUA, N.H. 03060 

603-888-1376 ^528 




SUPER GRAPHICS^ SOUND 



wi jusi am0ih(r jhooi (m 00*1 gam*. oaosgame kquks so* 

iipiow 3] diihuskt stars *tth ovir ioc fumis. (ncoubter t 

the 200twg witch. space demons and much more' 

edr those 0ea01t ex0r7ap a 

out oe mkt. 10URE GOT TO I 

TO A ERIENOIV PIAWT: »l> ONE TWIG TO 00 NO*. YOtTU NAIE TO BLOW UP THE HOSIM PlANlt TO I 

SHE AHEAD UE THE MTSTERT S10CKS. THE 200TING VTITCH. SPACE "ORTRESS ANO THE EMRGT HUE. CA. 

MAKE IT THROUGH' THE DECISION IS YOURS. (WO OUT 8T SENDING EOR OAOSGAME. 

16KTAPE S14.95P0SI) 

32K DISK SI9.95 posl I 



FOR MODEl I ANO III TRS-80 



y%ATSOFT 



BE SURE TO INCLUDE MOOEl AND WHETHER FOR OISK OR TAPE. 

VISA ACCEPTED BUT REMEMBER TO INCLUDE EXPIRATION DATE 
SEND ORDER TO: KATAHDIN SOFTWARE 

35 W. BROADWAY .: 

LINCOLN, MAINE 04457. '4 

Dealer inquires welcomed L ~iJ 



Save Grief & Aggravation 

—Know Before You Buy— 

READ 

"Consumer Protection for 
the Microcomputer Owner" 

COVERS: 

1. Preliminary Considerations before Buying 

2. Legal Differences between Mail Order and 
Local Store 

3. Pitfalls and Protection of Paying by Cash, 
Check, Credit Card, etc. 

4. What a Warranty Really Is 

5. How to Complain Etfectively 

6. How to Legally Reject and Revoke 
Acceptance of Goods 

7. Miscellaneous Hints and Suggestions 

ONLY $15 Pott Paid (COD $3 Extra) 

Send Check or Money Order to 

L. J. KUTTEN, ATTORNEY 

201 South Central 

P.O. Box 16185 

St. Lou It (Clayton), MO 63105 

314-721-6644 
Mo. Raaldcnti add 4.625% talM tax 

CompuServe ID #70655,376 Source ID# TCK092 

^-444 



Listing continued 








00130 BDN 


EQU 


$ ;BAD DRIVE NUMBER 


00140 




LD 


HL,ERRBDN 




00150 




JR 


ERREXX 




00160 IFO 


EQU 


$ ; INVALID 


FILE OPTION (I/O) 


00170 




LD 


HL,ERRIFO 




00180 




JR 


ERREXX 




00190 VTMM 


EQU 


$ 


VARIABLE TYPE MISMATCH 


00191 




OR 


30H 


SET PRINTABLE DEC 


00192 




LD 


(VARTYP) ,A 


VARIABLE TYPE 


00193 




LD 


A,B 


SET TAPE TYPE 


00194 




OR 


30H 


SET PRINTABLE 


00195 




CP 


3AH t 


COMPARE TO 3A 


00196 




JR 


C, OKTPRT j 


OK TO PRINT 


00197 




LD 


A,33H 


SET STRING 


00198 OKTPRT 


EQU 


$ 




00199 




LD 


(DATYP) ,A j 


STORE TAPE TYPE 


00200 




LD 


HL,ERRTMM 




00210 




JR 


ERREXX 




00220 VTL 


EQU 


$ ; VARIABLE TOO LONG 


00230 




LD 


HL , ERRVTL 




00240 




JR 


ERREXX 




00250 FC 


EQU 


$ ;FILE ALREADY CLOSED 


00260 




LD 


HL,ERRFC 




00270 




JR 


ERREXX 




00280 BFM 


EQU 


$ ;BAD FILE MODE 


00290 




LD 


HL,ERRBFM 




00300 




JR 


ERREXX 




00310 FNF 


EQU 


$ ;FILE NOT FOUND 


00320 




LD 


HL f ERRFNF 




00330 ERX2 


EQU 


$ 




00340 




RES 


5,(IX+3) 




00350 




JR 


ERREXX 




00360 NDF 


EQU 


$ ;NOT DATA FILE 


00370 




LD 


HL , ERRNDF , 


ERROR MESSAGE 


00380 




JR 


ERX2 




00390 EDIT 


EQU 


$ 




00400 




LD 


HL,(40A2H) 


PU CURRENT LINE 


00410 




LD 


DE,X'FFFF' 


SET DE=FFFF 


00420 




RST 


18H 


COMPARE HL TO DE 


00430 




JP 


BEDIT 


JUMP TO BASIC EDIT 


00010 




DSEG 






00020 NOPEN: 


JP 


TOPEN 


NEW 


00030 NCLOSE: 


JP 


TCLOSE 


•TAPE 


00040 NINPUT: 


JP 


TINPUT 


; MANAGEMENT 


00050 


SPRINT: 


JP 


TPRINT 


; VECTORS 


00060 VOPEN: 


DS 


3 


•OLD OPEN VECTOR 


00070 VCLOSE: 


DS 


3 


;OLD CLOSE VECTOR 


00080 VINPUT: 


DS 


3 


;OLD INPUT VECTOR 


00090 VPRINT: 


DS 


3 


;OLD PRINT VECTOR 


00100 


SRRFO: 


DB 


'FILE ALREADY OPEN',0 


00110 


3RRFC: 


DB 


'FILE ALREADY CLOSED' ,0 


00120 


3RRTMM: 


DB 


'VARIABLE TYPE MISMATCH. VAR-' 


00121 VARTYP: 


DB 


32H,', DATA-' 




00122 DATYP: 


DB 


30H,0 




00130 


:rrvtl : 


DB 


' VARIABLE TOO LONG ' , 


00140 


:rrbfn : 


DB 


'BAD FILE NUMBER 


',0 


00150 


2RRFNF : 


DB 


'FILE NOT FOUND' 


,9 


00160 


2RRBDN : 


DB 


'BAD DRIVE NUMBER' ,0 


00170 


SRRIFO: 


DB 


'INVALID FILE OPTION ( I/O) ' ,0 


00180 


SRRBFM: 


DB 


'BAD FILE MODE* , 


1 


00190 


IIRRNDF : 


DB 


'NOT DATA FILE' , 


i 


00200 DUMLEN: 


DB 


00H 


LEN FOR DUMMY STRING 


00210 DUMADD: 


DW 


0000H 


ADDR OF STRING TEXT 


00220 BLINE: 


DW 


0000H 


HOLD AREA FOR MOST 


00230 








CURRENTLY SAVED HL 


00240 RCK: 


DB 


00H 




00250 NUMZ: 


DB 


00H 




00260 FILE1 


EQU 


$ 




00270 




REPT 


2 




00280 




DB 


00H 


FILE VAR LEN 


00290 




DW 


0000H 


FILE NAME ADDRESS 


00300 




DB 


00000000B 


FILE STATUS BYTE 


00310 


BIT 


MEANS 






00320 


7 


0-CLOSE 


,1-OPEN 




00330 


6 


RESERVED 




00340 


5 


MOUNTED 


0-NO,l-YES 




00350 


4 


0-INPUT 


,1-OUTPUT 




00360 


3 


1-INPUT 


AT EOF 




00370 


2 


RESERVED 




00380 


1 


LOGICAL 


FILE NUMBER 




00390 





DRIVE NUMBER 




00400 




DB 


00H 


READ INDEX FOR BUFFER 


00410 




DB 


00H 


BLOCK DESCRIPTOR 


00420 




DS 


256 


I/O BUFFER 


00430 




ENDM 






00440 




END 


ENTRY 
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^^k 3 Easy Steps 
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Q^ To Better Comput 
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1 . Find the LOAD 80 dealer nearest you. 










2. Visit his store. 












3. Buy LOAD 80. 










1 Once you 
how easy it 
you live. 


discover how much time and money you can save using LOAD 80 — and just 
is to use — you may never want to keyboard another program as long as 






• LeominsterNcws 
i 6 Merriam Ave. 

Leominster, ma 01453 
1 617-534-8237 


Computer Discount of A Radio Shack * The Carpenter Co. 
West Mllford Mall Morrislown Mall 330 Mclntyrc Rd. 
West Millord. NJ 07480 Morrislown. NJ 08057 Pittsburgh. PA 15237 
201-728-8080 609 779-8877 412-4869085 


King Electronics 
Town & Country Shop. Ct 
Aberdeen. NC 28315 
919-944-2600 


American Software Tech 
2305 Ponce dc Leon Blvd. 
Coral Gables. KL33I34 
305-864.2305 






* North Eastern Comp. So. 
462 Moody SI. 
Wallham. MA 02154 
6I7-899-3540 


• Software City Computer Encounter Personal Software 
147 N. Klnverkamack Rd. Princeton N. Shop. Clr. Rle. 23 <3 Rte. 345 
Monlvale. NJ 07645 Princeton. NJ 08540 Elverson. PA 19520 
201-391-0931 609-924-8757 215-286-9664 


Sound Mill 

Slocum Shopping Center 

Havclock. NC 28532 

919-447-5988 


H & H Hobby Sales 
4121 S. Tamlaml Trail 
Sarasota. FL 3358 1 
8 13-922-77 11 






Mlerocon Software Ctr. 
25 Elm St 
Watertown. ma 02 172 


• Software City Bargain Brothers Wills Computer Store 
161 Cedarland 2 16 Scotch Rd. 4410 Stamp Rd. 

Tcaneck. NJ 07666 W. Trenton. NJ 08628 Marlow Hgls.. MD 20031 
201-692-8298 609-883-2050 301-423-4525 


Rayburn Micro-Electron 
27 E. Main St. 
Sylva. NC 28779 
704-586-8133 


Paperback Booksmllh 
8201 S. Tamlaml Trail 
Sarasota. FL 33583 
81 3-922.5269 






Vineyard Electronics 
Stair Rd. 

Vineyard Haven. MA 02568 
1 617-693-5600 


Computer Madness Crowley's Pentagon Bookstore 
Summerton Shopping Clr. Rt. 22. Rd. 3. Box 570 The Concourse 
Englishlown. NJ 07726 Whitehouse Station. NJ 08889 Washington. DC 20301 
201462-9696 201-534-2722 202-6950870 


Anderson Electronics 
803-225-6422 


Micro Computer Center 
14932 N. Florida Hwy 
Tampa. FL 336,2 
813-961-5269 






• Turfs Radio 
61 Lowell Rd. 

Hudson. NH 03051 


Digibyte Bowes Books 
31 E. 31st 7 18 Great Mills Rd 
,, J J? ectronlcs R/S New York NY i00l6 Lexington. MD 20653 
HLccttslow'n''v7OT840" 212-889-8130 301-863-6200 
201-852-6976 


Megat roil- Radio Shack D j 
Heritage Plaza . Ma6lson bo^ 
llilion Head Plaza. SC 29926 a006 . 5 Madiso „ p, kr 
803785-9630 Madison. AL 35758 
205772-9250 






! Radio Shack 
148 Key Rd. 
Keene.NH 03431 
603-3570100 


RD Inlernalional Co. 

a/y-, u: dvH ^i The Conim Center. Inc. 

Roc^v SSC- N- Vort NV ',0036 

"Z^ZllwZ 2,2-307-0266 Zt^T° 

201-361-3400 J01S53-83S3 


■ Akanta Computer Marl 
5091-BBulordHwy. 
Atlanta. G A 30362 
4044550647 


Hooper Electronic Supp 

495 Rodenhurg Ave. 1 

Biloxl. MS 39531 






Corner News 
Railroad Square 
Kccne. NH 03431 
6033574696 


Programs Unlld. /While 

131 Mamaroneck Ave. B Dalum Booksellers 

White Plains. NY 10601 Rls - I-270& MD85 
9 14-76 1 -9283 Frederick. MD 2 1 70 1 
MT Electronics R/S 


" Soil ware To-Boot 
8514 Cindy St. 
Savannah. GA 31406 
912-927-2017 


Eli/abethtown Electron 

Elizabelhlown PJaza I 

Elizabethlown. KY 42701 

502-765-5070 






' • Wm. Holt Association 
j 31RaynesAve. 

Portsmouth. Nil 03801 
603431-7438 

Computer Dynamics 
1 1 Portland Hill 
Georgetown. CT 06829 
2032350643 


8 Main Street 

Sparta. NJ 0787 1 Programs Unlld.. Inc. 

201-729-5719 20A Jericho Turnpike 

Jericho. NY 1 1753 Hlmcock Tcchlronlcs 
516-997-8668 33 W. Mam St. 

Happy Hooker Hancock. MD 21750 

Morns County Mall 301-678-6000 

Cedar Knolls. NJ 07927 Tr "' Computer Shoppe 

201-539-4240 283 Medford Ave.. Rte. 1 12 

^SS^« ' '" 2 A ™ lc Electronics. IN 

5 16-758-6558 7026-28 Columbia Pike 

Annandate. VA 22003 


• City Newsstand 

901 E. New Haven Ave. 
Melbourne. FL 32901 
305 7250330 

Cape News Co. 
700ClcarlakcRd. 
Cocoa. FL 32922 
813-870-1970 


Jerry's Computers 1 
Euclid Arcade 1 
Cleveland. OH 441 15 1 
216-579-0648 

Data Link Clr. 

4920 Airway 
Daylon. OH 45431 
513-252-1613 






Alban. Inc. 

1 1 Portland Hill 

Georgetown. CT 06829 

203-544-9236 

* Computer Scrvlccs/DANB 
1 Franklin St. 
Danbury.CT 06810 
1 203-743-1299 


Morris County Statlonc Computerland 

Chester Springs Shop. Ctr 46-50 Main St . 

Chester. NJ 07930 Massena. NY 13662 

201-879-5776 315-769-9971 • Community Electronics 

258 Broadview Ave. 

Warrenton. VA 22186 
Computer Workshop Red-Ten Radio Shack 703-347-1339 
1200 Haddenfleld Rd. 129 E. 4th St. 
Cherry HIM. NJ 08002 Watkins Glen. NY 14891 
609-665-4404 606-535-2233 


* 


Suppliers 


of Load 80 Disks 
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1 
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Software Marl 
352 Illoomfield Ave 
Caldwell. NJ 07006 
j 201-228-4949 


K & s Newatand 

Radio Shack Artco Electronics 1249 Corporation Pkwy. 
Cherry Hill Mall Back Mountain Shopping Ctr Wlnslon Salem. NC 27 107 
Cherry Hill. NJ 08034 Shavertown. PA 18708 919-724-7537 






frr 


Jjj 








The Computer Nook 
Pine Brook Plaza. Rle. 46 
Pine Brook. NJ 07058 
201-575-1192 


Pamper yourself. 






APT 

1 vm 

mJSm 

SI 1 ' 


HP' qBjBVH 








Computer Dimensions 
116 Elm St. 
Westfleld. NJ 07090 
j 201-232-8300 

Computer Corner of NJ 

439 Route 23 

Pompton Plains. NJ 07444 

201-835-7080 


Pamper your computer. 

Use LOAD 80 cassettes and die 

A subsidiary of Wayne Green Inc. 
Peterborough, N.H. 03458 USA 


»ks. 








s 5 
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HUMOR 



LOAD 80 



KTI takes on the world of Disk Operating Systems. 



DROSSDOS/8E 



DROSSDOS/8E 
Kitchen Table Inc. 
Sri Lanka 

David D. Busch 
515 E. Highland Ave. 
Ravenna, OH 44266 

DROSSDOS banner design 
by Dave McGlumphy 

Kitchen Table Inc. has just released an 
early version of its disk operating sys- 
tem, DROSSDOS/8E. The new DOS is com- 
patible with the Basic Misinterpreter, re- 
viewed in 80 Micro in April 1982. 

DROSSDOS reacts, in varying degrees, to 
41 different DOS commands. Type Verify, 
for example, and the program asks for your 
name twice. If both answers are the same it 
reports "That is correct." Ask to kill a file, 
and it playfully responds it accidentally 
destroyed the wrong file. Those wishing to 
invoke PROT are informed that access is 
denied because they are deemed not intelli- 
gent enough to understand that command. 
When using Free, the operator is charged 
$5 by the computer. Copy checks to see if 
the program being duplicated is copy- 
righted, and I won't even tell you what hap- 
pens when you type Debug. 

How it Works 

Like most modern disk operating sys- 
tems, DROSSDOS does not reside entirely 
in the computer's memory at one time. In- 
stead, it pulls in a series of System overlays 



The Key Box 

Basic Level II 
Model I or III 
Disk System 
NEWDOS80 



to accomplish commands. Writing these 
System programs is very time-consuming. 
The Kitchen Table programmers were 
tempted to take some small short cuts. 
Thus was born DROSSDOS/8E, which uses 
NEWDOS80 for most of its routines. 

For example, there are two ways of pro- 
viding a user with a disk directory. One 
method would be to write a long disk I/O 
routine. But DROSSDOS accomplishes the 
same task with a single, elegant command: 



CMD"DIR." The only drawback is that you 
must own NEWDOS80 to use this version of 
DROSSDOS. Many of the functions work 
under TRSDOS, LDOS or earlier versions of 
NEWDOS. Many will not. But considering 
the general confusion surrounding KTI 
products, the programmers did not feel this 
was much of a limitation. 

Recognized commands are stored in 
data lines and read into a string array, 
CM$(n). The DROSSDOS/8E Ready prompt 



Program Listing. DROSSDOS/8E and 9BASIC 

1 i **************************************************** 

* * 

* DROSSDOS * 

* * 

2 ' * By: David D. Busch * 

* 515 E. Highland Ave. * 

* Ravenna, Ohio 44266 * 

* * 

3 i **************************************************** 

10 CLEAR 8000 

15 DEFINT A-Z 

20 DIM CM$(50) 

25 DIM E$(18> ,CP$(200) ,SP$(18) 

30 : FOR N=l TO 41 

40 : READ CM$(N) 

50 : NEXT N 

60 DATA APPEND ,ATTRIB, AUTO, BASIC, BLINK,BOOT, BREAK, CHAIN, CHN0N,CL 

EAR, CLOCK, CLS, COPY, CREATE, DATE, DEBUG, DIR , DO, DUMP, ERROR, FORMAT, F 

REE, HIMEM,JKL, KILL, LC,LCDVR, LIB, LIST, LOAD, PAUSE, PDRIVE, PRINT, PRO 

T, PURGE 

70 DATA RENAME, ROUTE, SYSTEM, TIME, VERIFY ,WRDIRP 

71 DATA 191,131,131,189,32,191,131,131,189,32,190,131,131,189,32 
,190,131,131.32,190,131,131,32,32,32,32,184,135,32,191,131,131,1 
89,32,190,131,131,189,32 

72 DATA 190,131,131,32,32,32,32,75,73,84,67,72,69,78 

73 DATA 191,32,32,191,32,191,131,175,145,32,191,32,32,191,32,17 8 

74 DATA 131,171,148,17 8,131,171,148,32,160,158,129,32,32,191,32, 
32,191,32,191,32,32,191,32,17 8,131,171,148 

75 DATA 32,32.32,32,84,65,66,76,69 

76 DATA 131.131.131.129,32,131,32,32,131,32,130,131,131,129,32,1 
30,131,131,32,130,131,131,32,32,131,32,32,32,32,131,131,131,32,3 
2,130,131,131,129,3 
,130,131.131.32.32.32,32,32,32,73,78,67,46 

79 CLS:FOR N=l TO 53:READ A:POKE N+15360 ,A:NEXT N:F0R N=65 TO 11 
6:READ A:POKE N+15360 ,A:NEXT N:FOR N=129 TO 180:READ A:POKE N+15 
360,A:NEXT N 

80 PRINT @ 256, nn ; 

90 PRINT"DROSSDOS/8E READY" Lining continues 
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is displayed, and the user's command input 
in line 100. A For.. .Next loop checks for the 
presence of each of the valid commands 
(through INSTR, line 120). If one is present, 
control jumps to line 150, the world's long- 
est On. ..GOTO statement. If no recognized 
command is found, the computer responds 
with a helpful "Huh?" 

The rest of the program consists of the 
computer's response to the commands. In 
some cases user input (A$) is paired with 
CMD so the DOS function can be carried 
out from Disk Basic. In other cases, the 
command is refused, with a plausible ex- 
cuse given. Other routines perform some 
task designed to discourage the user from 
ever employing that command again. 

How to Combine with Basic Misinterpreter 

DROSSDOS/8E can be used alone, or, fol- 
lowing the instructions with this review, 
merged with 7BASIC to provide an ersatz 
operating combination. Then you may trav- 
el between DROSSDOS and 7BASIC, using 
CMD"S" and BASIC. Or, invent a command 
of your own. Unlike other software, Kitchen 
Table programs are remarkably forgiving. 
Because it is written in Basic, DROSSDOS 
is probably the easiest DOS to debug. 

If you have 7BASIC, remove the Clear 
statement, the DIM statement and renum- 
ber so the lowest line number is 10000. Use 
10-line increments, so there will be room for 
additional routines. 

Save the program using the A option 



(SAVE"BASIC/BAS",A") and then merge it 
with DROSSDOS/BAS. Next, add this line: 
10195 BFLAG = 1. Make sure program con- 
trol in line 905 passes either to line 10190 or 
whatever line in your renumbered program 
is after the array reading statements in 
7BASIC. 

Finally, add a CMS"S" command to the 
program to allow going back to DROSSDOS 
as necessary. Use a line like this: 

10232 Y$ = "CMD" + CHR$(34) + "S": IF LEFT$<A$,5) = Y$ 
THEN CMD"VERIFY":CLS:GOTO 100 

When CMD"S" is entered from 7BASIC, the 
system will first activate the disk drives 
through the Verify command, chosen be- 
cause it starts up the drives without printing 
anything to the screen. A POKE could also 
be used, but it was quicker to type Verify 
than look up the correct location in a mem- 
ory map. Next, the screen will clear and con- 
trol will transfer back to DROSSDOS. 

Jumping from DROSSDOS to 7BASIC 
has already been taken care of. When Basic 
is entered, control passes to line 900, where 
the sneaky Verify command is carried out, 
and an imaginative "7BASIC by Kitchen 
Table, Inc" is printed. 

I hope you enjoy this Basic version of 
DROSSDOS/8E as much as I enjoyed sneak- 
ing it past Kitchen Table Inc.'s security 
guards. In the future, I may be able to leak 
Basic versions of SUPERDUPERZAP and 
other utilities which are not powerful or 
elegant, but will be very, very cheap. ■ 



Listing continued 



100 
110 
120 
130 
140 
150 
0,3 
0,6 

155 



LINEINPUT A$ 

FOR E=l TO 41 

IF INSTR(A$,CM$(E))<>0 GOTO 150 
NEXT E 
PRINT "HUH?": GOTO 100 

ON E GOTO 160,170.180,190,200,210,220,23 
30,340,350,460,490,500,510,520,530,540,55 
40,650,720,730,7 40,750,770,800,810,820,83 



0,241 
0,561 
0,87( 



,250,26f 
,590,601 



,270,28 
,610,63 



****** 



DOS STATEMENTS AND ROUTINES ****** 



160 PRINT" SORRY, APPEND DOES NOT WORK WELL. TRY ";CHR$(34); B MER 
CjL ;CHR9(j4) j GOTO 100 

170 PRINT CHR$(34); n ATTRIB B ;CHR$(34); n — WHERE LOU GRANT WORKS." 

:GOTO 100 

180 PRINT"SORRY. COMMAND TEMPORARILY OUT OF ORDER. PLEASE NUMB 

ER PROGRAM LINES YOURSELF ." :GOTO 100 

190 GOTO 900 

200 FOR G=l TO 10:PRINT CHR$(23):FOR H=l TO 10:NEXT H:CLS:PRINT" 

*";:NEXT G:CLS:GOTO 100 

210 PRINT "NO": GOTO 100 

220 CLSrFOR N=l TO 1024 STEP 65:POKE 15360+N,191:NEXT N:PRINT @ 

800,"";: GOTO 100 

230 PRINT"CHAINING NOT ALLOWED DURING EVEN NUMBERED YEARS": GOTO 

100 

240 PRINT "USELESS COMMAND" : GOTO 100 

250 FOR N=l TO 4:PRINT STRING$(255 ,191) ; :NEXT N:GOTO 100 

260 FOR G=l TO 10:FOR Y=l TO 59:PRINT @ 53 , "00: 00: ";Y; :NEXTY:NEX 

T G: PRINT: PRINT"MY HOW TIME FLIES WHEN YOU'RE HAVING FUN!":GOT01 

00 

270 GOTO 250 

280 PRINT "IF, DURING COPY, THIS PROGRAM IS DETERMINED TO BE" 

290 PRINT" COPYRIGHTED, YOUR NAME WILL BE FORWARDED TO THE" 

300 PRINT" PROPER AUTHORITIES. YOU HAVE BEEN WARNED." 

310 CMD A$ 

320 GOTO 100 

330 PRINT"OKAY":GOTO 100 

340 PRINT"DATING SERVICE CLOSED" :GOTO 100 

350 FOR G=l TO 5 

360 FOR T=64 TO 120 Listing continues 



HUMBUG! 

(to high prices) 

TRS 80™' Model III 48 K 
2 Disk Drive 

G3 Tandon drives SS/DD 

[y| Astec Power Supply 

[^ 40/80 track support on 
controller board 

[vfl TRS DOS 

120 day warranty 

$1695 complete 

*Trade Mark Tandy Corp. 



ASHLAND COMPUTER 

1716 Wilshire Blvd. 

Ashland, KY41101 
(606) 325-2210 
Call 10-6 M-F 




No More Waiting 

For Quality Educational 

Software ... It 's Here ! 

New! Compmjtor "Math & Mystery "is a 
unique educational program that makes 
learning fun and exciting. 

Features Include: 

* 3 Math Categories 

* 1or2 Student Option 

* Ideal For Progress Monitoring 
* Category Selection By Each Student 
* Mystery Words For Bonus Points 

* Word Skills Development 

* Ages 8yrs.- Adult 
Addition -Subtract ion, Multiplication, 

Basic Algebra 



irinitadJ'/^<§f 



►>281 



PO Box 1464 Maryland Heights.Mo.63043 
Phone 314-576-0047 

To order"Math&Mystery" send checkormoney order 
plus $2.00 shipping- handling. 

Disk Version D Cassette Version D Model I a 

32K Level II $29.95 16K Level II $29.95 Model III D 



Name _ 
Street. 



^See List ot Advertisers on Page 435 
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COLOR— ST I CK 



N HERE AT LAST' 

Finally an interface for the Color 
Conputer to let you use the famous 
x ATARI JOYSTICK' 

Just plug it into the joystick port 
and plug the Atari Joystick into it. 
The Color-Stick can isprove scores 
50% and more while making sate ganes 
more exciting and fun to play. 

Color-Stick interface $19.95 each 
or two for $34.95. (less joysticks) 
Atari Joysticks $9.95 each. 

Better Software Company 
P.O. Box 2778 
Greenvil le S.C. 29692 
(893-295-3648) 



Add $2.80 per order shipping and 
handling, we accept VISA, MASTERCARD 
CHECKS and HONEY ORDERS. 
C.O.D. add $3.08 extra per order. 
S.C. residents add 47. sales tax. 



Tired of just 
PEEKing around??? 

DII.DATo 

The Disassembler 

That Even Tracks 

Down DATA!!! 



S> 



For your disassembler, wouldn't you like one that — 

•Outputs" H37F7 UtFM 'Cass?' 

D£FB 03H " 

instead ot the meaningless "equivalent", 





B,t 


.0 


H,C 


LD 


(ML) 


.u 


(ml; 



• Automatically identifies such data areas? 

• Outputs fully labeled EDTASM'-format code to 
display, printer, cassette or disk? 

• Relocates itself to any desired RAM area, up/down 
one byte or as many as required? 

• Runs on trs'-80 Model I (Level II) or Model III. 
16K or more, cassette or disk? 

To order Dlf flDATo phone (513) 435-4480 
(M-F. 9 a.m. - 5 p.m. EST), or send check or money 
order for: 
#1354-10, (Cassette) S24.95 

♦ 1.50 shipping 
#1354-20. (Model III diskette) S29.95 

+ 1.50 shipping 
to the address below 
(Ohio residents please add 6% sales tax.) 




at Software for both 
ce and Expert 



Software 



Pro/Am Software 

220 Cardigan Road ^ 260 

Centerville, Ohio 45459 

We accept Visa/Mastercard 
When ordering via card include card number, 
interbank number, expiration date, your name, 
address and pnone number 



Listing continued 

370 PRINT t§ T,CHR$(32) ;"******0"; 

3 80 NEXT T 

390 PRINT @ 120,STRING$(8,32); 

400 NEXT G 

410 FOR N=l TO 5 

420 PRINT 6 120,STRING$(8,191); 

430 PRINT @ 120,STRING$(8,32) ; 

440 NEXT N 

450 GOTO 100 

460 PRINT"GOOD IDEA! I'M CURIOUS, TOO." 

470 FOR G=l TO 100: NEXT G 

480 CMD A$:GOTO 100 

490 PRINT"NO CHAINING ALLOWED DURING EVEN MONTHS" :GOTO 100 

500 PRINT"OOPS. CODE HAS BEEN COMPLETELY DUMPED FROM MEMORY": GOT 

O 100 

510 PRINT "EROR":GOTO 100 

520 PRINT"WORST CASE FORMAT COMING UP. ARE YOU IN FOR A SURPRISE 

":CMD A$:GOTO 100 

530 CMD A$: PRINT "THAT WILL BE $5.00 PLEASE" :GOTO 100 

540 PRINT "YOU'VE GOT TO BE KIDDING": CMD A$:GOTO 100 

550 CMD A$:CMD A$: PRINT" EXTRA PRINTOUT FREE OF CHARGE" :GOTO 100 

560 CMD A$:PRINT"OOPS. I THINK I JUST KILLED THE WRONG FILE." 

570 PRINT"HOW FAMILIAR ARE YOU WITH THE HASH INDEX TABLE?" 

580 GOTO 100 

590 PRINT"USELESS COMMAND" :GOTO 100 

600 GOTO 590 

610 CMD A$:PRINT"OVERDUE", "CHECKOUT", "REFERENCE ONLY" 

620 GOTO 100 

630 PRINT" 1 — LOAF BREAD" : PRINT" 2 — QUART MILK": PRINT" 3 

— PICK UP JIMMY AT CUB SCOUTS" :GOTO 100 

640 CMD A$:PRINT"WARNING! FILE LOADED INTO ROM!":GOTO 100 

650 T$="PAUSE" 

660 FOR G=l TO 5 

670 PRINT MID$(T$,G,1); 

680 FOR N=l TO 200: NEXT N 

690 NEXT G 

700 PRINT 

710 GOTO 100 

720 CMD A$:PRINT"DO YOU HAVE A PDRIVER'S LICENSE?" : GOTO 100 

730 PRINT "NO. MY SCREEN IS SORE TODAY": GOTO 100 

740 PRINT"ACCESS DENIED. YOU ARE NOT SMART ENOUGH TO USE THIS C 

OMMAND":GOTO 100 

750 PRINT" PURGE MODULE:" 

760 PRINT "ENTER NAME OF PERSON TO BE BLACKLISTED: ": GOTO 100 

770 PRINT "SURPRISE! I RENAMED THE FILE AND WON'T TELL YOU" 

780 PRINT "WHAT I NAMED IT. HOPE YOU DIDN'T NEED IT FOR SOMETHI 

NG" 

790 GOTO 100 

800 PRINT"BAD PLAN. PLEASE RECONSIDER" : GOTO 100 

810 PRINT" I HOPE YOU KNOW WHAT YOU ARE DOING": CMD A$:GOTO 100 

820 PRINT" REAL TIME CLOCK HAS STOPPED. PLEASE WIND IT UP":GOTO 

100 

830 INPUT "ENTER YOUR NAME";C$ 

840 INPUT "PLEASE RE-ENTER YOUR NAME";D$ 

850 IF C$=D$ THEN PRINT "THAT IS CORRECT" ELSE PRINT" SOMETHING I 

S WRONG HERE" 

860 GOTO 100 

870 PRINT"IF YOU UNDERSTAND THIS COMMAND, PLEASE NOTIFY" 

880 PRINT"KITCHEN TABLE IMMEDIATELY!" 

890 GOTO 100 

900 CMD"VERIFY":CLS:PRINT"?BASIC BY KITCHEN TABLE, INC. ": PRINT 

905 IF BFLAG=1 GOTO 10190 



1000 ' END OF DROSSDOS 

?BASIC APPENDED 
FOR DEMONSTRATION 

10010 WRDS=18 

10020 LS=200 

10040 Q$=CHR$(34) 

10050 C$=CHR$(58) 

10060 SP$=CHR$(32) 

10080 ' ****** READ WORDS INTO ARRAY ****** 

10090 : FOR N=l TO WRDS 

10100 : READ SPAN$(N) 

10110 : READ E$(N) 

10120 : E$(N)=SP$+E$(N) 

10130 : SPAN$(N)=SP$+SPAN$(N) 

10140 : NEXT N 

10150 GOTO 10190 

10160 DATA IF, OF, RUN, RAN, INPUT, IMPUT, LIST, LAST, END, FIN, PRINT, PLI 
MT, READ, REED, DATA, DADA, THEN, THAN, FOR, FAR, STOP, STEP, NEXT, NXET 
10170 DATA CLS , CSL , GOTO , GOOT , RESTORE , RESTART , GOSUB , GSUNK , RETURN , 
RETRNU,ON,IN 

Listing continues 
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Listing continued 

10180 ******* INPUT PROGRAM LINE ******** 

10190 PRINT ">"; 
10195 BFLAG=1 
10200 B2=0 

10210 LINE INPUT A$ 

10220 '****** CHECK FOR 'COMMAND* ****** 

10230 IF LEFT$(A$, 4)="LIST" GOTO 10900 

10231 Y$="CMD"+CHR$(34)+"S" 

10232 IF LEFT$(A$,5)=Y$ THEN CMD"VERIFY" :GOTO 80 
10240 IF LEFT$(A$, 4)="SAVE" GOTO 10710 

10250 IF LEFT$(A$,4)="LOAD" GOTO 10830 

10260 IF LEFT$(A$,3)="RUN" THEN RUN 

10270 IF LEFT$(A$,3)="NEW" THEN RUN 

10280 IF LEFT$(A$ r 5)="PRINT" GOTO 11270 

10290 IF LEFT$(AS,4)="EDIT" GOTO 11310 

10300 IF A$="" :GOTO 10190 

10310 ****** CHECK FOR QUOTES OR COLONS ****** 

10320 A$=A$+CHR$(32) 

10330 B=INSTR(A$ f Q$) 

10340 C=INSTR(A$, C$) 

10350 IF C=0 AND B=0 GOTO 10460 

10360 IF B=0 GOTO 10440 

10370 ****** FIND POSITION OF SECOND QUOTATION MARK ***** 

10380 W$=MID$(A$, B+l) 

10390 B2=INSTR(W$, Q$)+B 

10400 IF C<B GOTO 10440 

10410 IF OB2 GOTO 10440 

10420 GOTO 10460 

10430 ' ****** if COLON OUTSIDE QUOTES - TWO STATEMENTS ****** 

10440 IF CO0 THEN PRINT"ONLY ACCEPTING ONE STATEMENT PER LINE T 
ODAY":GOTO 10190 

10450 '***** CHECK FOR BEGINNING LINE NUMBER ***** 

10460 TST$="" 



10470 
10480 
10490 
10500 



FOR T=l TO LEN(A$) 

IF MID$(A$, T, 1)=CHR$(32) GOTO 10520 

TST$=TST$+MID$(A$, T, 1) 
NEXT T 



Hill ' ****** IF LINE NUMBER VALID, ASSIGN TO ARRAY POINTER LN 

10520 LN=VAL(TST$) 

10530 IF LN>LS THEN LN=LS-9 

10540 IF LN<1 PRINT "HUH?" .-GOTO 10190 

10550 '***** LOOP TO SEARCH FOR ALL KEYWORDS ***** 



10560 
10570 
10580 
10590 



FOR G=l TO WR 

Y=INSTR(A$,SPAN$(G)) 
IF Y>0 GOTO 10640 

NEXT G 



10600 ****** ASSIGN LINE TO FINISHED PROGRAM ARRAYS ***** 

10610 CP$(LN)=A$ 
10620 GOTO 10190 

10630 ****** CHECK TO SEE IF KEYWORD IN QUOTES ***** 

10640 IF Y<B GOTO 10670 

10650 IF Y>B2 GOTO 10670 

10660 GOTO 10590 

10670 L=LEN(E$(G)) 

106 80 ' ****** SUBSTITUTE PHONEY KEYWORD ****** 

10690 MID$(A$, Y, L)=E$(G) 
10700 GOTO 10590 

10710 '***** SAVE PROGRAM TO DISK ***** 

10720 GOSUB 10730:GOTO 10760 

10730 NE$=MID$(A$,INSTR(A$,CHR$(34))+1) 

10740 IF RIGHT$(NE$ r l)=Q$ THEN NE$=LEFT$ (NE$, (LEN(NE$) -1) ) 

10750 RETURN 

10760 OPEN "0",1, NE$ 

10770 : FOR N=l TO LS 



Listing continues 



Dysan 

^CORPORATION 



Solve your disc problems, buy 100% surface 
tested Dywan diskettes. All orders shipped 
from stock, within 24 hours. Call toll FREE 
(800) 235-4137 for prices and Information. 
\Asa and Master Card accepted. 




PACIFIC 
EXCHANGES 

100 Foothill Blvd. 
San Luis Obispo. CA 
93401. (InCal. call 
(805) 543-1037) 



-207 



IEEE-488 TO TRS-80* INTERFACE 
Everything needed to add powerful 
BASIC GPIB-488 controller capability 
to TRS-80 Model 1 or 3, Level 2 or 
DOS with a minimum of 16K. 



488-80B 

For Model 1 

ODeration 



?MrJ< oMSKbittG'* 



488-80C 
For Model 3 
Operation 

Model 488-80B or 488-80C Price: $375. 

+ shipping, insurance & tax 
WHEN ORDERING SPECIFY DISK OR TAPE 

SCIENTIFIC ENGINEERING 
LABORATORIES 

11 Neil Drive • Old Bethpage, NY 11804 
Telephone: (516) 694-3370 
* Trademark ot Tandy Corp. 
There is no affiliation between Scientific 
Engineering Laboratories and Tandy Corp. or 
Radio Shack. 



^203 




Absolutely The Best SeiFi 
HWEWMTE CEIMTUWDW 

You are the Guardian of the Gateway to other galaxies 
in the most innovative, the most sophisticated "real time" 
simulation ever offered. A REAL BLOCKBUSTER 

H^PERGdTE PdTBQL 

Navigate the Hypergates of the Local Supercluster in 
search of pirates, monsters, and smugglers. 

BOTH HAVE SUPER ACTION SOUNDS & GRAPHICS 

TRS-80' Model I or III required 

specify: 16 K L2 32K disk system 48 K disk system 

BOTH GAMES ON ONE CASSETTE S 39.95 ppd. 



Send CHECK 



MONEY ORDER to 



Synergistic Solar, Inc. 
PO Box 560595, Miami FL 33156 

Wrile tor oui brochure ol top notch game programs 

DEALER INQUIRY INVITED 



sSee List of Advertisers on Page 435 
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WIN AT 
BLACKJACK 

JERRY PATTERSON: Author of 

"Blackjack: A Winner's Handbook, " 
"Blackjack's Winning Formula;" syn- 
dicated gaming columnist and founder 
of the Blackjack Clinic (Over 4000 
graduates nationwide) 
is now making his famous blackjack 
course available for yourTRS 80 Model III 
Microcomputer. Patterson and his stu- 
dents have won $million$ at the blackjack 
tables. Learn how to get your share with 
Patterson's Blackjack Tutor. Sample 
Features: 

•How to play the hands for Atlantic 
City and Nevada casinos. 

•How to count cards (high-low) 

•Specify one to seven players in prac- 
tice, party, or simulation mode. 

•Package includes Game, Basic Strat- 
egy and Counting Modules. 

Other features: variable bankroll, cut card 
placement, table hopping, discard tray. 

Order TRS 80 Model III Version (16K 
Cassette) for S50.00 and S3 .00 p&h — 
includes complete user's manual. Or write 
for details Visa/MC orders call toll 
FREE right now 

(800)257-7130. 

iJE R R Y P AT T ERSO N'S 



1 BRITTON PLACE • VOORHEES, NJ 08043 

(609) 772-2721 (NJ residents) V It 



Color Computer Programs 
From Star-Kits 

SPELL 'N FIX — Essential (or serious word 
processing! Finds and fixes spelling and 
typing mistakes fast. 20,000+ word diction- 
ary can be expanded. Truly professional 
program. $69.29 for RS disk or cassette, 
$89.29 for Flex. 

HUMBUG — The Ultimate Monitor has 37 
commands to enter, examine, start, stop, 
even single-step machine language pro- 
grams, and more. $39.95 on disk or cassette 
for 16K or 32K systems, $49.95 for 64K 
systems. 

CHECK 'N TAX - Set of programs to 
balance checkbook and keep lax data on 
disk. $50. 

REMOTERM — Allows using a terminal to 
give the Color Computer a full 24x80 display 
for serious users or remote operation. 
$19.95. 

LFPRINT — Permits use of a non-standard 
printer. $19.95. 

NEWTALK — Voice output program to 
examine and check memory. $20. 
SHRINK — Our fast version of Eliza. $15. 
OXXO — Our fast version of Othello. $15. 
CHECK "N TAX requires 32K, all others 
16K. We accept cash, check, COD, Visa or 
MC. NY State residents please include sales 
tax. 



Star-Kits 



P.O. Box 209— E 
Mt. Kisco, N.Y. 10549 
(914)241-0287 .„„ 
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10780 : PRINT #1, CP$(N); CHR$(13); 
10790 : NEXT N 
10800 CLOSE 1 
10810 GOTO 10190 

10820 '***** LOAD PROGRAM FROM DISK ***** 

10830 GOSUB 10730 

10840 OPEN "I",l, NE$ 

10850 : FOR N=l TO LS 

10860 : LINE INPUT #1, CP$(N) 

10870 : NEXT N 

10880 CLOSE 1 

10890 GOTO 10190 

10900 • ****** LIST SUBROUTINE ****** 

10910 C4=INSTR(A$,"-"):IF C4<1 GOTO 11130 

10920 C3=INSTR(A$,"LIST") 

10930 ST$=MID$(A$,C3+4) 

10940 L1=VAL(ST$) 

10950 IF L1>LS THEN L1=LS-10 

10960 C5=INSTR(ST$,"-") 

10970 ST$=MID$(ST$,C5) 

10980 IF LEN(ST$)=1 THEN L2=LS:GOTO 11090 

10990 ST$=RIGHT$(ST$,(LEN(ST$)-1)) 

11000 L2=VAL(ST$) 

11010 IF L2>LS THEN L2=LS-5 

11020 GOTO 11090 

11030 : FOR N=l TO LS 

11040 : IF CP$(N)<>"" PRINT CP$(N) 

11050 : NEXT N 

11060 PRINT 

11070 GOTO 10190 

11080 ' ****** LIST LINE NUMBER RANGE ****** 



11090 
11100 
11110 



FOR N=L1 TO L2 

IF CP$(N)<>"" PRINT CP$(N) 
NEXT N 



11120 GOTO 10190 

11130 ' ****** LIST SPECIFIC LINE OF PROGRAM ****** 

11140 V=INSTR(A$, SP$) 
11150 IF V=0 GOTO 11220 

11160 V2$=MID$(A$, V) 

11170 V3=VAL(V2$) 

11180 IF V3>0 THEN PRINT CP$(V3) ELSE GOTO 11220 

11190 PRINT 

11200 GOTO 10190 

11210 ' ****** LIST ALL PROGRAM LINES ****** 

11220 CLS 

11230 : FOR N=l TO LS 

11240 : IF CP$(N)<>"" PRINT CP$(N) 

11250 : NEXT N 

11260 GOTO 10190 

11270 S$=MID$(A$,INSTR(A$,"PRINT")+5) 

11280 PRINT S$ 

11290 GOTO 10190 

11300 ' ****** EDIT LINE ****** 

11310 LN=VAL(MID$(A$, ( INSTR(A$, "EDIT") +4) ) ) 

11320 IF CP$(LN)<>"" GOTO 11350 

11330 PRINT "UNDEFINED LINE NUMBER" 

11340 GOTO 10190 

11350 PRINT LN; 

11360 CU=INSTR(CP$(LN) ,CHR$(32)) 

11370 I$=INKEY$:IF 1$="" GOTO 11370 

11380 IF VAL(I$)>0 THEN NU=VAL(I$) 

11390 IF I$="C" GOSUB 11460 

11400 IF I$="D" GOSUB 11460 

11410 IF I$="I" GOSUB 11460 

11420 IF I$=CHR$(8) GOSUB 11520 

11430 IF I$=CHR$(32) PRINT MID$ (CP$(LN) ,CU,1) ; :CU=CU+1 

11440 IF I$=CHR$(13) PRINT:GOTO 10190 

11450 GOTO 11370 

11460 R$=INKEY$:IF R$="" GOTO 11460 

11470 IF R$=CHR$(27) GOTO 11490 

11480 MID$(CP$(LN) ,CU,1)=R$ 

11490 PRINT CHR$(8) ; 

11500 CU=CU+1 

11510 RETURN 

11520 PRINT CHR$ ( 8) ;: RETURN 
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Selling 80 Mi- 

w k.^ ^^ cr0 wi " make mon " 

_^^^ ^k^| ^^^ ey for you. Consider the 

^ ~^Km Fact #1: Selling 80 M/'cro in- 

^^4B^T creases store traffic— our dealers 

MH^^^ tell us that 80 M/'cro is the hottest- 

'^j^r selling computer magazine on the news- 

stands. 
Fact #2: There is a direct correlation between 
store traffic and sales— increase the number of people 
coming through your door and you'll increase sales. 
Fact #3: Fact #1 + Fact #2 = INCREASED $ALE$, 
which means more money for you. And that's a fact. 

For information on selling 80 Micro, call 800-343-0728 
and speak with Ginnie Boudrieau, our bulk sales man- 
ager. Or write to her at 80 Micro, 80 Pine St., Peter- 
borough, NH 03458. 



micro 



80 Pine Street Peterborough, NH 03458 

800-343-0728 



NEW for the Color Computer TRS-80 

'COCOCASSEnF SUBSCRIPTION SOFTWARE 



• 1<V> 80 '!> A 'HADEMARK OF TANDY COMP. 




ENJOY A MONTHLY COLLECTION OF 8-10 PROGRAMS! 



Including gomes, education, home finance and more, 
on cassette for as low as $5.00 o month! Add some ac- 
tion and imagination to your Color Computer. . . Best of 
all, we do the work! 



PRICES 

1 YR (12 ISSUES). 
6 MO (6 ISSUES) . 
SINGLE COPIES. 



$55.00 
$30.00 
S 6.00 



-MICHIGAN RESIDENTS ADD 4% TO ORDER 
-OVERSEAS ADD $10 00 TO SUBSCRIPTION AND $1 00 TO 
SINGLE COPIES 



616 396-7577 



m® 




PROGRAMS ARE FOR 
EXTENDED 0ASIC 
MODEL ONLY ISSUES 
^ 408 ARE SENT FIRST CLASS. 

SUBSCRIPTION SOFTWARE 




SEND CHECK OR MONEY ORDER TO: 



v/sr 



T & D SOFTWARE P.O. BOX 256-C • HOLLAND, MICH 49423 



TOP IT OFF WITH 
2% AND OUR NAME 

For all the support shown us this past year and making ANGEL's such a complete success, we decided that there is no better time 
of year to show our appreciation than to offer a discount to Our already low prices. Therefore, take another 2 percent off our prices. 

TRS-80F SOFTWARE 




VERBATIM DATALIFE 

MD 525-01 , 1 0, 1 6 24.95 

MD 550-01. 10. 16 41.00 

MD557-01, 10, 16 45.00 

MD 577-01. 10, 16 34 00 

Head Cleaning Kit 7.95 

Head Cleaning Refill 16.95 

DISKETTE STORAGE 

5 1/4 Mini Plastic Box 1.95 

5 1/4 Protector (50 Disk) 16 50 

8" Protector (50 Disk) 18.50 



ANGEL DISKS 


.... 18.75 


Single sided, certified 




double density, 40 tracks 




with Hub Rings 




With Lib. Case 


2050 



16 K RAM KITS 

NEC 41 16, 200ns. 8 chips 13.75 

PRINTERS 

NEC 8023A 469.00 

NEC 8023A Ribbons 13.75 

NEC 3530 1705 00 

NEC 7710 2310 00 

Qume Sprint 9/35 1760 00 

Okidata Microline 82A 439 00 

Okidata Microline 83A 689 00 

Okidata Microline 84A-P 1039 00 



MODEMS 

Novation D-Cat 171.00 

Novation Auto Cat 224 00 

Novation 212 RS 232 589.00 

Hayes Smartmodem 300B 214.00 

Hayes Smartmodem 1 200B 519.00 

Hayes Cronograph 189.00 



TANDON DISK DRIVE 

with case & power supply i 
$149.00 

VERBATIM DATALIFE 

525-01 $24.95 


5 1/4 FLIP a FILE 

Holds 50 $16.50 


DISK DRIVES 

Tandem 100-1 W/case & PS 


149 00 




239 00 


















Winchester 603 

Winchester 603E 


899 00 

999 00 



'CPM is a registered trademark of Digital Research 
"is a registered trademark ot Practical Peripherals 
'"is a registered trademark ol Tandy 



Call for Cass, prices 
AUTOMATED SIMULATIONS MOD I, III 

Starfleet Orion 15.95 

Invasion Orion 15.95 

Temple of Apshai 26.50 

Rescue at Rigel 19.75 

Crush Crumble and Chomp 19 75 

Jabbertalky 19.75 

PRINTER BUFFERS 

MBSF (Epson) 8K 124.00 

MBSF (Epson) 16K 124.00 

ANGEL's 

COMPUTER PRODUCTS 

(213) 891-5546 

9625 Sylmar Ave. #4, Panorama City, CA 91402 
Your satisfaction is our main concern. 

All products guaranteed to be new and tree Irom 
detects in material and workmanship lor 30 days 

MC and Visa accepted on all orders at no extra 
charge 

S3 00 tor standard UPS shipping and handling on 
orders under 50 lbs delivered in the continental U S 
COD up to S300 00 Call lor other shipping and 
handling on FPO. APO. toreign. and orders over 
50 lbs California residents add 6 5% sales tax 

Prices quoted are tor stock on hand and subject 
to change without notice Limited quantities on 
some items 



-See List of Advertisers on Page 435 
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GENERAL 



Changing Color Basic's ubiquitous prompt 



When OK Isn't 



Ed Deming 

1839 Pine Cone Circle 

Clearwater, FL 33520 

I am impressed with the 
TRS-80 Color Computer but 
bored with Basic's prompt. The 
blinking cursor makes me ner- 
vous when I am thinking. 

In addition, even though 
space is tight in the Color Basic 



ROM, three more bytes would 
have provided a slightly more in- 
formative prompt than the terse 
OK we now have. Exactly what is 
okay about spending four hours 
entering a Lunar Lander pro- 
gram only to get— 

?0M ERROR IN LINE 843 
OK 

I thought it impossible to 



change a computer's ROM until 
discovering the jump table in 
RAM containing vectors to other 
ROMs or RAM. Color Basic has 
a jump table at decimal ad- 
dresses 350-424, with decimal 
57 in each location. Decimal 57 
is the microprocessor op code 
for return from subroutine (RTS). 
When Color Basic jumps to a 
subroutine in this area, it im- 



Program Listing 

10 REM***CHANGE PROMPT AND CURSOR*** 

20 'by Ed Deming 11/81 

30 ' 

40 A=PEEK(39) *256+PEEK ( 40) -326 :REM Highest address for BASIC 

50 CLEAR 255, A 

60 A=INT( (PEEK(39) *256+PEEK ( 40) +326) /1000) *1024-1:REM Top RAM address 

70 CLS: PRINT@ 6, "NEW CURSOR AND PROMPT" : PRINT@40 , "FOR COLOR BASIC" 

80 INPUT"CURSOR CHARACTER" ;C$ 

90 C=PEEK(1106) :REM Get cursor from screen 
100 PRINT"YOUR NEW PROMPT IS:" 
110 LINE INPUT P$ 

120 B=A-77-LEN(P$) :REM Start address for machine language program 
130 FOR X=B TO A 
140 READ D 

150 IF D>300 THEN200 
160 POKE X,D 
170 NEXT 
180 GOSUB290 
190 EXECB:END 

200 ON D-300 GOTO210,230,280 
210 POKE X, C:REM POKE Cursor character 
220 GOTO170 

230 FOR Y=X TO X+LEN (P$) -1 : REM Once for each character in P$ 
240 P=Y-X+1:REM Character position in P$ 
250 POKE Y, ASC(MID$ (P$,P,1) ) : REM POKE each character value 

Listing continues 



mediately returns from the 
subroutine. 

Extended Color Basic chang- 
es the contents of thirty loca- 
tions in the jump table. These 
changes are of the form: 

126, MSB, LSB 

where decimal 126 is the micro- 
processor op code for jump 
(JMP), MSB is the most signifi- 
cant byte of the jump address 
and LSB is the least significant 
byte. When Extended Color 
Basic jumps to a subroutine at 
one of these locations, it jumps 
to a routine in the Extended Col- 
or Basic ROM. 

Just prior to outputting a 
character, the Color Computer 
jumps to a subroutine located at 
decimal address 359. When the 
normal prompt is about to be 
displayed, the X register of the 
microprocessor contains 



The Key Box 

Color Basic or 
Extended Color Basic 
Color Computer 
4KRAM 
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MICROPROCESSOR COMPONENTS 



OlMlnii^OL 



CA3010H 
CA30I3H 
CA3023H 
CA303SH 
CA3039H 
CA3046N 
CA30S9N 



Mf.gii.'u.TiM 



CA3060N 16 3.25 

CA3080E 8 

CA3081N 16 1. 

CA3082N 16 I. 

•■:■-. I083N 16 1 

CA3086N 14 J 



CA3089N 16 

CA3096N 16 

CA3130E 8 

CA3140E 8 
CA3160K 

CA3401N 14 

CA3600N 14 



CO4O0O 14 

CD4O01 14 

CD4002 14 

CD4006 14 

CD4007 14 

CD400S 16 

C04010 16 

C04011 14 

CD4012 14 

C04013 14 

C04014 16 

CD4015 16 

C04016 14 

C04017 16 

C04016 16 

CD40I9 16 

CD4020 16 

CD4021 16 

C04022 16 

C04023 14 

C04024 14 

CD4025 14 

CD4026 16 

CD4027 16 

CD4028 16 

C04029 16 

C04030 14 

CD4034 24 

LCD4035 16 
^^_ (Morelr. 



C04040 16 

CD4041 14 

CD4042 16 

CD4043 16 

CD4044 16 

C04046 16 

CO404? 14 

C04048 16 

CD404S 16 

CD40S0 16 

CD40S1 16 

CO40S2 16 

CD4053 16 

CD4056 16 

C04059 24 

C04060 16 

CD4066 14 

C04068 14 

C04069 14 

C04070 14 

CD407I 14 

C04072 14 

C04873 14 

C04075 14 

C04076 16 

CD4078 14 

CD4081 14 

CD4082 14 

C04093 14 



CD4098 16 

CD4506 16 

C04507 14 

C04508 24 

CO45I0 16 

C04511 16 

CD4512 16 

CD4514 24 

C04515 24 

C04516 16 

C04518 16 

C04519 16 

C04520 16 

C04526 16 

C04528 16 

C04529 16 

C04543 16 

CD4562 14 

C04566 16 

C04683 16 

CD4584 14 

C04723 16 

C04724 16 

MC14409 16 

MC14410 16 

MC1441I 24 

MC14412 16 

MC14419 16 

MC14433 24 

MC14538 16 

MCI4S4I 14 



13.95 
7.95 
13.95 



MICROPROCESSOR CHIPS 

Pan No. "Pins Function Price 

CDP1802 40 CPU $995 

2650 40 MPU 14.95 

IDM2901ADC 40 CPU-4-bllsllce (Com. Temp. Gr.) 19.95 

MCS6502 40 MPU w/Clock (65K bytes mom.] 9.95 

MC6802CP 40 MPU w/Clock and RAM 7.95 

INS8035N-6 40 MPU— 8-bit (6MHz) 5.95 

INS8039N-6 40 CPUSgl.chip8 bit(128Dts. Ram}. .. .5.95 

INS8040N-6 40 CPU 1256 bytes RAM) 5.95 

INS8070N 40 CPU 164 bytes BAM) 1 1 .95 

'.S8C73N 40 CPU .v. Bkk Micro Interpreter ....14.95 

P8085A 40 CPU 5.95 

Z80, Z80A, Z80B, Z8000 SERIES 

Z80 40 CPU (MK3880N)|/80C) 2MHz ....$4.95 

Z60-CTC 28 Counter Timer Circuit 5.95 

Z80DART 40 Dual Asynchronous Bee. /Trans 11.95 

260-DMA 40 Direct Memory Access Circuit 15.95 

ZISC Pit 40 Pirale l.'ii .-:c-;jx i.oaliol Ei 5 •>•: 

Z60-SIO/0 40 Serial I/O (T>C8 and R.CB Bonded) .15.95 

ZBO-S10/1 40 Serial I/O (lacks DTR.B) 15.95 

Z80S10/2 40 Serial I/O (Lacks SYNCB) 15.95 

Z80-S10/9 40 Serial I/O 15.95 

Z80A 40 CPU(MK3880N-4)(780C-l)4MHz . 5.95 

Z80A-CTC 28 Counter Timer Circuit 5.95 

ZBOA-DART 40 Dual Asynchronous Rec. /Trans 1 1 .95 

Z80A-OMA 40 Direct Memory Access Circuit 17.95 

Z80A-P10 40 Parallel I/O Interlace Controller 5.95 

Z80A-S10/0 40 Serial I/O (TxCBand RiCB bonded) .16.95 

Z80A-S10/1 40 Serial I/O (Lacks DTRB) 16.95 

Z80A-S10/2 40 Serial I/O (Lacks SVNCB) 16.95 

Z80A-SIO/9 40 Serial I/O 16.95 

Z608 40 CPU IMK3880N-6I 6MH; 11.95 

Z80B-CTC 28 Counter Timer Clrcull 13.95 

ZMB-P10 40 Parallel I/O interlace Controller 13.95 

Z8001 48 CPU Segmented 51.95 

Z8002 40 CPU Non-Segmented 55.95 

Z8030 40 Serial Comm. Controller 44.95 

Z8036 40 Counter/Timers Parallel I/O Unit .29.95 

6800/68000 SERIES 

MC68O0 40 MPU 4.95 

MC6802CP 40 MPU Willi clock and RAM 7.95 

MC68I0API 24 128x8 Static RAM 3.95 

MC682I 40 Peripheral Inler Adapt (MC6820)... 4.95 

MC6828 24 Priority Interrupt Controller 15.95 

MC6830L8 24 1024x8-bit ROM IMC68A30-8) 10.95 

MC6850 24 Asynchronous Comm Adapter 4.95 

MC6852 24 Synchronous Serial Data Adapter . . 5.75 

MC6660 24 600bps Digital MODEM 9.95 

MC6862 24 2400bps Modulator 12.95 

16 Quad 3-stale bus. Irans. (MC8T26) 2 25 

64 MPU 18-Bit (8MHz) 69.95 

40 General Purpose Int. Adapter 6.95 

MC68652P2 40 Mulli. Protocol Comm. Controller. .24.95 

MC68661PB 28 Enhanced Prog. Comm. Int 8.95 

8080A SERIES 

INS8080A 40 CPU 3.95 

TMS5501 40 Synchronous Oala Interlace ISIRC) .14.95 

INS8154 40 128 Byle RAM 16-Bit I/O 13.95 

INS82C06 20 Octal Flip Flop Tri-Stale(74C374) 2 49 

DP8212 24 8-bit lnput/0ulpul(74S4l2). 2,25 

DP8214 24 Priority Interrupt Control 3.95 

DP8216 16 Bi-Oirectional Bus Driver 2.25 

DP8224 16 Clock Generalor/Oriver 2.25 

DP8226 16 BusOriver 2.25 

DP8228 28 System Com /Bus Driver (74S428) . .3.49 

DP8238 28 System Controller (74S438) 4.49 

INS8243 24 I/O Expander tor 48 Series 5.95 

INS8245 18 16-Key Keyboard Encoder (74C922J 4 49 

INS8246 20 20-Key Keyboard Encoder (74C923) .4.95 

INS8247 28 Display Controller (24C91 11 8.95 

INS8248 28 Display Conlroller (74C912) 8.95 

INS8250N 40 Asyn. Comm. Element (INSB250) . 10 95 

DP8251 28 Prog Comm. I/0(USART) 4.49 

DP8253 24 Prog. Interval Timer 6.95 

DP8255 40 Prog Peripheral I/O (PPI) 4.49 

DP8257 40 Prog. DMA Conlrol 7.95 

DP8259 28 Prog. Interrupt Control 6.95 

DP8275 40 Prog. CRT Controller 29.95 

DP6279 40 Prog. Keyboard/Display Interlace . . .6.95 

DP8303 20 6-811 In Suit- H ■ UrucVunal Hans. ..3.95 

DP8304 20 8-bit Bi-Oirectional Receiver 2.49 

DP8307 20 8-bilBi .: re. li-.n.i '-;, ..:vn- 2 I'i 

DP8308 20 8-bit Bi-Direcllonal Receiver 2.49 

DP8310 20 Octal Latched Peripheral Driver 4.95 

DP8311 20 Octal Lalched Peripheral Driver 4.95 

MICROPROCESSOR MANUALS & DATA BOOKS 

M-Z80 UserManual 7.50 

M-CDP1802 UserManual 7.50 

M-2650 UserManual . ... 5.00 

10400 1982 Intel Data Book ( 1 405 pg ) 14.95 

30001 1981 Nal. CMOS Book (628 pg.) 6.95 

30002 1980 Nal interlace Book (640pg.) 6.95 

30003 1982 Nal Linear Book (1952 pg.) 11.95 

30006 1981 Nat TIL Book (624 pg.) 9.95 

30008 1980 Nal Memory Data Book (464 pg.) . . .6.95 

30011 1980 Nal linear Applications (736 pg.) . .15.95 

30013 1983 Zilog Data Book (641 pg.) 7.95 

205610 1981 Inlet Peripheral Design (828 pg.) . . . .9.95 



Part No. 



-OYNAMIC RAMS- 



1103 
4027 

4116N-2 

4116N-3 

4116N-4 

4164N-150 

4I64N-200 

MM5261 

MM5262 

MM5270 

MM5280 

MM5290-2 

MM5290-3 

MM5290-4 

MM5298-3 



'10: 
2101 
2102 
21L02 
2111 
2112 



18 1024x1 1300ns).. 

16 4096x1 (250nt) 

16 16.384x1 1 1 50ns] 

16 16.384x1 (20Ons 

16 16.384x1 (260ns 

16 65.536x1 (150ns 

16 65.536x1 (200ns 

18 1024x1 (30Ons 

22 2048x1 (365ns) 

18 4096x1 (250ns) MK4096 

22 4096x1 (200ns) 2107 .. 

16 16.384x1 (150ns) 

16 16.384x1 (200ns) 

16 16.384x1 (250ns) 

16 8192x1 (200ns) 

•STATIC RAMS 





. . .2.49 




8/14.95 






1 4H 


8/10.95 


1Mb 


8/59 95 


/.49 


8/54.95 




.49 


- 6(1.95 




4.95 




...3.95 


1.89 


8/1495 


1.69 


8/12.95 




8/1095 



16 ?56x" 

22 256x4 

16 I024xt , 

16 1024x1 (450ns) L.P 



(650ns) . 
(450ns) 6101 
;350ns). 



2114 


IK 


1024x4 


(450n 














(450ns) L.P. . 










■f:?J,.: 


(200ns) 


2 25 








1024x4 


(200ns) L.P. . 












(ISOns) ... 


















2KB 


18 










IMS4044 


18 


4096x1 


(450ns 








18 














256x4 


(450ns CMOS 












(450ns 4044 










2048x8 


(I50n 


CMOS 










:"«.- 




CMOS 








24 


2048x8 






7489 


lb 


16x4 








74C920 


■/7 


256x4 


(250ns) CMOS (6551) 


...3.95 














74C929 


16 


1024x1 


25Cn;. CMOS (6501) 










(250ns) CMOS (65181 


















74S200 


IB 












74S206 


in 














16 


16x4 












lb 


■1124,1 














iSOns 


0.C174S289). 


...2.25 



•7ti;a 

2708 

2708-5 

TMS2516 

TMS2532 

TMS2564 

TMS2716 

2716 

2716-1 

2732 

27580 

MM2764 

MM2764-3 



-EPROMS- 



74SI88 

,v.s:'B/ 
/4S288 
.'«».' 
74S47I 
74S472 
74S473 
74S474 
74S475 
74S478 
74S570 
74S57I 



24 256x8 (1us). 

24 1024x8 (450ns)... 

24 1024x8 (550ns) SM0O246 

24 2048x8 (450ns) 2716 

24 4096x8 (450ns) NMC2532 

28 8192x8 (450ns) 

24 2048x8 (450ns) 3 voltage . 

24 2048x8 (450ns| 

24 2048x8 (350ns) . 

24 4096x8 (450ns) 

24 1024x8 (460ns) sinqle *5V 

26 8192x8 (450ns) 

28 8192x8 (300ns) . 
- PROMS - 



6.95 

9 95 

.19.95 



.19.95 



16 32x8 

16 256x4 

16 32x8 

16 256x4 

20 256x8 

20 512x8 

20 512x8 

24 512x8 

24 512x8 



PROM O.C (6330-1) 1.49 

PROM r S (6301-1) 1.95 

PROM TS. (6331-1 1.95 

PROM O.C. (6300-1) 1.95 

PROMTS. (6309-1) 5.95 

PROMT S (6349-1) 4.95 

PROMOC. (6348) 4.95 

PROM T S (0M87S296N) .4.95 
PROMOC (6340) 4.95 



82S23 

82S115 
82S123 

a;r-/:n 
82SI85 



24 1024x8 PROMTS. TBP26: 



16 512x4 PROMOC 

16 512x4 PROMT.S. 

18 1024x4 PROMOC 

18 1024x4 PROMT.S. 

16 32x6 PROMOC. 



24 512x8 

16 32x6 

16 256x4 

16 256x4 

16 512x4 




PROMTS. 
PROMT.S. 
PROM O.C. (27S20) 
PR0MT.S.I27S21) 
PROMOC (27S12) 
18 2048x4 PROMTS (TBP24S81) . 9.95 

DM87S180N 24 1024x8 PBQM O.C. (823180) 9.95 

DM87S181N 24 1024x8 PROMT S (82S181) 9.95 

DM87S184N 18 2048x4 PROMOC. (82SI64) .. . .9.95 
DM67SI85N 18 2048x4 PROM TS. (82S186) . . ..9.95 
DM87SI90N 24 2048x4 PROM OC (82S190) .. .19.95 
DM87SI9IN 24 2048x8 PROM TS. (62S191) ... .19.95 

DATA ACQUISITION 

OC10 Mostek DC/DC Convert. + SV to -9V . 2 95 

MC3470P 18 Floppy Disk Read AMP System 4.95 

MC1408L7 16 7-bil D/A Converter (DAC08071CN) . . .2.49 
MC1408L8 18 8-bil O/A Converter (DAC0808LCN) ... .2.95 

AOC0804 20 8-bil A/0 Converter (1 LSB] 3.49 

OAC0806 16 8-bil D/A Converter (0 78% Lin.) 1.95 

AOC0809 26 8-bil A/0 Converter (8-Cn. Mulli.) . . .4.49 
AY-5-1O13A40 30K Baud Uart(TR1602) .. .4.96 



iCONNECTORS *iiiii<ii» 

DB25 — D Subminiature (meets RS232) I Solder Eyelet/Wire Wrap Edge Card 



22/44 .156 Solder Eyelet 
. .. .......J 22/44 .156 PCtypelnomtg. 

DB25P 25 Pin Plug (Meets RS232) .. 2.49 50/IOOSE 50/IOO 125 Solder Eyelet 

DB25S 25 Pin Socket (Meets RS232) 3.25 J, 

0825P-831 25 Pin Right Angle Plug 4.95 n. 



RF Coaxial Connectors 



UHF Straight Adapter 
UHF Reducing Adapter 
BNCPlug 



IC SOCKETS 

For Socket Required, See Column After The IC Part No. 



LOW PROFILE (TIN) SOCKETS 

1-9 10-99 100-999 



8 pin LP .16 .14 .13 

14 pin LP .17 .15 .14 

16 pin LP .19 .17 .16 

16 pin LP .26 .24 .23 

20 pin LP .30 .27 .25 

22 pin LP .31 .28 .26 

24 pin LP .33 .30 .28 

28 pin LP .40 .37 .35 

36 pin LP .46 .42 .39 

40 pin LP .49 .46 .43 
— Soldertall Standard Tin s Gold Also Available — 



WIRE WRAP (GOLD) SOCKETS 

LEVEL #3 1-9 10-99 100-999 



8 pin WW 
10 pin WW 
14 pin WW 
16 pin WW 
18 pin WW 
20 pin WW 
22 pin WW 
24 pin WW 
28 pin WW 
36 pin WW 
40 pin WW 



1.25 
1.29 
1.59 



$10.00 Minimum Order — U.S. Funds Only 
California Residents Add 6'/»% Sales Tax 
Postage — Add 5% plus $1.50 Insurance 
Send S.A.S.E. lor Monthly Sales Flyer! 




Spec Sheets — 30« each 
Send $1.00 Postage for your 
FREE 1983 JAMECO CATALOG 
Prices Subject to Change 



'963 

BELMONT, CA 94002 

(415) 592-8097 Telex: 176043 



Part No. 



7045IPI 28 

7045EV/Kif 28 

7106CPL 40 

7!06EV/Kif 40 

7107CPL 40 

7107EV/KII* 40 

7116CPL 40 

7117CPL 40 
7201 IUS 

7205IPG 24 

7205EV/KU - 24 

7206CJPE 16 

7206CEWKif 16 

7207AIPD 14 

7207AEV/KR* 14 

7208IPI 28 

7209IPA 6 

72151PG 24 

7215EV/KU' 24 

72I6AIJI 28 

7216CIJI 28 

7216DIPI 28 

7217IJI 28 

7217AIPI 28 

7224IPL 40 

7226AI.ll 40 

7226AEV/Kif 40 

7240IJE 16 

7242IJA 8 

7250IJE 16 

7260IJE 16 

7556IPA 8 

7556IP0 14 

7611BCPA 8 

7612BCPA 8 

7621BCPA 8 

7631CCPE 16 

7641CCP0 14 

7642CCP0 14 

7660CPA 8 

8038CCP0 14 

8048CCPE 16 
8069CC0 

8211CPA 8 

8212CPA 24 



CMOS Precisior Timer 

Stopwatch Chip. XTL 

3ft Digit A/D (LCD Drive) 

IC. Circuit Board. Display 

3ft Digit A/0 (LEO Drive) 

IC. Circuit Board. Display 

3ft Digit A/0 ICO Dis.HLD 

3ftDigilA/0LE00iS HID 

Low Battery Volt Indicator 

CMOS LED Slopwatch/Timer 

Stopwatch Chip, XTL 

Tone Generator 

Tone Generator Chip. XTL 

Oscillator Controller : 

Freq. Counter Chip. XTL 

Seven Decade Counter 

Cock Generator 

4 Func. CMOS Stopwatch CKT . . 

4 Func. Slopwalch Chip. XTL 

8 Digit Univ. Counter CA 

8 Digit Freq. Counter CA 

8 Oigit Freq Counter C C. 

4 Digit LED Uj/Oow' Count*' C A 

4 Digit LED Ui 0o»- Cour'e f. : 

LCD4ft Digf JpCc-.fM ;» 

8 Digit Univ. .. lj ~ 

5 Function Cr.-ter £hp x'l 

CMOS Bin Pr q ' r» /Counter 

CMOS Divide c,.}<6«t:n-m 

CMOS SCO P og 'me- W.niei 
CMOS BCD Poc. 'me'fo.niei 
CMOS 555 Ti ■ 
CMOS 556 Tr«i 
CMOSOpArr?*>i:w a'o 
CMOS Op Am: -«t c--' 
CMOSOualO. -^pttrij 
CMOSTriOp *r.. -c 
CMOS Quad 0>A~pCnrno 
CMOSQuadt-. A-pUtnj 
Voltage Conv ■*'i-- 
wavetormGeie>.**c« 
MonohihicLu: in i . - - 
SOppmBand Cap voir w i>x» 
Voli Ret/tndi. i . 
VoltRef/lndi i 



. 19.95 
. 9.95 
.34 95 
.11.95 
29.95 
.16.95 

1 5 95 
.2.25 
.12.95 
. 14.95 

4 95 
.7 95 
..5.95 



.29.95 
24.95 

10 95 



i J 95 
2*95 
.'«95 



45 
2 20 



•n 2 25 
:Mv 2 96 
'.Mv J95 
•(Vi 5 35 
•C»v '50 
•CMV ' 50 
i 95 
i95 



30009 1983 INTER SIL Da ta Book ,•.•>*. 

"TBBHJaSlI" 



74C00 
74C02 

7<c;i: 
74C08 
74CT 
74C14 
itr.K 
74C30 
74C32 
-■!«:' 
r4C4! 
74C73 
74C74 
,MCn;, 
ril-Bb 
74C89 
74C90 
74C93 



;v. - 

74CI07 
74C-.51 
74C154 
74CI57 
74C160 
74C16I 
74CI62 
74CI63 
74CI64 
74CI73 
74CI 74 
74C175 
74C192 
74CI93 
74C195 



2.49 
3.49 
2.25 



74C221 
74C240 
74C244 
74C373 
74C374 
74C901 
74C903 
74C906 
74C91I 
74C9I2 
74C915 
74C917 
74C922 
74C923 
74C925 
74C926 
80C95 
80C97 



74HC High Speed CMOS 



74HC0O 14 .75 

74HC02 14 75 

•74HCU04 14 .75 

74HC08 14 75 

74HCI0 14 75 

74HC20 14 75 

74HC27 14 75 

74HC74 14 99 

74HC75 16 99 

74HC86 14 .99 

74HC109 16 1 39 

•74HCU04isunbultered. 



74HC147 16 1.19 

74HC151 16 I 19 

74HC157 16 1.19 

74HCI60 16 1.79 

74HCI61 16 1.79 

74HC164 14 1.79 

74HC174 16 1.39 

74HC175 16 1.39 

74HC242 14 2.79 
All others are buttered 



74HC243 14 2 79 
74HC251 
74HC266 
74HC280 

.MMI..J,-.; 
74HC374 
.'•MC:3i 
74HC534 
74HC4076 14 
74HC4538 16 
74HC4543 16 

Send $.30 lor Data Sheet 



1 19 

14 99 

14 4.95 

20 395 

20 395 

20 395 

20 3 95 

.75 

2.95 

4.95 



Programmable Array Logic (PALS) 



Pari No. "Pins Function 



PAL10H8 20 Ocial 10-inpulANDOR Gate Array (High Output) ... . 

PAL12H6 20 Hex 12-lnput AND-OR Gate Array (High Output) 

PAL14H4 20 Quad14lnpulAND0RGaleAiray(High0ulput) ... . 

PAL10L8 20 Octal 10-lnput AND-OR-lnvert Gate Array (low Oulput) 

PAL12L6 20 Hex 12-lnpul AND-OR-lnverl Gale Array (Low Output) . 

PAL14L4 20 Qua0 14lnpulAND0R-lnveilGateArray(L0w0utpul) 

PAL16L6 20 Octal 16-lnput AND-OR-lnvert Gale Array (Low Output) 

PAL16R8 20 Octal 16-lnput Register AND-OR Gale Array 

PAL16R6 20 Hex 16-lnput Register AND OR Gate Array 

PAL16R4 20 Quae 16-lnpul Register ANC-CRGateAriay 



30012 1982 NATIONAL PAL Data Book (176 .) . . $5.95 



TL071CP 8 

TL072CP 8 

TL074CN 14 

TL081CP 8 

TL082CP 8 

TL084CN 14 

LM301CN 8 

LM302H 

LM304H 

LM305H 

LM307CN 6 

LM308CN 6 

LM309K 

LM310CN 8 

LM31ICN 8 

LM312H 

LM317T 

LM317K 

LM3I8CN 8 

LM3I9N 14 

LM320K-5 

1M320KI2 

LM320K-1S 

LM320T-5 

LM320T-I2 

LM320T-15 

LM323K 

LM324N 14 

LM337T 

LM338K 

LM339N 14 

LM340K-S 

LM340K-I2 



.79 



LM340K-15 
LM340T-5 
I.M340I12 
LM340T-15 
LM348N 
LM350K 
LF355N 
LF356N 
' LM370N 
LM373N l 
LM377N 
LM380N 1 
LM381N t 
LM382N 1 
IM384I.' t 
LM386N-3 
TL494CN 1 
TL496CP 
NE510A 1 
NE529A 1 
NE531V 
NF536H 
NE540H 
NE544N I 
NE550A 1 
NE555V 
LM556N 
NE564N 1 
LMS65N 
LM566CN 
LM567V 



2.95 
2.95 
8.95 



NE670N 16 395 

LM703CN 8 1.19 

LM709N 14 49 

LM710N 14 .69 

LM71IN 14 .79 
LM723N 
LM733N 
LM739N 

LM741CN 6 

LM747N 14 I 

LM748N 8 I 

LM1310N 14 l.i 

LM1458CN 6 .( 

LMM88N 14 .( 

LMI489N 14 I 
LM1496N 
LMI800N 
LMI689N 

LM1896N 14 2.95 

LM2002T 1.49 

LM3189N 16 1.59 

LM3900N 14 .59 

LM3905CN 8 1.19 

LM3909N 8 99 

LM39I4N 18 3 49 

LM3915N 18 3.49 

LM39I6N 18 3 49 

RC4136N 14 1.25 

RC4151NB 8 1.95 

ICL8038B 14 3 95 

LMI3080N 8 1.19 

LM13600N 16 I 19 
MOBE AVAILABLE 



14 1.1 



14 1.95 
16 1.49 
18 1.95 



CAPACITOR CORNER 



50 VOLT CERAMIC DISC CAPACITORS 



Value 




10-99 


100 -<• 


Value 


1-9 


10-99 




10 nt 


.06 


.06 


■OS 


■OOImF 


.OS 


.06 


.05 


22 pt 


.08 


.06 








.06 


.05 




.08 


.06 


.05 


.OImF 


.08 


.06 


.05 


100 pf 


.08 


.06 


.OS 


.022fiT 


.09 


.07 


.06 


220 Pf 


.08 


.06 


.05 


.047uF 

.luP 


.09 


.07 


.06 


470 pf 


.08 


.06 


.05 


.15 


.12 


.10 


MINI. A 


LUMI 


>JUM 


ELEC 


TROLYTIC CAPACITORS 


Axial 


1-99 


100-495 


500+ 


Radial 


1-99 


00-499 


500+ 




.16 


.14 


.10 


.47/25V 


.15 


.13 


.12 


1.0/50V 


.19 


.16 


.12 


.47/S0V 




.14 




3.3/SOV 


.17 














4.7/25V 


.IS 














10/25V 




.15 












10/50V 




.16 












22/25V 


.19 


.16 


.12 


4.7/25V 










.?■'. 


.20 


.18 


10/16V 










,2S 


.21 


.19 


.15 








.2'? 


.25 


.23 


10/25V 


.16 








,28 


.24 


.22 


10/50V 




.15 




100/50V 


.41 


.37 


.34 


4 7/50 V 








220/25V 


.39 


.34 


.33 


100/16V 


.21 






































1000/16V 


.79 


.69 


.61 


220/16V 


.25 


.21 






.89 















^See List of Advertisers on Page 435 



80 Micro, January 1983 • 349 



decimal 44015, and the sub- 
routines are nested four deep. 

In Table 1, lines 220-280 list 
the machine language program I 
came up with to change the 
prompt. It is position indepen- 
dent, locatable anywhere in 
memory. 

When the Color Computer 
goes to get a character, it first 
jumps to a subroutine located at 
decimal address 362. Lines 
170-210 of Table 1 list the 
machine language program for 
changing the cursor to any 
character. A routine to initialize 
the computer for the other two 
routines is in lines 0A0-160. 

The Extended Color Basic 
program (Program Listing) will 
provide you with a new cursor 
character, a new prompt and will 
POKE it into protected memory. 
It then saves the machine lan- 
guage program on tape and runs 
the initialization routine. Be 
aware that successive runs of 
this program will nibble away at 
available memory. 

To get the same cursor 
character and prompt the next 



Listing continued 

26 NEXT 

270 X=Y-l:GOTOl70:REM Update X; return to main 1 

280 PRINT"ERROR" : STOP 

290 LINE INPUT"HIT ENTER WHEN TAPE IS READY" ;R$ 

300 CSAVEM"PRT/CURS",B,A,B:REM Save machine lang 

310 INPUT"ANOTHER COPY";R$ 

320 R$=LEFT$(R$,1) 

330 IF R$="Y"THEN290ELSE RETURN 

340 DATA142, 1,103,204,126,301,167,128, 51,140, 

350 DATA 51,140, 15,239,129,215,148,204, 0,200, 

126,174, 90 
360 DATA 15,112, 13,111, 39, 3,126,140,241, 50, 

231,159, 0,136,189,161,193, 39,251,126, 
370 DATA140,171,239, 38, 8, 48,140, 7, 50,102, 

115,302, 13, 0,303 



oop 



uage program 



49 


239 


129 


167 


128 


52 


6 


48 


140 


2 


98 


52 


20 


214 


148 


161 


185 








126 


172 


121 


126 


130 



time you turn on your computer, 
protect enough memory (Clear), 
load the machine language pro- 
gram and enter EXEC. 

Modifications of the Table 1 
machine language routines for 
those of you without Extended 
Color Basic are provided in 
Table 2. Color Basic should be 
able to run the program in 
Listing 1 by modifying lines 
100-110 and the data state- 
ments, and by deleting lines 180 
and 280-330. 

OK. ■ 



THE DYNAMIC DUO 





GOBBLER 



SKYSCRAPER 



Two exciting ARCADE style, fast action, machine language VIDEO 
GAMES for the TRS-80' owner who enjoys the best in arcade games. 

Both games have several levels of play to Challenge both the novice, and 
the most advanced video game wizard. Both games, also, have SOUND to add 
to the enjoyment. ALPHA JOYSTICK'" compatibility has been added for the 
players that want to add new dimensions to their enjoyment. 

SKYSCRAPER, also, provides THREE mazes for added difficulty and 
challenge. 



MODELS I and III, level II 



GOBBLER 
SKYSCRAPER 



Tape 16K 
$1695 
$19.95 



Disk 32K 
$19.95 
$21.95 



24 HOUR ANSWERING SERVICE 

1-816-356-4211 
1-816-356-8197 



UPERIOR 
OFTWARE 

INC 

P U BOX 11676 
KANSAS CIIY MO 64UH 



MISSOURI RESIDENTS 

PLEASE ADD 

4'/.% STATE SALES TAX 

DEALER INQUIRIES WELCOME 



"TRS-80 Trademark Tandy Corp. 
"■ Alpha Joystick Trademark Alpha Products 



010 




CCRPOS 


EQU 


88 




020 




CURHLD 


EQU 


94 




030 




DEVNUM 


EQU 


6F 




040 




EXGET 


EQU 


8CF1 




050 




EXPRTN 


EQU 


8273 




060 




GRTN 


EQU 


A1B9 




070 




POLCAT 


EQU 


A1C1 




080 




PRTCLR 


EQU 


AE5A 




090 




WRMSTR 
Initialize 


EQU 


AC79 




0A0 


8E0167 




LDX 


#167 


Jump table address 


0B0 


CC7E7E 




LDD 


#7E7E 


Jump in A; Cursor in B 


OCO 


A780 




STA 


,x + 


Store jump; advance 


0D0 


338C31 




LEAU 


PROMPT, PCR 


Address of Prompt 


0E0 


EF81 




STU 


,X+ + 


in jump table; advance 


0F0 


A780 




STA 


,x + 


Store jump; advance 


100 


338C0F 




LEAU 


CURSOR, PCR 


Address of Cursor 


110 


EF81 




STU 


,X+ + 


in jump table; advance 


120 


D794 




STB 


SCURHLD 


Store Cursor 


130 


CC00C8 




LDD 


#C8 


String space 


140 


3406 




PSHS 


B,A 


Save it 


150 


308C02 




LEAX 


END, PCR 


Top of Basic memory 


160 


7EAE 
5A 


END 


JMP 


$$PRTCLR 


CLEAR and return to Basic 


170 


0F70 


CURSOR 


CLR 


$70 




180 


0D6F 




TST 


$DEVNUM 


Are we on text screen? 


190 


2703 




BEQ 


GETCHR 


Yes 


1A0 


7E8CF1 




JMP 


$$EXGET 


No 


1B0 


3262 


GETCHR 


LEAS 


2,S 


Clear bad return address 


1C0 


3414 




PSHS 


X,B 


Save registers 


1D0 


D694 




LDB 


SCURHLD 


Get cursor value 


1E0 


E79F0088 




STB 


[CCRPOS] 


Store it on screen 


1F0 


BDA1C1 


LOOP 


JSR 


$$POLCAT 


Poll keyboard 


200 


27FB 




BEQ 


LOOP 


No key seen 


210 


7EA1B9 




JMP 


$$GRTN 


Got one; return to Basic 


220 


8CABEF 


PROMPT 


CMPX 


#ABEF 


Compare X to OK address 


230 


2608 




BNE 


EXIT 


Not OK address 


240 


308C07 




LEAX 


DATA, PCR 


New prompt address 


250 


3266 




LEAS 


6,S 


Clean stack 


260 


7EAC79 




JMP 


$$WRMSTR 


Print new prompt 


270 


7E82 
73 


EXIT 
DATA 


JMP 


$$EXPRTN 


Normal return 


280 


52454144 












5920464F 




READY FOR ENTRY ED. 






5220454E 












54525920 












45442E0D 












00 














Table 1. All numbers are in 


hex 



OD0 


338C2F 




LEAU 


PROMPT, PCR Address of Prompt 


1A0 


39 


EXIT 


RTS 


No 


230 


26 D8 




BNE 


EXIT Not OK address 


240 


308C04 




LEAX 


DATA, PCR New prompt address 


260 


7EAC 

79 


DATA 


JMP 


$$WRMSTR Print new prompt 


270 






DELETE 








Table 2. 


Modifications For Color Basic 
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THE COLORQUEST EXPERIENCE 

For the TRS-80C and the TDP System 100 Color Computers 



Written by Kevin Herrboldt & Tim Nelson 
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BEYOND THE CIMEEON MOON A real-time science fiction adventure game of mind-blowing magnitude — staged in deep space on a 
malign, sentient spacecraft. Written in fast machine code with 3-dimensional high-res graphics and sound. Choose from a myriad of fates. Survive 
the laser barrage set up by a guantlet of robots bent towards your destruction. 



Written by Kevin Herrboldt & Tim Nelson 









ADVENTURE TRILOGY A Trilogy of quests featuring 3-D high-res graphics in machine code. First comes ritual combat on the WORLD 
UNDER THE CIMEEON MOON, to test your worthiness as a warrior. Once proven, you will be teleported to DAZMAR'S UNDERWORLD OF DOOM to 
search for the Eye of Dazmar. The FORSAKEN GULCH is the final arena, where a wicked idol awaits restoration. 




THE NIBBLER & MS. NIBBLER A fast maze chase game featuring the nibbler man and three bumbling prediiors. Written in machine 
code and joystick compatible, this fun packed game is enjoyed by all. MS. NIBBLER is similar to THE NIBBLER described above but features a 
different maze and MS. NIBBLER for the ladies. 



^Cf 



COMBAT GAMEPACK 3 action packed games featuring lifelike graphics and sound. EXTENDED BASIC required 2-1-0 TANK COMBAT 
pits two players against each other in 5 different terrains. STELLAR BATTLE lets you pilot a flexwing fighter through deep space fighting dorian 
squadrons. GALACTIC BLOCKADE is a favorite two-player arcade game of speed and skill. 

ORDERING 
ALL GAMES ARE $24.95 for 16K Cassette; $29.95 for 32K Disk. 

Include $3.00 for shipping in the U.S. & Canada, $6.00 for Foreign orders. C.O.D. add $2.00 

AVAILABLE AT DEALERS EVERYWHERE. IF NOT, ASK WHY! 
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VEGAS GAMEPACK The thrills of a Las 
Vegas casino at home! Extended BASIC required. 
CASINO CRAPS, 21, ONE ARMED BANDIT, UP 
AND DOWN THE RIVER, & KENO. A bank tracks 
players winnings from game to game. 



NELSON- 
SOFTWARE 
SYSTEMS 



H 


E3! 


<*MB$W \t 



9072 Lyndale Avenue So. 612/881-2777 



A Division of Sof Haw Corporation Minneapolis, Minnesota 55420 U. S. A. 



UTILITY 
LOAD 80 



A single-stepping monitor for Basic. 



BASTEP 



Alan D. Smith 
P.O. Box 119 
Mortdale, N.S. W. 2223, 
Australia 



BASTEP is a debugging tool 
for Level II and DOS Basic. 
When it is run, it implements 
two new Basic commands- 



Program Listing 1. BASTEP Basic listing 



10 DATA E5CD3723E5CDD7,29235E2356EB2B,D77EFE422809FE,512810E1E1C 

300,00216B**3EC3CD,F9**E1D1C9CDED,**18F8FFFF2300,00000000007EB7, 

207BD5ED5B62**,DF2872E5C523ED,5BA440131AB728,644F1BDF28051A,5F51 

18F12B2262,**2323235E2356,ED532141060048 

20 DATA 2165**CD2F13AF,329C402A2040E5,3AA640F521F23F, 2220402164* 

*CD,A728F132A640E1,222040CD490021,F23FF5CD7C0501,A942CD60002136, 

40711137400E06,EDB0F1FE012003,CDED**C1E1D100,000021FFFF2262,**2A 

EB**3AEA**,32C44122C541C9 

30 CP - PEEK(16756) + PEEK(16757) *256 :REH "CMD" POINTER 

40 BS - PEEK(16548) + PEEK(16549) *256 :REM BASIC START POINTER 

50 CLS :PRINTS 322, CHRS(23); "BUILDING 'BASTEP' MACHINE CODE" 

60 IF CP < BS THEN 90 :REH ABORT IF BASTEP ALREADY LOADED 

70 PRINTS 320, "CMD INTERCEPTS ALREADY INSTALLED" : END 

80 REM SET MEM SIZE TO PROTECT MACH CODE; MS = MSB OF ENTRY PNT 

90 POKE 16561,50 :CLEAR 50 :DEFINT A-Z :MS " PEEK(16562) 

100 REM CALCULATE START ADDRESS OF MACH CODE 

110 IF MS>127 THEN AD - MS*256-65483 ELSE AD = MS*256+53 

120 ST - AD :FL = ASC("*") :QU$ = CHR$(34) :REM FL = FLASHING * 

130 FOR X-29 TO 1 STEP-1 :REM THERE ARE 29 X 7 MACH CODE BYTES 

140 READ CD$ : PRINTS 540, CHR$(FL) :FL = (NOT FL) +75 

150 FOR Y-l TO 13 STEP2 :REM 7 BYTES = 14 HALF-BYTES 

160 BY-0 :BY$ = MID$(CD$,Y,2) :REM GET NEXT BYTE 

170 IF BY$-"**" THEN BY=MS :GOTO 230 :REM RELOCATION 

180 FOR N=l TO 2 

190 HBS = MID$(BY$,N,1) s REM GET EACH HALF-BYTE 

200 IF HB$>"9" THEN HB = ASC(HB$)-55 ELSE HB-VAL(HBS) 

210 BY - BY*16+HB :REM ACCUMULATE ASCII VALUE OF BYTE 

220 NEXT N 

230 POKE AD+(Y-1)/2,BY ;REM STORE MACH CODE AT TOP OF RAM 

240 NEXT Y 

250 IF X>1 THEN AD = AD+7 sREM STEP ADDRESS POINTER 

260 NEXT X 

270 REM INSTALL CMD & 'LINE INTERCEPT' ADDRESSES 

280 FOR X=0 TO 1 :POKE ST+27+X,PEEK(16756+X) :NEXT X 

290 FOR X=0 TO 2 :P0KE ST+181+X,PEEK(16836+X) :NEXT X 

300 POKE 16756,53 : POKE 16757, MS :REM POINT CMD TO ENTRY POINT 

310 PRINTS 194, "BASTEP CODE BUILT AT : " j MS*256+53 

320 PRINT " MEM. SIZE WAS SET TO : " ; MS*256+52 

330 PRINTS 706, "CMD"; QU$;"B";QU$; ■ = BASTEP (IE ACTIVATE)" 

340 PRINT " CMD"; QU$; "Q" ;QU$; " = QUIT (IE DEACTIVATE)" iPRINT 



CMD"B" and CMD"Q"— which 
may be used anywhere in a 
Basic program or in command 
mode. CMD"B" activates a 
single-step mode for running 
Basic. The system halts before 
executing each line, displays 
its number at the bottom of the 
screen, and waits for a key to 
be pressed before proceeding. 
This mode may be terminated 
at any time by CMD"Q" or use 
of break. 

Assembly-language pro- 
grammers often use debugging 
monitors (e.g. TRSDOS Debug) 
to enter the single-step mode. 
This allows progressive 
monitoring of a program run, 
one instruction at a time, 
and provides a trace of logic 
path. While Basic debugging is 
not normally fraught with the 
same level of complexity, a 
single-step capability can, 
at times, be distinctly useful. 
BASTEP provides significant 
advantages over normal Basic 
debugging commands. Unlike 
TRON, it doesn't print line 
numbers all over the screen, 





Program Listing 2. BASTEP Assembly listing 




00100 ;ASSEMBLER ROUTINE PERFORMING "BASTEP" FUNCT 


ION 








BF35 


00110 ORG 


0BF35H 


; (LOAD ADDR VARIES W 


ITH MEMSIZE) 








BF35 E5 


00120 CMDIN PUSH 


HL 


;SAVE ORIGINAL HL 


BF36 CD3723 


00130 CALL 


2337H 


; EVALUATE PARAM & PO 


INT TO COLON 








BF39 E5 


00140 PUSH 


HL 


;SAVE COLON POINTER 


BF3A CDD729 


00150 CALL 


29D7H 


; POINT HL TO 3-BYTE 

Listing 2 continues 



nor does it repetitively output 
the same line number in the 
case of a line like 100 IF IN- 
KEY$ = "" THEN100. And 
unlike Stop, it doesn't need a 
CONT to resume execution. It ef- 
fectively provides a new debug- 
ging tool at the cost of about 200 
bytes of RAM space. 



"BASTEP 

implements two 

new Basic 

commands— 

CMD"B" and 

CMD"Q". . . " 



BASTEP is really two pro- 
grams, since it is a Basic pro- 
gram that incorporates a 
machine-language program in 
data statements. BASTEP first 
modifies the Memory Size? set- 
ting to protect the top 203 bytes 
of RAM and then POKEs the 
machine code into that area. 
(The machine code is relo- 
catable, so it can be located at 
the top of a 4K, 16K, 32K, or 48K 
machine.) Finally, intercepts 



The Key Box 

Cassette or Disk Basic 
Model I 
16K-48K RAM 
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and links are installed which ef- 
fectively make this code an ex- 
tension of the Basic interpreter. 
The new commands, CMD"B" 
and CMD"Q", are now active. 

How to Use BASTEP 

First, key in the Basic pro- 
gram (Listing 1) and save to tape 
or disk. You may omit the 
REMs, but take a few minutes 
to carefully check the Data 
lines (10 and 20). You should 
have 29 items, each 14 char- 
acters in length. 

On power-up (Level II) or 
Basic/BASICR entry (DOS), re- 
ply <enter> to Memory Size? 
(BASTEP does its own setting 
of this value). Now load and run 
BASTEP. It will take about 28 
seconds, during which the 
message "Building BASTEP 
Machine Code" will be dis- 
played on the screen with a 
flashing asterisk. 

When the run finishes, 
BASTEP will display the start ad- 
dress of the machine code and 
the new memory size setting. 

Next, load the Basic program 
you wish to test. Type CMD"B" 
and Run. A number will appear 
at the bottom right corner of the 
screen. If the first line in 
the program is 10, you'll see 
#00010. Touch any key and line 
10 will be executed, and the 
next line will be displayed in the 
same spot. Each time a line 
number is displayed, the 
system will halt execution until 
you touch a key, then proceed 
with that line. 

As soon as you touch a key to 
proceed with the displayed line 
number, say 1250, the #01250 is 
erased from the screen. That 
tells you that line 1250 is ex- 
ecuting. If you don't see a new 
line number within a reason- 
able period of time, line 1250 
may be looping within itself. In 
such cases, BASTEP deliber- 
ately avoids re-displaying the 
line number after the first time. 

BASTEP differentiates be- 
tween a quick touch (one fourth 
second or less) and holding a 
key down. If you do the latter, 
BASTEP allows that keystroke 
to be passed to Basic when ex- 
ecution resumes. In most 
cases, Basic will ignore it 
anyway, but this can be a 
useful feature if you're about to 

►'See List ot Advertisers on Page 435 



Listing 2 continued 












STRING POINTER 










BF3D 23 


00160 




INC 


HL 


; POINT TO STRING ADD 


RESS 












BF3E 5E 
E 


00170 




LD 


E,(HL) 


; STRING ADDRESS TO D 


BF3F 23 


00180 




INC 


HL 




BF40 56 


00190 




LD 


D, (HL) 




BF41 EB 

L 

BF42 2B 


00200 




EX 


DE,HL 


; STRING ADDRESS TO H 


00210 




DEC 


HL 


;STEP BACK 


BF43 D7 


00220 




RST 


10H 


;INC HL & FIND FIRST 


NON-BLANK 












BF44 7E 

A 

BF45 FE42 


00230 




LD 


A,(HL) 


; FIRST CHARACTER TO 


00240 




CP 


'B' 


;CMD"B"? (BASTEP ACT 


IVATE) 












BF47 2809 


00250 




JR 


Z,CMDB 


; BRANCH IF YES 


BF49 FE51 
p) 


00260 




CP 


'Q' 


;CMD"Q"? (QUIT BASTE 


BF4B 2810 


00270 




JR 


Z,CMDQ 


; BRANCH IF YES 


BF4D El 


00280 




POP 


HL 


; CLEAR STACK 


BF4E El 


00290 




POP 


HL 


; RESTORE ORIGINAL HL 


BF4F C30000 


00300 


EXIT 


JP 





; (JUMP ADDRESS EX 41 


74/5H) 












BF52 216BBF 


00310 


CMDB 


LD 


HL,ENTPT ;GET ENTRY POINT AD 


DRESS IN HL 












BF55 3EC3 


00320 




LD 


A,0C3H 


; "JP" OP-CODE IN A 


BF57 CDF9BF 


00330 




CALL 


CMDINT 


;SET INTERCEPT IN 41 


C4-6H 












BF5A El 


00340 


CMDB1 


POP 


HL 


; RESTORE HL 


BF5B Dl 


00350 




POP 


DE 


; CLEAR STACK 


BF5C C9 


00360 




RET 




; RETURN TO BASIC INT 


ERPRETER 












BF5D CDEDBF 


00370 


CHDQ 


CALL 


DEACT 


/•DEACTIVATE BASTEP 


BF60 18F8 


00380 




JR 


CMDB1 


;BACK TO BASIC 

Listing 2 continues 



execute a line that does a quick 
INKEY$ scan before rushing off 
to do other things. 

There are two methods to 
switch from single-stepping to 
normal running. First, a 
CMD"Q" encountered any- 
where in the program (or en- 
tered in command mode during 
a break in execution) does the 
task, as does pressing break 
while BASTEP is displaying a 
line number. Used at any other 
time, break works normally, 
and BASTEP remains active. As 
with other keys, the length of 
depression of break makes a 
difference— a quick touch 
deactivates BASTEP, but does 
not interrupt execution (the pro- 
gram then proceeds at normal 
speed); holding down the Break 
key deactivates BASTEP, then 
breaks Basic execution also. 
Use CMD"B" and CMD"Q" at 
appropriate points throughout 
so that you BASTEP only the 
lines that interest you. 

One more point before we ex- 
amine some of the techniques 
involved. If Tandy issues a new 
release of TRSDOS in which 
CMD"B" or CMD"Q" has been 
implemented for some other 



RANDOM 
ACCESS 

& 

BASIC 

FILE 

HANDLING" 



DSC Publishing 

2 Dogwood Drive 

P0 Box 769 

Danbury, CT 06810 

Phone Order 
(203) 748-3231 




the HOW TO, SHOW & TELL, STEP by 
STEP book. Written for TRS-80 and all 



The breakthrough book for non-programmers... 
businessmen and professionals who want to 
solve in house problems by writing your own 
customized program... and the hobbyist with 
the desire to get beyond the cassette and into 
disk data storage and file manipulation. "DOS 
Random Access & File Handling" is the plain 
speaking, easy to read 150 page book for 
learning HOW TO WRITE SPECIAL PROGRAMS 
for inventories, mailing lists, work schedules, 
record keeping and more. Your acquaintance 
with Level I and Level II basic and this self- 
instruction tutorial will assure quick progress. 



Please send me a copy of "DOS Random Access 
& Basic File Handling" for 29.50 + 1.50 shipping. 
Model I & III a Model ll/CPM □ 
Also send the compatible 8" program disk for 
32.50 + 1.50 shipping CPM a or Model II a 
or the 5V 4 " disk for Model I and III for 28.50 + 
1.50 shipping d 

Overseas add 8.00 per book and disk 
airmail. 

Name 

Address 

City 

State Zip 



Master Charge D VISA D 

Expiration Date 

Card # 



Check D Money Order □ 
COD (2.00 extra) □ 
Signature 



'Dealer Inqu 



Phone Orders (203) 748-3231 
CT. orders add 7.5% sales tax. 



80 Micro, January 1983 • 353 



Listing 2 continued 










BF62 FFFF 


00390 


LNSV 


DEFW 


0FFFFH ;LINE POINTER SAVE A 


REA 










BF64 23 


00400 


ASCLN 


DEFB 


'#' ;FOR OUTPUT OF LINE 


NUMBER 










0006 


00410 


ASCLN1 


DEFS 


6 


BF6B 7E 


00420 


ENTPT 


LD 


A,(HL) ; (ENTERED BY JP AT 4 


1C4H) 










BF6C B7 


00430 




OR 


A ;DOES HL POINT TO A 


ZERO BYTE? 










BF6D 207B 


00440 




JR 


NZ,LNINT ; BRANCH IF NO (DON* 


T INTERCEPT) 










BF6F D5 


00450 




PUSH 


DE ;SAVE DE 


BF70 ED5B62BF 


00460 




LD 


DE,(LNSV) ;GET PREVIOUS LINE 


POINTER 










BF74 DF 


00470 




RST 


18H ; COMPARE HL WITH DE 


BF75 2872 


00480 




JR 


Z,ENTPT4 ;BRNCH IF EQUAL (DO 


N'T INTERCEPT) 








BF77 E5 


00490 




PUSH 


HL ;SAVE HL 


BF78 C5 


00500 




PUSH 


BC ;SAVE BC 


BF79 23 


00510 




INC 


HL ;STEP HL 


BF7A ED5BA440 


00520 




LD 


DE,(40A4H) ;LOAD DE WITH 'BA 


SIC START' PTR 








BF7E 13 


00530 


ENTPT1 


INC 


DE ;STEP TO MSB OF BASI 


C LINE PTR 










BF7F 1A 


00540 




LD 


A,(DE) ;END OF PROGRAM IN C 


ORE? 










BF8fc B7 


00550 




OR 


A 


BF81 2864 


00560 




JR 


Z,ENTPT3 ; BRANCH IF YES (DON 


'T INTERCEPT) 










BF83 4F 


00570 




LD 


C f A ;MSB OF LINE POINTER 


TO C 










BF84 IB 


00580 




DEC 


DE ;STEP DE BACK 


BF85 DF 


00590 




RST 


18H ; COMPARE HL WITH DE 


BF86 2805 


00600 




JR 


Z f ENTPT2 ; BRANCH IF EQUAL (I 


NTERCEPT) 










BF88 1A 


00610 




LD 


A,(DE) ;LSB OF LINE POINTER 

Listing 2 continues 



purpose, just change the rele- 
vant byte for each in the data 
statements to something more 
suitable. As an exam- 
ple—perhaps you wanted to 
use CMD"X" to activate 
BASTEP (instead of CMD"B"), 
and CMD"Y" to deactivate it 
(instead of CMD"Q"). Edit line 
10 and change the 42 (i.e. "B") 
in the middle of Data item three 
to 58 (i.e. "X"). Remember, 
these are hexadecimal values, 
not ASCII. 

Also, change the 51 (i.e. "Q") 
at the beginning of Data item 
four to 59 (i.e. "Y"). 

The Program 

Lines 10 to 20 are the 
machine code (in hexadecimal), 
grouped in 29 seven-byte items 
(see later in this article for an 
Assembly listing of this code). 
Some bytes are coded as '**'. 
These are relocatable bytes 
whose contents will vary 
depending on your RAM size. 

In line 30, locations 16756/7 
(X'4174/5') contain the branch 
address to which control is 



TRS-80 Model I is alive and well at the Micromint. 
We still have the expansion interfaces you need! 



Disk-80 
Expansion Interface 




As featured in Ciarcia's Circuit Cellar 
Byte Magazine, March 1981 

Reviewed in March '82 "80 Microcomputing" 



DSK01 Disk-80 Expansion Interlace 
with 32k RAM A & T 

dSK02 Disk-80 Expanstion Interface 
with 32k RAM & Printer Port 
A&T 

DSK03 Disk-80 Complete Kit with 

32k RAM & Printer Port .... 

DSK04 Disk-80 Bare Printed 

Circuit Board 

DSK05 Printer/Power Supply 

Circuit Board 



$330.00 



380.00 
275.00 



48.00 
16.00 



The Disk-80 Expansion Interface is the 
perfect peripheral for converting your TRS-80 
Model I into a professional computer system. 
The Disk-80 controls up to four 35 to 77 track 
mini-disk drives, and contains a hardware data 
separator which substantially increases the 
reliability of data transfers. Attaches to the 
CPU/Keyboard connector and comes complete 
with mini-disk controller, 32K expansion 
memory, power supply, optional Centronics 
compatible printer port, real time clock and 
buffered bus expansion connector. 

"Reviewing Disk-80 is almost incongruous, 
because any comments can be summarized 
with the sentence, "It works." Dennis Bathory 
Kitsz, 80 Microcomputing, March 1982. 

All interfaces are Radio Shack hardware and 
soltware compatible and carry a 60 day war- 
rantee including parts and labor. 
All units include user's manual, power sup- 
ply & auxiliary TRS-BUS connector for future 
expansion 

Dealer Inquires Invited 

N.Y. State residents please add appropriate sales tax. 



To Order: Call Toll Free: 1-800-645-3479 
(In N.Y. State Call: 1-516-374-6793) 
For "nformation Call: 1-516-374-6793 

MICROMINT INC. 
917 Midway 
Woodmere, N.Y. 11598 




Comm-80 




As featured in Ciarcia's Circuit Cellar 
Byte Magazine, May and June 1980 

The COMM-80 is the only interface you 
need to turn your TRS-80 Model I into a 
time sharing terminal with provisions for a 
printer. The COMM-80 combines the most 
used features of the RS expansion inter- 
face in a low cost unit containing a built-in 
RS-232-C interface, a full 8-bit parallel port 
and a 40 pin bus connector for future 
expanstion. Terminal software is included 
at no extra cost. 

• RS-232-C Serial output port (50-19200 baud) 
with standard DB25 connector. 

• Centronics compatible parallel printer port (34 
pin) 

• 40 pin card edge connector for bus expansion 

• Connects directly to CRT terminals, modems, 
printers, other computers. 

• Includes case, power supply & interconnecting 
cable. 



CM01 COMM-80 Serial/Parallel 
I/O Interface A&T 



$150.00 



TRS-80 is a trademark of Tandy Corp, 
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software 



SOlLWdlC Silly Syntax 

A sensational and educational version ot a popular party 
game for the TRS-80* Color Computer. For 1 to ten 
players. Silly Syntax requires I6K Extended Basic (32K 
for disk version). For $19.95, you get a user guide and a 
tape containing the Silly Syntax game and 2 stores. You 
can create your own stories or order additional story 
tapes. Disk is $24.95 for Silly Syntax and 2 stories or 
$49.95 for Silly Syntax and all 62 stories. 

Auto Run 

Auto Run is a utility program for the TRS-80* Extended 
Basic Color Computer. Auto Run creates a tape which 
consists of a machine language loader followed by your 
Basic or machine language program. With this tape, a 
simple CLOADM command will load and start the 
loader and then load and start your program. With the 
graphics editor, you may design a title screen which will 
display as your program loads. Basic programs can be set 
to load anywhere in memory above $600 (PCLEARO). 
Auto Run is $14.95 and includes complete documenta- 
tion and an assembly source listing. 

Tape Information 
Management System 

A user-oriented, easy to use personal database manage- 
ment system featuring: 

♦variable record and field lengths 

•phrase substitution editor 

•up to 8 user-definable fields 

*ML sort, search and delete functions 

•range and item search modes 

•user-definable printer format, for any 
printer. 
For $24.95 you get the database management system, 
our full documentation and our 1981 Bibliography of ar- 
ticles relating to the Color Computer. Requires I6K Ex- 
tended Basic. 32K recommended. 
Add $1.00 per tape or disk for postage and handling. 
Ohioans add 5.5% sales lax. COD orders and dealer in- 
quiries invited. 

Sugar Software, Dept. 2 
2153 Leah Lane 
Reynoldsburg, Ohio 43068 
(614) 861-0565 .144 

"TRS-80 is a trademark of Tandy Corp. 



Announcing 



STOCKVUE 



The first comprehensive "what if" program designed 
just for the stock market investor. 

STOCKVUE confers enormous decision-making ability to anyone 
who trades in stock and/or options. 

Basically the program provides, in spread sheet format, calculations 
of dividends, interest (margined trades), trade commissions (based 
on user's choice of full-service or discount broker), and exact open- 
ing cost according to SEC rules on margin requirements. 

You provide information related to the opening trade plus a couple of 
hypothetical figures: a future date for closing the position and a likely 
price for the stock on that date. The program quickly posts all the 
details and the bottom line— net return on investment. 

Then other variations are easy to consider, just by moving to the in- 
put variable of your choice and changing it. STOCKVUE instantly 
recalculates and displays the new answer— like VISICALC! 

Versions available: IBM PC, TRS-80 III, CP/M. Price $129.95, tax- 
deductable. VISA and MasterCard welcome. 

Other programs available from Star Value Software: OPTIONVUE— 
for trading option spreads, straddles, and combinations; OPVALU— 
for assessing the fair market value of call and put options. 

Call or write for more information: 



12218 Scribe Drive, Austin, TX 78759 
Phone 512/837-5498 

* ■ a a . - ii a 



'346 



. 






SOMETHING FOR EVERYONE: 



(MODEL I/I 1 1) 



SUPREME RULER 




YOU HAVE JUST BEEN ELECTED TO 
OFFICE IN YOUR COUNTRY. NOW YOU 
MUST KEEP YOUR ECONOMY AFLOAT, 
WHILE TRYING TO AVOID YOUR NASTY 
NEICH80URS. YOUR MAIN TASK IS TO 
RUN YOUR COUNTRY AND BUILD YOUR 
ARMY TO TAKE OVER ALL THE OTHER 
NATIONS WITHOUT KILLING OFF YOUR 
POPULATION OR GOING BANKRUPT. 
CAN YOU DO IT?? 
FOR 1-4 PLAYERS , WITH 0-4 
COMPUTER-CONTROLLED COUNTRIES. 
A CHALLENGING PROGRAM !! — «1B. SO 



THE BATTLE OF 

ZEIGHTY 




YOU HAVE BECOME THE GENERAL OF A 
STRUGGLING ARMY. YOU HAVE TO SET 
UP AN ATTACKING FORCE AND TAKE 
ZEIGHTY PASS. THE COMPUTER HAS 
CONTROL OF ALL ASPECTS OF THE 
DEFENDERS, AND PROVIDES QUITE A 
CHALLENGE. YOU'LL HAVE TO THINK 
TO WIN ! ! «1B. SO 



ORDER FROMi 



0R> 



EXTERMINATE! ! 




EXTERMINATE IS A NEW IDEA IN AN 
ARCADE GAME, NOT A COPY OF SOME- 
ONE ELSE'S. YOU ARE UP AGAINST 
A HORDE OF ALIEN "BUGS", AND YOU 
HAVE TO GET RID OF THEM BEFORE 
THEY GET OUT OF CONTROL. USE 
YOUR SUPERIOR SPEED AND WEAPONS, 
BUT WATCH OUT! THEY BREED QUICK! 
MACHINE LANGUAGE, OF COURSE, AND 
ITS FAST, WITH GOOD GRAPHICS. 

«14. SO 






P.O. BOX 598 
FALLS STATION 
NIAGARA FALLS. NY 
U.S.A. 143(0-1598 



710 UPPER JANES ST. 
HAMILTON. ONTARIO 
CANADA. L9C-2ZB 
PHONEi 416-389-6086 



DEALER ENQUIRIES INVITED. 



NO SHIPPING CHARGE FOR 2 OR NORE GAMES 



VISA AND NASTERCARD ACCEPTED 
ALL PRICES IN U.S. FUNDS 
DISK VERSIONS. $2.00 EXTRA 
PLEASE ADO $2.00 FOR SHIPPING 
ALLW 2 KEEKS FOR PERSONAL CHEQUES 
PLEASE ADD $1.50 FOR C. 0.0. 



^See List ol Advertisers on Page 435 
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Listing 2 continued 










TO E 










BF89 5F 


00620 


LD 


E,A 




BF8A 51 


00630 


LD 


D,C ;MSB OF LINE POINTER 




TO D 










BF8B 18F1 


00640 


JR 


ENTPT1 ;STEP TO NEXT LINE I 




N CORE 










BF8D 2B 


00650 ENTPT2 


DEC 


HL ;STEP HL BACK TO ORI 




GINAL 










BF8E 2262BF 


00660 


LD 


(LNSV),HL ;SAVE POINTER IN L 




NSV 










BF91 23 


00670 


INC 


HL ;STEP HL TO LINE NUM 




BER 










BF92 23 


00680 


INC 


HL 




BF93 23 


00690 


INC 


HL 


* 


BF94 5E 


00700 


LD 


E,(HL) ;LINE NUMBER TO DE 




BF95 23 


00710 


INC 


HL 




BF96 56 


00720 


LD 


D,(HL) 




BF97 ED532141 


00730 


LD 


(4121H),DE ;LINE NO. TO BASI 




C ACCUM AREA 










BF9B 0600 


00740 


LD 


B f ; ZEROISE B & C 




BF9D 48 


00750 


LD 


C f B 




BF9E 2165BF 


00760 


LD 


HL,ASCLN1 ; POINT HL TO OUTPU 




T AREA 










BFA1 CD2F13 


00770 


CALL 


132FH ; CONVERT LINE NUMBER 




TO ASCII 










BFA4 AF 

UT 

BFA5 329C40 


00780 


XOR 


A ; INDICATE VIDEO OUTP 




00790 


LD 


(409CH) ,A 




BFA8 2A2040 


00800 


LD 


HL f (4020H) ;SAVE CURSOR POIN 




TER 










BFAB E5 


00810 


PUSH 


HL 




BFAC 3AA640 


00820 


LD 


A,(40A6H) ;SAVE TAB POINTER 




BFAF F5 


00830 


PUSH 


AF 




BFB0 21F23F 


00840 


LD 


HL,3FF2H ; CURSOR TO BOTTOM 




F SCREEN 










BFB3 222040 


00850 


LD 


(4020H) ,HL 




BFB6 2164BF 


00860 


LD 


HL,ASCLN ; POINT HL TO ASCII 




LINE NUMBER 










BFB9 CDA728 


00870 


CALL 


28A7H ; OUTPUT TO SCREEN 




BFBC Fl 


00880 


POP 


AF ;RESTORE TAB POINTER 




BFBD 32A640 


00890 


LD 


(40A6H) ,A 




BFC0 El 


00900 


POP 


HL ; RESTORE CURSOR POIN 




TER 










BFC1 222040 


00910 


LD 


(4020H) ,HL 




BFC4 CD4900 


00920 


CALL 


0049H ;WAIT FOR KEY TO BE 




TOUCHED 










BFC7 21F23F 


00930 


LD 


HL,3FF2H ; POINT HL TO LINE # 




ON SCREEN 










BFCA F5 


00940 


PUSH 


AF ;SAVE INPUT CHARACTE 




R (REG A) 










BFCB CD7C05 


00950 


CALL 


057CH ; CLEAR LINE # FROM S 




CREEN 










BFCE 01A942 


00960 


LD 


BC, 17065 ;DELAY 0.25 SECOND 




BFD1 CD6000 


00970 


CALL 


0060H ; (17065*14.65 




MSECS) 










BFD4 213640 


00980 


LD 


HL,4036H ;CLEAR KEYBOARD ARE 




A (4036-C) 










BFD7 71 


00990 


LD 


(HL) ,C ; (I/P CHAR PA 




SSED TO 










BFD8 113740 


01000 


LD 


DE,4037H ; BASIC ONLY 




IF HELD 










BFDB 0E06 


01010 


LD 


C,6 ; DOWN PAST T 




HIS POINT) 










BFDD EDB0 


01020 


LDIR 






BFDF Fl 


01030 


POP 


AF ; RESTORE INPUT CHARA 




CTER 










BFE0 FE01 


01040 


CP 


1 ;WAS IT BREAK KEY? 




BFE2 2003 


01050 


JR 


NZ f ENTPT3 ; BRANCH IF NO 




BFE4 CDEDBF 


01060 


CALL 


DEACT ; DEACTIVATE BASTEP I 




F BREAK 










BFE7 CI 


01070 ENTPT3 


POP 


BC ; RESTORE BC 




BFE8 El 


01080 


POP 


HL ; RESTORE HL 




BFE9 Dl 


01090 ENTPT4 


POP 


DE ; RESTORE DE 




0003 


01100 LNINT 


DEFS 


3 INSTRUCTION EX 41C4 




-6 SET UP HERE 








BFED 21FFFF 


01110 DEACT 


LD 


HL f 0FFFFH ; RESET LINE PTR SA 




VE AREA 










BFF0 2262BF 


01120 


LD 


(LNSV) f HL 




BFF3 2AEBBF 


01130 


LD 


HL,(LNINT+1) ;GET ORIGINAL C 




ONTS OF 41C4- 


6 








BFF6 3AEABF 


01140 


LD 


A, (LNINT) 




BFF9 32C441 


01150 CMDINT 


LD 


(41C4H),A ;SET UP 41C4-6 




BFFC 22C541 


01160 


LD 


(41C5H) ,HL 




BFFF C9 


01170 


RET 






0000 


01180 


END 






00000 TOTAL ERRORS 







transferred when a CMD state- 
ment is encountered. On Level 
II machines, it points straight 
to the L3 Error routine. 

In line 40, locations 16548/9 
(X'40A4/5') point to the start of 
the Basic program area in RAM. 

Lines 60 to 70 check that 
BASTEP is not already installed 
before proceeding. If it is, and 
this program was run a second 
time, we'd pick up our own in- 
tercepts as system pointers. 

Locations 16561/2 (X'40B1/2') 
in line 90 contain the Memory 
Size? value. By modifying that 
value and issuing a Clear, we 
can protect the top 203 bytes of 
RAM. The value obtained in AD 
in line 110 must be the start ad- 
dress of the machine code. 
Since POKE requires ad- 
dresses above 32767 to be ex- 
pressed as (address-65536), we 
need to check for these. 

Lines 130 to 260 are a series 
of For . . . Next loops which 
take the machine code from the 
data statements, convert it to 
ASCII, and POKE into the ap- 
propriate locations. 

Line 280 transfers the normal 
CMD vector address locations 
16756/7 (X'4174/5') to the ap- 
propriate exit point in the 
machine code, because we'll 
still need to be able to handle 
DOS commands like CMD"R", 
CMD'T", CMD"E" etc. 

In lines 290 to 300, location 
16836 (X'41C4') is an address to 
which the Basic interpreter 
jumps prior to starting a new 
line. This is the key to the 
operation of BASTEP. By sav- 
ing its contents and putting 
into 16756/7 an intercept which 
points to BASTEP in high 
memory, we've just extended 
the interpreter! 

All CMD statements are 
routed to label CMDIN. CMDs 
other than CMD"B" and 
CMD"Q" are passed back to 
Basic at the jump labeled Exit. 

Each time Basic is about to 
begin a new line, the intercept 
at 16836 (X'41C4') passes con- 
trol to ENTPT. The 3-byte 
instruction at label LNINT is in- 
itialized with the original con- 
tents of locations 16836-8 
(X'41C4-6'), so we can hand 
back to Basic when required. 
Extensive use is made of ROM 
routines to do various tasks. ■ 
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UV EPROM ERASER 

$49.95 



Erases over 15 EPROMS - 15 minutes erase lime 

Element lite 7700 hours 

Intensity: 12Ws Vjcm'atl" 

Erases all UV EPROMS (2716. 2732, 2516, 2532, etc. 



♦ HOBBY MODEL 

INDUSTRIAL 
MODEL 

QUV-T8/2N 

$68.95 

WITH TIMER & 
SAFETY SWITCH 

QUV-T8/2T 

$97.50 

ABOVE 220VAC 
50HZ 

0UV-T8/2TE 

$109.50 

PRICE INCLUDES 
_ PERSONALITY MODULES 

STAND ALONE RS-232 e/iOQ OH 

INTELLIGENT PROGRAMMER 1)403. UU 

PROGRAMS: 2508, 2516, 2532, 2716, 2732, 2732A, 2758, 8748. 8749 
OPTIONAL MODULES: 2564, 2764, 8755A, 8741 

* STAND ALONE. CRT. OR COMPUTER CONTROL 

* UPLOAD/DOWNLOAD IN MOTOROLA OR INTEL HEX FORMAT _ ...p 

* MICROPROCESSOR BASED * 4 K INTERNAL RAM -i, GftNVl ....rn 

* 90 DAY PARTS & LABOR WARRANTY ON ALL PRODUCTS* pROG^K be released 

PHONE ORDERS (305) 776-5870 

TWX: 510-955-9496 • WE ACCEPT VISA, MC, CHECKS, C.O.D., MONEY ORDER 

LOGICAL DEVICES INC. ^ 330 

781 W. OAKLAND PARK BLVD. • FT. LAUDERDALE, FL 33311 "* JJU 
w ADD: $4.00 SHIPPING $2.00 C.O.D. CHARGES ^ 




Micro Power Bench™ 







Single Switch Control of CPU and Peripherals 
Built in circuit breaker protects your system 
Four power expansion outlets 
Choice of high quality oak or walnut 
Compatible with IBM, APPLE, TRS-80 and others 

Order Direct 

800-343-431 1 

Master Charge and Visa Accepted 

CAB-TEK, Inc. 

Riverside St., Nashua NH 03062 

CIVILIZING COMPUTERS 

^249 ACOUSTIC ENCLOSURE $ 99! 

DEALER INQUIRIES INVITED 

sSee List of Advertisers on Page 435 





«**£«■ 






Save money. Your 
firm name and address 
printed on standardized, 
continuous checks, invoices, 
statements, letterheads and labels. 
Designed to work with programs from over 
200 software sources ... or program to our 
attractive forms yourself with guides provided. 

Full color catalog also has stock tab paper, 
envelopes, diskettes, many other supplies and 
accessories. 

• Quality products at low prices 

• No "handling charges" or hidden extras 

• Available in small quantities 

• Money-Back Guarantee 

Fast service . . . buy direct by mail or 

PHONE TOLL FREE 

1 + 800-225-9550 







(Mass. residents 1 + 800- 
8:00 A.M. to 5:00 RM 


322-8560) 
., ET 














NAME 






PHONE 




COMPANY 


STREET 


CITY, STATE and ZIP 


Required 


to 


help us send you 


correct 


information: 


SOFTWARE BRAND 




PACKAGE* 




D 


Do own 
programming. 


COMPUTER MAKE 




MODEL* 




□ 


Have not 
purchased yet. 


YOUR LINE OF BUSINESS 






Number of 
employees. 





_ Nebs. _ 
Computer Forms 

Hi 12 South Street, Townsend, 



CODE 15103 



'., Massachusetts 01469 
A division of New England Business Service, Inc. 
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HARDWARE 



Make it simpler and easier. 



A Port Mapped A/D Converter 



M. Parris 
Chemistry Dept. 
Carleton University 
Ottawa, Ontario 
Canada K1S 5B6 



'he input of single-channel 
analog data into a micro- 



computer is relatively simple, 
and any number of effective de- 
signs are available. While these 
can be cheaply built, a single 
channel isn't very versatile. 
When National Semiconductor 
introduced its ADC0816 16- 
channel data acquisition chip a 
few years ago, I expected to see 
a design or two making use of 
its capabilities. A design hasn't 
surfaced (so far as I'm aware), 




Photo 1. TRS-80ADC 
358 • 80 Micro, January 1983 



so I was obliged to make up my 
own. 

The ADC0816 is a CMOS, 16- 
channel, multiplexed, eight-bit, 
successive-approximation A/D 
converter. Low-powered (15 mW 
at 5V) supply, Tri-State outputs 
and latched addressing make 
microprocessor interfacing a 
breeze. Though the conversion 
time of about 100 microseconds 
is slow, this isn't likely to be a 
serious problem. The chip archi- 
tecture is ingenious. (See Elec- 
tronics April 27, 1978, for a brief 
description.) This isn't impor- 
tant in order to use it for a data 
acquisition system — what is im- 
portant is that the control sig- 
nals, Read, Write and EOC are 
compatible with 8080, 8085, Z80, 
SC/MP and 6800 processors 
with little or no external logic. 

I wanted to interface a TRS-80 
with a view to such grandiose 
schemes as the simultaneous 
monitoring of a freezer temper- 
ature, three inside room tem- 
peratures, two outside tempera- 
tures, humidity and sunshine 
levels, wind speed, furnace 
stack and burner temperatures 
and oil consumption rate. This 
leaves four channels open for a 



game of Pong! 

My TRS-80 ADC interface (see 
Fig. 1) is port mapped, which is a 
little simpler than memory map- 
ping. It's also easier to make 
subsequent changes to an 
eight-bit port address than to a 
16-bit memory address. The ana- 
log channel is selected by writ- 
ing to port OFEH the four-bit 
channel selector (D0-D3). With a 
clock frequency of about 300 
KHz, provided by IC7, a 555 tim- 
er, it may take as little as four 
microseconds to output EOC 
(pin 13 of IC6) after channel se- 
lection and then perhaps a fur- 
ther 250 microseconds before 
EOC signals that the data are 
valid and may be read at port 
OFEH. Both these times are 
variable and it isn't possible to 
ensure the first transition is de- 
tected at higher clock frequen- 
cies. This should be borne in 
mind if changes are made to the 
ADC or processor clocks. 

The Programs 

Program Listing 1 shows a 
simple means of reading chan- 
nel (for example) into register 
A. The 100-microsecond loop en- 
sures the above-mentioned EOC 
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Fig. 1. Schematic for 16 Channels of TRS-80 ADC 



delay time is well past before 
looking for EOC, latched into D4 
at port OFDH. Listing 1 also 
shows the.corresponding Basic 
routine. In this case the problem 
doesn't arise because the inter- 
preter runs so slowly. 

The EOC on D4 may be used 
to signal an interrupt if desired, 
in which case minor circuit 
changes will be required. Alter- 
natively, D5, D6 or D7 can be 
used quite effectively in a poll- 
ing system to indicate that up- 
dates are available for up to 
eight of the 16 input channels. 
As an example, Fig. 2 shows a 
circuit enabling one to sample 
the discharge rate of a capaci- 
tor. If R equals 25K, and T in 25- 
ms units measures the time for 
the voltage to fall to 1.85V (37 
percent or 95/256 of 5V), then T 
equals C in microfarads. The 
TRS-80 expansion interface's 
25-ms interrupt can be used for 
timing, and Program Listing 2 
is a simple Basic program 
showing how to check the per- 
formance of capacitors from 
about five to 250 microfarads 
using this system. 

A 40-Hz rate is too slow for 
many purposes and an external 
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clock must be supplied for sam- 
pling up to the maximum rate of 
about 4 KHz (for a single chan- 
nel). Program Listing 3 shows 
how to sample 256 data from a 
waveform at channel 0, using 
the external clock applied at D5 
with an upper limit of about 2.5 
KHz. 

It appears that the ADC08616 
was designed specifically for 
ratiometric conversion, since 
reference and input voltages are 
equal. Any of the 16 analog in- 
puts can be used as position 
sensors by connection to the 
wiper of a potentiometer which 
has the reference voltage ap- 
plied across it. A position sen- 
sor has a host of potential appli- 
cations, with one of the more 
obvious being a two-channel 
joystick interface— allowing up 
to eight participants. 

Program Listing 4 shows a 
simple application of a joystick 
interface in which a jump to the 
interrupt service routine is 
placed into an interrupt vector 
at 401 2H, used by the TRS-80's 
expansion interface. The inter- 
rupt service routine (ISR) relates 
the joystick's two channels to 
the positioning of a "*" cursor, 



TO 
ADC 



D5 o 



OK 

AAA. °+5V 



CHO o 




Fig. 2. Circuit to sample the discharge rate of a capacitor: D5 is used 
for the "look at me" signal 





00100 


;READ 


DATA FROM PORT 


0FEH 




00110 


;ADC 


STATUS FROM PORT 


0FDH 


3E00 


00120 




LD A,0 


; SELECT CHANNEL 


D3FE 


00130 




OUT (0FEH) ,A 


; START CONVERSION 


0607 


00140 




LD B,7 


;7 LOOPS FOR .1 MS 


10FE 


00150 


TEOC 


DJNZ TEOC 




WAIT PAST TEOC 


DBFD 


00160 


TC 


IN A, (0FDH) 




GET ADC STATUS 




00170 




BIT 4, A 




EOC HIGH? 


28FA 


00180 




JR Z,TC 




NO, WAIT FOR TC 


DBFE 


00190 




IN A,(0FEH) 




YES, GET DATA 




00200 




END 




TOTAL 


ERRORS 











10 OUT(254) ,0:PEM SELECT CHANNEL 
20 A=INP(254) :REM READ INPUT DATA 



Program Listing 1. Reading channel zero: assembly language 
and the equivalent Basic routines 
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enabling one to steer this over 
the screen with a smoothly up- 
dated (40 Hz) motion and insig- 
nificant slowing of a Basic pro- 
gram's execution. This is a valu- 
able facility for non-keyboard in- 
structional interaction; and is 
easily adapted to games of 
Pong or Battleship, maze 
threading and the like. Bear in 
mind that cassette transfers, be- 
ing timing sensitive, will be 
precluded once the contents of 
4012-4014H have been re- 
placed, so Basic program 
loading must take place before 
running Program Listing 4. 

This versatile chip is available 
for $12 from Jameco. The circuit 
of Fig. 1 isn't difficult to wire- 
wrap, but for a neater job use a 
five by four-inch circuit board 
(see Fig. 3) matching a 40-pin 
header plug. I can supply the cir- 
cuit board for $6.50 plus $2.00 
postage (Ontario residents 
please add tax).B 
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Fig. 3. a. Circuit-board pattern b. Component placement 
diagram 



10 


CLS 


20 


IF INP(253)-255 THEN 40 


30 


PRINT @ 320, "START SWITCH UP":GOTO 20 


40 


PRINT @ 384,"CHARGING":OUT(254) ,0 


45 


IF INP(254)<254 THEN 40 


50 


IF INP(253)=223 THEN 70 


60 


PRINT @ 448, "START SWITCH DOWN":GOTO 50 


70 


POKE 16448, 0:REM ZERO THE TIMER 


B0 


A=PEEK(16448) :OUT(254) ,0 


85 


IF INP(254)>95 THEN 80 


90 


PRINT @ 512, "CAPACITY ="; A; "MICROFARADS" 


Program Listing 2. A Basic program to monitor a capacitor's 


discharge rate using the circuit of Fig. 2 
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00100 


; COLLECT 256 BYTES FROM ADC 


5000 




f/0110 




ORG 500011 


MUST START PAGE 


0100 




00120 


STORE 


DEFS 256 


WHOLE FAGE USED 


5100 


210050 


00130 


START 


LD HI, ,STORE 




5103 


0E20 


0014(1 




LD C,20H 




5105 


DBFD 


0G150 


TIME 


IN A, (0FDH) 


GET THE CLOCK 


5107 


E620 


00160 




AND 20H 


ON D5 


5109 


47 


00170 




LD H,A 


STORE IT 


510A 


A 9 


08180 




XCF C 


TIME YET? 


510B 


28P8 


00190 




JR Z,TIME 


NOT YET 


510D 


48 


00200 




LD C,B 


YES, UPDATE IT 


51GE 


3E00 


00210 




LD A,0 


CHANNEL IS 


5110 


D3FE 


00220 




OUT I0FEH) ,A 


LOOK FOR DATA 


5112 


0607 


00230 




LD B,7 


100 MICROSEC 


5114 


10FE 


00240 


TEOC 


DJNZ TEOC 


UNTIL VALID 


5116 


DBFD 


00250 


TC 


IN A, (0FDH) 


TO LOOK FOR 


5118 


CB67 


00260 




BIT 4, A 


EOC ON D4 


511A 


28FA 


002/0 




JR Z,TC 


NOT YET 


511C 


DBFE 


00280 




IK A, (0FEH) 


YES, GET DATA 


511E 


77 


00290 




LD (HL) ,A 


STORE IT 


511P 


2C 


00300 




INC L 


UPDATE STORE 


5120 


20E3 


00316 




JR NZ,TIME 


UNTIL NEW PAGE 


5122 


C3191A 


00320 




JP BASIC 


THEN EXI'i 


1A19 




00330 


BASIC 


EQU 1A1SH 


FOR PROCESSING 


0000 




00340 




END 




O000( 


TOTAL 


ERRORS 








Program Listing 3. An Assembly-language 


routine for fast 


ADC using an 


external clock applied at D5 





5000 


00100 




ORG 5000H 


;MEM SIZE 20479 


5000 003C 


00110 


STORE2 


DEFW 3C00H 


; VIDEO START 


5002 20 


00120 


STORE1 


DEFB 20H 


; UPPER LEFT CHAR 


5003 F3 


00130 


ISR 


DI 




5004 E5 


00140 




PUSH HL 




5005 F5 


00150 




PUSH AF 




5006 C5 


00160 




PUSH BC 




5007 D5 


00170 




PUSH DE 




5008 3AE037 


00180 




LD A,(37E0H) 




500B CB77 


00190 




BIT 6, A 




500D 2043 


00200 




JR NZ,FDC 




500F CB7F 


00210 




BIT 7, A 




5011 2836 


00220 




JR Z,XIT 




5013 AF 


00230 




XOR A 


;GET HOR DATA 


5014 CD5750 


00240 




CALL ADC 




5017 IF 


00250 




RRA 


;/4 


5018 IF 


00260 




RRA 




5019 E63F 


00270 




AND 3FH 


; COLUMN 


501B 263C 


00280 




LD H,3CH 




501D 6F 


00290 




LD L,A 




501E 3E01 


00300 




LD A,l 


;GET VERT DATA 


5020 CD5750 


00310 




CALL ADC 




5023 IF 


00320 




RRA 


,V16 


5024 IF 


00330 




RRA 




5025 IF 


00340 




RRA 




5026 IF 


00350 




RRA 




5027 E60F 


00360 




AND 0FH 


;ROW 


5029 A7 


00370 




AND A 




502A 2807 


00380 




JR Z,MARK 




502C 47 


00390 




LD B,A 




502D 114000 


00400 




LD DE,40H 


;64 PER ROW 


5030 19 


00410 


NEXTR 


ADD HL,DE 




5031 10FD 


00420 




DJNZ NEXTR 




5033 ED4B0050 


00430 


MARK 


LD BC, (STORE 2) 


; PREVIOUS PLACE 


5037 220050 


00440 




LD (STORE2) ,HL 


;THIS PLACE 


503A 3A0250 


00450 




LD A, (STORED 


; PREVIOUS CHAR 


503D 60 


00460 




LD H,B 




503E 69 


00470 




LD L,C 




503F 77 


00480 




LD (HL) ,A 


;PUT IT BACK 


5040 2A0050 


00490 




LD HL, (STORE2) 




5043 7E 


00500 




LD A,(HL) 




5044 320250 


00510 




LD (STORED ,A 


;THIS CHAR 


5047 362A 


00520 




LD (HL) , '*' 


;MARK IT 


5049 3AE037 


00530 


XIT 


LD A, (37E0H) 




504C Dl 


00540 




POP DE 




504D CI 


00550 




POP BC 




504E Fl 


00560 




POP AF 




504F El 


00570 




POP HL 




5050 FB 


00580 




EI 




5051 C9 


00590 




RET 




5052 3AEC37 


00600 


FDC 


LD A, (37ECH) 




5055 18F2 


00610 




JR XIT 




5057 D3FE 


00620 


ADC 


OUT (0FEH) ,A 




5059 0607 


00630 




LD B,7 




505B 10FE 


00640 


TEOC 


DJNZ TEOC 




505D DBFD 


00650 


TC 


IN A,(0FDH) 




505F CB67 


00660 




BIT 4, A 




5061 28FA 


00670 




JR Z,TC 




5063 DBFE 


00680 




IN A, (0FEH) 




5065 C9 


00690 




RET 




5066 F3 


00700 


START 


DI 




5067 ED56 


00710 




IM 1 




5069 FB 


00720 




EI 




506A C3191A 


00730 




JP BASIC 




1A19 


00740 


BASIC 


EQU 1A19H 




4012 


00750 




ORG 4012H 




4012 C30350 


00760 




JP ISR 




0000 


00770 




END 




00000 TOTAL ERRORS 








Program Listing 4. An interrupt-driven Assembly-language 


routine to interface a 


simple joystick-controlled * cursor with 


the Basic interpreter 
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Announcing the best Error 
Free Personal Computer 
Diskette Money can Buy. 
For Less. 



• Error Free 

• 1 year warranty 

• Hub ring installed 

• Write/Protect notch 

• Next day delivery 

$19.90/box of 10 

• No minimum order quantity 

• 8"or5%" 

• Plus 2 Free BONUS DISKS/Box^ 



If you are a member of a user group or a school district please call for special 
terms on future offers. O^ is the largest specialty supplier of magnetic media 
in the Midwest. We have the products that you want when you need them. 
Please take advantage of this introductory offer and call us now. 




oi» 



Transaction 
Storage Systems, Inc. 

MAGNETIC MEDIA SPECIALISTS 



22255 Greenfield Rd. 
Southfield, Michigan 48075 

CALL TOLL FREE 
1-800-521-5700 
1-800-482-4770 (Michigan) 
313-557-3036 (Detroit) 
312-922-0076 (Chicago) 
614-221-1788 (Columbus) 
513-621-1518 (Cincinnati) 
Telex 810-224-4646 



EXPECT A MIRACLE 



k-See List ol Advertisers on Page 435 



YES, II ^2> is the magnetic medio supplier that I have always wanted. 
Please send me ,8"0 5%"0, @ _ea 

Box Quantity 

I am interested. Please send me more information 
or call me at ( ) 



Price 



For faster order entry call any of our toll-free or local numbers 

Company : 

Name — Title 



Address 
City 



State. 



Zip- 



Amex/Master Card/Visa orders are accepted 



Expiration Date 



month. 



year. 
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CALENDAR 



January 


14- 


■17 


IEEE Computer Society, Silver 


March 


17-18 IEEE Computer Society, Silver 






Spring, MD. Computer Science 
Conference Orlando, FL. 


l- 


3 


IEEE Computer Society, Silver 


Spring, MD. Winter Simulation 












Spring, MD. COMPCON 


Conference Holiday Inn at the 












Spring '83 San Francisco, CA. 


Embarcadero, San Diego, CA. 








8 




IEEE Computer Society, Silver 




16- 


-18 


IEEE Computer Society, Silver 
Spring, MD. International 
Solid State Circuits Conference 

New York, NY. 






Spring, MD. MICRODEL- 

CON Newark, DE. 


17-20 IEEE Computer Society, Silver 
Spring, MD. Optical Storage of 
Digital Data Lake Tahoe, CA. 


16- 


-18 


TALMIS, Oak Park, IL. 3rd 
Annual Software Publishers 
and Computer-based Training 
Conference Ambassador West, 


10- 


-12 


The Council for Exceptional 
Children, Reston, VA. Use of 
Microcomputers in Education 
Hartford, CT. 


18-20 Technical Education Research 






Chicago, IL. 


16- 


-18 


IEEE Computer Society, Silver 


Centers, Cambridge, MA. Mi- 












Spring, MD. 16th Annual Sim- 


crocomputers in Education Tal- 












ulation Symposium Tampa, FL. 


lahassee, FL. 


17- 


-19 


Technical Education Research 
Centers, Cambridge, MA. Mi- 














crocomputers in Education 


17- 


-19 


Arizona State University, 








New York, NY. 






Tempe, AZ. Microcomputers 


31-2 Future Computing Inc., Rich- 












in Education ASU campus. 


ardson, TX. UCSD p-System 














Industry Forum Loews Ana- 














tole, Dallas, TX. 
















21- 


-23 


American Federation of Infor- 
mation Processing Societies 
Inc., Philadelphia, PA. Office 
Automation Conference Phila- 
delphia Civic Center. 


29- 


-31 


IEEE Computer Society, Silver 
Spring, MD. Workshop on 
Computer System Organization 

New Orleans, LA. 


February 














7-9 Technical Education Research 


23- 


-25 


Future Computing Inc., Rich- 


31- 


-1 


IEEE Computer Society, Silver 


Centers, Cambridge, MA. Mi- 






ardson, TX. Personal Comput- 






Spring, MD. International Sym- 


crocomputers in Education 






er Retail Forum Loews Ana- 






posium on VLSI Technology 


Washington, DC. 






tole, Dallas, TX. 




>. 


and Systems Taipei, Taiwan. 



Coming Next Month 



February's issue shows just what kids 
and computers can do. The Young Pro- 
grammer's Contest has been a hit and 
next month's 80 contains the contest's 
winning entries. The complexity and 
number of contestant entries have sur- 



prised us all, and we are sure they will 
amaze you. 

Also within February's covers is a set 
of articles aimed at the younger. These 
educational programs can be used by 



children with little or no supervision. 
Our new learning games teach math, 
spelling, the primary colors, our state 
capitals, and more. And some of these 
games are just plain fun! 
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TOOLS & TECHNIQUES FOR ELECTRONICS— by A. A. 

Wicks is an easy-to-understand book written for the 
beginning kit-builder as well as the experienced hob- 
byist. It has numerous pictures and descriptions of the 
safe and correct ways to use basic and specialized tools 
for electronic projects, as well as specialized metal- 
working tools and the chemical aids which are used in 
repair shops. $4.95.* BK7348 



HEW NEW NEW 



INTRODUCTION TO WORD PROCESSING by Hal 

Glatzer. This book explains in plain language what a 
word processor can do, how to use one, how it improves 
productivity— especially in businesses that handle lots 
of words— and how to buy one wisely. No technical 
knowledge required, for all first-time users and those 
considering purchasing a word processor. BK1238 $12.95 

A USER GUIDE TO THE UNIX SYSTEM by Jean Yates 
and Rebecca Thomas. Here at last is a clearly written 
book that allows you to use the Unix operating system 
easily, and at a fraction of the time it previously took. If 
you're using, evaluating or simply curious about this sys- 
tem, this is your book. BK1242 $15.99 



WORDSTAR MADE EASY by Walter A. Ettlin. Now Word- 
Star is as simple to learn as It is easy to use. This book 
teaches WordStar in 14 easy lessons, saving hours of 
hard work, it comes with a convenient pull-out Command 
Card. BK1239 $11.95 

TRS-80 DATA COMMUNICATIONS SYSTEMS-by 

Frank J. Derfler. If you are interested in using the 
TRS-80 as a terminal or message system, this is the 
book to buy. It covers communications, technical ma- 
terial, software and hardware for the entire TRS-80 
family of machines. BK1245 $12.95 




SOME OF THE BEST FROM KILOBAUD/MICROCOM- 
PUTING—A collection of the best articles that have 
recently appeared in Kilobaud/MICROCOMPUTING. 
Included is material on the TRS-80 and PET systems, 
CP/M, the 8080/8085/Z80 chips, the ASR-33 terminal. 
Data base management, word processing, text editors 
and file structures are covered too. Programming tech- 
niques and hardcore hardware construction projects 
for modems, high speed cassette interfaces and TVTs 
are also included in this large format. 200 plus page 
edition. BK7311 $10.95.* 

DON'T (or How to Care for Your Computer)— by Rod- 
nay Zaks. In plain language, with numerous illustra- 
tions, this book tells all the do's and don't's of the care, 
preservation and correct operation of the small com- 
puter system. Specific chapters cover each piece of 
hardware and software, as well as safety and security 
precautions and help for problem situations. Have 
your computer work right the first time and keep it 
working. No technical background required. For all 
computer users. BK1237 $11.95. 

YOUR FIRST COMPUTER— by Rodnay Zaks. Whether 
you are using a computer, thinking about using one or 
considering purchasing one, this book is indispen- 
sable. It explains what a computer system is, what it 
can do, how it works and how to select various com- 
ponents and peripheral units. It is written in everyday 
language and contains invaluable information for the 
novice and the experienced programmer. (The first edi- 
tion of this book was published under the title "An In- 
troduction to Personal and Business Computinq".) 
BK1 191 $8.95* 

MICROPROCESSOR INTERFACING TECHNIQUES 

—by Austin Lesea & Rodnay Zaks— will teach you how 
to interconnect a complete system and interface it to 
all the usual peripherals. It covers hardware and soft- 
ware skills and techniques, including the use and de- 
sign of model buses such as the IEEE 488 or S-100. 
BK1037 $17.95.* 



HOBBY COMPUTERS ARE HEREIIf you want to come 
up to speed on how computers work— hardware and 
software— this is an excellent book. It starts with funda- 
mentals and explains the circuits and the basics of pro- 
gramming, along with a couple of TVT construction proj- 
ects, ASCII, Baudot, etc. This book has the highest rec- 
ommendations as a teaching aid. $2.97.* BK7322 



THE NEW HOBBY COMPUTERS— This book takes up 
from where Hobby Computers Are Here! leaves off, with 
chapters on Large-Scale Integration, how to choose a 
microprocessor chip, an introduction to programming, 
low-cost I/O for a computer, computer arithmetic, check- 
ing memory boards... and much, much more! Don't 
miss this tremendous value! BK7340 Only $2.97.* 
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KILOBAUD KLASSROOM— by George Young and Peter 
Stark. Learning electronics theory without practice isn't 
easy. And it's no fun to build an electronics project that 
you can't use. Kilobaud Klassroom, the popular series 
first published in Kilobaud Microcomputing, combines 
theory with practice. This is a practical course in digital 
electronics. It starts out with very simple electronics 
projects, and by the end of the course you'll construct 
your own working microcomputer! 

Authors Young and Stark are experienced teachers, 
and their approach is simple and direct. Whether you're 
learning at home or in the classroom, this book provides 
you with a solid background in electronics— and you'll 
own a computer that you built yourself! BK7386 $14.95 



AN INTRODUCTION TO MICROCOMPUTERS, VOL. 

— The Beginner's Book — Written for readers who know 
nothing about computers— for those who have an in- 
terest in how to use computers — and for everyone else 
who must live with computers and should know a little 
about them. The first in a series of 4 volumes, this book 
will explain how computers work and what they can do. 
Computers have become an integral part of life and 
society. During any given day you are affected by com- 
puters, so start learning more about them with Volume 
0. BK1 130 $12.50.* 




AN INTRODUCTION TO MICROCOMPUTERS, VOL. 1 
—NEW 3rd Edition! Dedicated to the basic concepts 
of microcomputers and hardware theory. The purpose 
of Volume 1 is to give you a thorough understanding of 
what microcomputers are. From basic concepts 
(which are covered in detail). Volume 1 builds the nec- 
essary components of a microcomputer system. This 
book highlights the difference between minicomput- 
ers and microcomputers. BK1030 $15.95 




Special Interests 



DOS RANDOM ACCESS & BASIC FILE HANDLING-By 

H.J. Muller. This book was written for the nonprogram- 
mer. It is ideal for the businessman or professional who 
needs to solve and write special programs for in-house 
business problems, or the hobbyist who wants to go be- 
yond the cassette recorder and into disk storage and file 
manipulation. It is written as a self-instruction tutorial 
and will provide anyone with some Level II experience 
with the ability to write special programs for inventories, 
mailing list, work scheduling, record keeping, research 
project data manipulation, etc. 150 pages. BK1236 
$29.50 

TRS-80 DISK AND OTHER MYSTERIES-by Harvard C. 
Pennington. This is the definitive work on the TRS-80 
disk system. It is full of detailed "How to use," infor- 
mation with examples, samples and in-depth explana- 
tions suitable for beginners and professionals alike. 
The recovery of one lost file is worth the price alone. 
BK1181 $22.50.* 

MICROSOFT BASIC DECODED AND OTHER MYS- 
TERIES— by James Farvour. From the company that 
brought you TRS-80 DISK AND OTHER MYSTERIES. 
Contains more than 6500 1 ines of comments for the dis- 
assembled Level II ROMs and six additional chapters 
describing every BASIC subroutine, with assembly 
language routines showing how to use them. Flow- 
charts for all major routines give the reader a real in- 
sight into how the interpreter works. BK1186 $29.50.* 



MOD III ROM COMMENTED-Soft-Sector marketing, 
1981. This book is not an instruction course on 
machine language, but rather an information source 
that you can use time and time again for writing your 
own program or patching old Mod I machine language 
programs. It contains an explanation of ROMs In the 
latest machine from Tandy, with most every location of 
the 14K ROMs listed, with comments. BK1235 $22.50. 

THE CUSTOM TRS-80 AND OTHER MYSTERIES-by 

Dennis Kitsz. More than 300 pages of TRS-80 customiz- 
ing information. With this book you'll be able to ex- 
plore your computer like never before. Want to turn an 
8 track into a mass storage unit? Individual reverse 
characters? Replace the BASIC ROMs? Make Music? 
High speed, reverse video, Level I and Level II? Fix it if 
it breaks down? All this and much, much more. Even if 
you have never used a soldering iron or read a circuit 
diagram, this book will teach you how! This is the 
definitive guide to customizing your 80! BK1218 
$29.95* 

BASIC FASTER AND BETTER AND OTHER MYS- 
TERIES — by Lewis Rosenfelder. You don't have to 
learn assembly language to make your programs run 
fast. With the dozens of programming tricks and 
techniques in this book you can sort at high speed, 
swap screens in the twinkling of an eye, write INKEY 
routines that people think are in assembly language 
and add your own commands to BASIC. Find out how 
to write elegant code that makes your BASIC really 
hum, and explore the power of USR calls. BK1221 
$29.95.' 

THE CP/M HANDBOOK (with MP/M)— by Rodnay Zaks. 
A complete guide and reference handbook for CP/M— 
the industry standard in operating systems. Step-by- 
step instruction for everything from turning on the 
system and inserting the diskette to correct user 
discipline and remedial action for problem situations. 
This also includes a complete discussion of all ver- 
sions of CP/M up to and including 2.2, MP/M and 
CDOS. BK1 187 $14.95.* 



PRICES SUBJECT TO CHANGE WITHOUT NOTICE 



No C.O.D. orders accepted. All orders add $1.50 for first book, $1.00 each additional book, $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Questions 
regarding your order? Please write to Customer Service at the following address. Use the order card in this magazine or itemize your order on a separate piece of paper and 
mail to 80 Micro Book Department'Peterborough NH 03458. Be sure to include check or detailed credit card information. 



For Toll Free Ordering Call 1 800-258 5473 



►'See List of Advertisers on Page 435 
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NANOS SYSTEM 
REFERENCE CARDS 

For Models I, II, III and color computer 

At last! No more flipping through the pages of the 
Basic manual! No more working through the maze of 
machine language instructions! These cards com- 
pletely summarize the Basic and Assembler manuals! 
FEATURES INCLUDE: 

memory map, eyeball graphics, math instructions, 
basic commands, store instructions, basic functions, 



load instructions, basic statements, move instruc- 
tions, special keys, exchange instructions, print using 
examples, shift instructions, basic special characters, 
compare instructions, basic and assembler messages 
and codes, branch instructions, basic facts, data 
alteration instructions, reserved words, I/O instruc- 
tions, ROM routines, complete character chart with 
graphics and space-compression codes, hex-dec 
chart, control code cross-reference, assembler in- 
structions commands and operators, screen line 
layout, editor commands & subcommands, condition 
code easy access 

Designed as a fold-up, accordion-style card, fits in your 
pocket. Panels organized for optimum speed for 
reference. 

Model ll:TRS-80 Commands and Utilities FC1010 $3.95 

Model I: BASIC and Assembler FC1 002 $4.95 

Z-80: Micro processor FC1 011 $4.95 

Model III: BASIC only FC1004 $3.95 

Model III: BASIC and Assembler FC1 003 $5.95 

Color: BASIC and Extended FC1006 $4.95 

ZX80.ZX81 and Timex Sinclair 1000 FC1012 $5.95 

Apple II: BASIC & 6502 FC1 008 $4.95 



Z80 



6089 



INSIDE LEVEL II — For machine language program- 
mers. This is a comprehensive reference guide to the 
Level II ROMs, allowing easy utilization of the 
sophisticated routines they contain. It concisely ex- 
plains set-ups, calling sequences, variable passage 
and I/O routines. Part II presents an entirely new com- 
posite program structure which unloads under the 
SYSTEM command and executes in both BASIC and 
machine code with the speed and efficiency of a com- 
piler. Special consideration is given to disk systems. 
BK1 183 $15.95.* 



Z-80 ASSEMBLY LANGUAGE PROGRAMMING — by 

Lance A. Leventhal. This book thoroughly covers the 
Z-80 instruction set, abounding in simple programming 
examples illustrating software development concepts 
and actual assembly language usage. Features in- 
clude Z-80 I/O devices and interfacing methods, as- 
sembler conventions, and comparisons with 8080A/ 
8085 instruction sets and interrupt structure. BK1177 
$16.99.* " 



TRS-80 ASSEMBLY LANGUAGE-by Hubert S. Howe, 
Jr. This book incorporates into a single volume all the 
pertinent facts and information you need to know to 
program and enjoy the TRS-80. Included are clear 
presentations of all introductory concepts, completely 
tested practical programs and subroutines, details of 
ROM and RAM and disk operating systems, plus com- 
prehensive tables, charts and appendices. Suitable for 
the first time user or more experienced users. BK1217 
$9.95." 

PROGRAMMING THE Z-80— by Rodnay Zaks. Here is as- 
sembly language programming for the Z-80 presented as 
a progressive, step-by-step course. This book is both an 
educational text and a self-contained reference book, 
useful to both the beginning and the experienced pro- 
grammer who wish to learn about the Z-80. Exercises to 
test the reader are included. BK1122 $15.95." 



6809 MICROCOMPUTER PROGRAMMING AND 
INTERFACING— by Andrew C. Staugaard, Jr. Getting 
involved with Tandy's new Color Computer? If so, this 
new book from the Blacksburg Group will allow you to 
exploit the awesome power of the machine's 6809 
microprocessor. Detailed information on processor ar- 
chitecture, addressing modes, register operation, data 
movement, arithmetic logic operations, I/O and inter- 
facing is provided, as well as a review section at the 
end of each chapter. Four appendices are included 
covering the 6809 instruction set, specification sheets 
of the 6809 family of processors, other 6800 series 
equipment and the 680916821 Peripheral Interface 
Adapter. This book is a must for the serious Color Com- 
puter owner. BK1215 $13.95 * 



MICROCOMPUTING CODING SHEETS Microcom- 
puting's dozen or so programmers wouldn't try to work 
without these handy scratch pads, which help prevent 
the little errors that can cost hours and hours of 
programming time. Available for programming is 
Assembly/Machine Language (PD1001), which has col- 
umns for address, instruction (3 bytes), source code 
(label, op code, operand) and comments; and for 
BASIC (PD1002) which is 72 columns wide. 50 sheets to 
a pad. $2.39." 
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SELECTRIC INTERFACE— by George Young You need 
the quality print that a daisy wheel printer provides but 
the thoughLof buying one makes your wallet wilt. 
SELECTRIC 1 M INTERFACE, a step-by-step guide to in- 
terfacing an IBM Selectric I/O Writer to your microcom- 
puter, will give you that quality at a fraction of the 
price. George Young, co-author of Kilobaud Microcom- 
puting magazine's popular "Kilobaud Klassroom" 
series, offers a low-cost alternative to buying a daisy 
wheel printer. SELECTRIC INTERFACE includes: step- 
by-step instructions, tips on purchasing a used Selec- 
tric, information on various Selectric models, in- 
cluding the 2740, 2980, and Dura 1041, driver software 
for Z80, 8080, and 6502 chips, tips on interfacing tech- 
niques. With SELECTRIC INTERFACE and some back- 
ground in electronics, you can have a high-quality, low- 
cost, letter-quality printer. Petals not included. BK7388 
(125 pages) $12.97 



TEXTEDIT— A Complete Word Processing System in 
Kit Form 

by Irwin Rappaport 

TEXTEDIT is an inexpensive word processor that can 
be adapted to suit your differing needs— from form let- 
ters to lengthy texts. Written in TRS-80 Disk BASIC, the 
system consists of several modules, permitting the 
loading and use of only those portions needed. A disk 
is also available which provides the direct loading of 
the modules, however, the book is required for 
documentation. For Model I and III with TRSDOS CON- 
VERT., one disk drive (2 disk drives or copy utility need- 
ed to transfer to system disk). Runs under TRSDOS 
2.2/2.3. May not function under other systems. BK7387 
(book, 90 pages) $9.97 DS73S7 (disk) $19.97 



THE NEW WEATHER SATELLITE HANDBOOK- by Dr. 

Ralph E. Taggart WB8DQT. Here is the completely up- 
dated and revised edition of the best-selling Weather 
Satellite Handbook — containing all the information on 
the most sophisticated and effective spacecraft now 
in orbit. Dr. Taggart has written this book to serve both 
the experienced amateur satellite enthusiast and the 
newcomer. This book is an introduction to satellite 
watching, that tells you how to construct a complete 
and highly effective ground station. Not just ideas, but 
solid hardware designs and all the instructions neces- 
sary to operate the equipment are included. An entire 
chapter is devoted to microcomputers and the Weath- 
er Satellite Station, and for the thousands of experi- 
menters who are operating stations. The New Weather 
Satellite Handbook details all the procedures neces- 
'Sary to follow the current spacecraft. Weather Satellite 
contains Operation Satellite Systems, Antenna Sys- 
tems, Weather Satellite Receivers, A Cathode Ray 
Tube (CRT) Monitor for Satellite Picture Display, A Di- 
rect-Printing Fascimile System for Weather Satellite 
Display, How to Find the Satellite, Test Equipment, Mi- 
crocomputers and the Weather Satellite Station, Sta- 
tion Operations. BK7383 $8.95.* 



'Use the order card in this magazine or itemize your order on a separate piece of paper and mail to Microcomputing Book Department • Peterborough NH 03458. Be sure 
to include check or detailed credit card information. No C.O.D. orders accepted. All orders add $1.50 for the first book, $1 .00 each additional book for U.S. and foreign sur- 
face. $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Questions regarding your order? Please write to Customer Service at the above address. 



For Toll Free Ordering Call 1-800-258-5473 
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THE BASIC HANDBOOK — SECOND EDITION — by 
David Lien. This book is unique. It is a virtual 
ENCYCLOPEDIA of BASIC. While not favoring one 
computer over another, it explains over 250 BASIC 
words, how to use them and alternate strategies. If a 
computer does not possess the capabilities of a need- 
ed or specified word, there are often ways to ac- 
complish the same function by using another word or 
combination of words. That's where the HANDBOOK 
comes in. It helps you get the most from your com- 
puter, be it a "bottom-of-the-line" micro or an oversized 
monster. BK1 174 $19.95.* 

LEARNING TRS-80 BASIC-by David A. Lien. Dr. Lien, 
who is the author of THE BASIC HANDBOOK and the 
original Radio Shack LEVEL I USER'S MANUAL, has 
compiled a tutorial which includes portions of the 
original USER'S MANUAL, and most of LEARNING 
LEVEL II along with extensive additions. It will com- 
pletely cover the TRS-80 Models I, II, III. and 16 (sorry, 
not the color or pocket computers!. It is, of course, writ- 
ten in the easy learning style which readers of Dr. 
Lien's books have come to enjoy. BK1 175 $19.95. 

BASIC BASIC (2ND EDITION)— by James S. Coan. This 
is a textbook which incorporates the learning of com- 
puter programming using the BASIC language with the 
teaching of mathematics. Over 100 sample programs 
illustrate the techniques of the BASIC language and 
every section is followed by practical problems. This 
second edition covers character string handling and 
the use of data files. BK 1026 $11.50.* 



INTRODUCTION TO TRS-80 LEVEL II BASIC AND 
COMPUTER PROGRAMMING— by Michael P. Zabin- 
ski. Written by an experienced educator, this is the 
book for those beginners who want to learn about com- 
puters without having to become an expert. It has prac- 
tical programs, useful line-by-line comments, excel- 
lent flowcharts accompanied by line numbers and over 
200 exercises which help the reader assess progress, 
reinforce comprehension, and provide valuable prac- 
tical experience. BK1219 $10.95.* 



50 BASIC EXERCISES— by J. P. Lamoitier. This book is 
structured around the idea that the best way to learn a 
language is through actual practice. It contains 50 
completely explained exercises: statement and 
analysis of the problem, flowcharts, programs and ac- 
tual runs. Program subjects include mathematics, 
business, games, and operations research, and are 
presented in varying levels of difficulty. This format 
enables anyone to learn BASIC rapidly, checking their 
progress at each step. BK1 192 $12.95*. 

NEW REVISED EDITION 

PROGRAMMING IN PASCAL— by Peter Grogono. The 
computer programming language PASCAL was the 
first language to embody in a coherent way the con- 
cepts of structured programming, which has been 
defined by Edsger Dijkstra and C.A.R. Hoare. As such, 
it is a landmark in the development of programming 
languages. PASCAL was developed by Niklaus Wirth 
in Zurich; it is derived from the language ALGOL 60 but 
is more powerful and easier to use. PASCAL is now 
widely accepted as a useful language that can be effi- 
ciently implemented, and as an excellent teaching 
tool. It does not assume knowledge of any other pro- 
gramming language and therefore suitable for an in- 
troductory course. BK1140 $12.95.* 

ADVANCED BASIC— Applications including strings 
and files, coordinate geometry, area, sequences and 
series, simulation and graphing and games. BK1000 
$11.50 

INTRODUCTION TO PASCAL- By Rodnay Zaks. A 
step-by-step introduction for anyone wanting to learn 
the language quickly and completely. Each concept is 
explained simply and in a logical order. All features of 
the language are presented in a clear, easy-to-under- 
stand format with exercises to test the reader at the 
end of each chapter. It describes both standard 
PASCAL and UCSD PASCAL, the most widely used dia- 
lect for small computers. No computer or program- 
ming experience is necessary. BK1189 $15.95 



Moneymaking 



HOW TO MAKE MONEY WITH COMPUTERS— In 10 in- 
formation-packed chapters, Jerry Felsen describes 
more than 30 computer-related, money-making, high 
profit, low capital investment opportunities. 
BK1003 $15.00.* 

HOW TO SELL ANYTHING TO ANYBODY— According 

to The Guinness Book ol World Records, the author, 
Joe Girard, is "the world's greatest salesman." This 
book reveals how he made a fortune— and how you 
can, too. BK7306$2.25.* 

THE INCREDIBLE SECRET MONEY MACHINE— by 

Don Lancaster. A different kind of "cookbook" from 
Don Lancaster. Want to slash taxes? Get free vaca- 
tions? Win at investments? Make money from some- 
thing that you like to do? You'll find this book essential 
to give you the key insider details of what is really in- 
volved in starting up your own money machine. BK1178 
$5.95.* 



BUSINESS SYSTEM BUYER'S GUIDE— By Adam Os- 
borne with Steven Cook. When you enter the market 
place of small business computers, you face a bewil- 
dering array of products, prices, features and fables. 
This guide cuts through the jargon and unravels the 
task of buying the right computer system. This book 
provides solid information on how to determine your 
needs, how to choose software and hardware for all 
business applications, what to expect from vendors, 
what to avoid, and what questions you must ask. It also 
provides a wealth of detailed information on products, 
manufacturers, retailers and the whole microcomputer 
market. BK1229 $9.95 

SO YOU ARE THINKING ABOUT A SMALL BUSINESS 

COMPUTER— by Richard G. Canning and Nancy C. 
Leeper. For a well-organized manual on the process of 
selecting the right computer system for your small 
business, this text can't be excelled. Designed to in- 
troduce the novice in data and word processing to the 
real benefits of computerization, the book is filled with 
money- and time-saving tips, photos of equipment, 
lists of suppliers, prices, explanations of computer ter- 
minology, and helpful references to additional sources 
of information. Everyone contemplating a first com- 
puter installation should have this book. BK1222 
$14.00* 



Business 



SOME COMMON BASIC PROGRAMS- Published by 
Adam Osborne & Associates, Inc. Perfect for non- 
technical computerists requiring ready-to-use pro- 
grams. Business programs, plus miscellaneous pro- 
grams. Invaluable for the user who is not an experi- 
enced programmer. All will operate in the stand-alone 
mode. BK1053 $14.99 paperback. 

THEORY Z— How American Business Can Meat the 
Japanese Challenge— by William Ouchi. Why are the 
Japanese catching up and surpassing American In- 
dustrial productivity? What allows Japanese in- 
dustrialists to offer guaranteed lifetime employment 
to their workforce? This book will help you understand 
the Theory Z managerial philosophy and its implica- 
tions for the American corporate future. Examples are 
given of the American industrial giants already 
operating under Z-style management, and the impact 
of this style on the quality of their executives and 
workers is explored. A must for the alert businessman, 
large or small. BK1226 $12.95* 




micro 



BOOK SHELF 




ANNOTATED BASIC-A NEW TECHNIQUE FOR NEO- 
PHYTES.— BASIC programming was supposed to be 
simple— a beginner's programming language which 
was so near to English that is could be easily 
understood. But, in recent years, BASIC has become 
much more powerful and therefore much more difficult 
to read and understand. BASIC simply isn't basic 
anymore. 

Annotated BASIC explains the complexities of 
modern BASIC. It includes complete TRS-80* Level II 
BASIC programs that you can use. Each program is an- 
notated to explain in step-by-step fashion the workings 
of the program. Programs are flowcharted to assist 
you in following the operational sequence. And— each 
chapter includes a description of the new concepts 
which have been introduced. 

Annotated BASIC deals with the hows and whys of 
TRS-80 BASIC programming. How is a program put 
together? Why is it written that way? By observing the 
programs and following the annotation, you can devel- 
op new techniques to use in your own programs— or 
modify commercial programs for your specific use. 
Annotated BASIC Volume 1 BK7384 $10.95 
Annotated BASIC Volume 2 BK7385 $10.95 
Order Both Volumes and Save! BK738402 $18.95 



Games 



CAPTAIN 80 BOOK OF BASIC ADVENTURES-by Rob- 
ert Liddil. This book contains 18 of the most popular 
Adventure programs available today; all in one easy to 
read book with listings ready to be keyed in to your 
computer. This unique book also contains an ADVEN- 
TURE GENERATOR program, not available from any 
other source. This generator program will actually 
write another BASIC ADVENTURE PROGRAM! Al- 
though specifically written for the TRS-80 Model I & III, 
these programs are adaptable to other computers us- 
ing Microsoft BASIC. BK 1240 $19.95. 

40 COMPUTER GAMES FROM KILOBAUD MICROCOM- 
PUTING— Forty games in all in nine different categories. 
Games for large and small systems, and even a section 
on calculator games. Many versions of BASIC used and 
a wide variety of systems represented. A must for the 
serious computer gamesman. BK7381 $7.95.* 

BASIC COMPUTER GAMES— Okay, so once you get 
your computer and are running in BASIC, then what? 
Then you need some programs in BASIC, that's what. 
This book has 101 games for you from very simple to 
real buggers. You get the games, a description of the 
games, the listing to put in your computer and a sam- 
ple run to show you how they work. Fun. Any one game 
will be worth more than the price of the book for the fun 
you and your family will have with it. BK1074 $7.50.* 

MORE BASIC COMPUTER GAMES-Edited by David 
H. Ahl. More fun in BASIC! 84 new games from the peo- 
ple who brought you BASIC Computer Games. In- 
cludes such favorites as Minotaur (battle the mythical 
beast) and Eliza (unload your troubles on the doctor at 
bargain rates). Complete with game description, list- 
ing and sample run. BK1 182 $7.50.* 

WHAT TO DO AFTER YOU HIT RETURN — PCC's first 
book of computer games... 48 different computer 
games you can play in BASIC. . .programs, descrip- 
tions and many illustrations. Lunar Landing, Ham- 
murabi, King, Civel 2, Qubic 5, Taxman, Star Trek, 
Crash, Market, etc. BK1071 $16.50*. 



'Use the order card in this magazine or itemize your order on a separate piece of paper and mail to Microcomputing Book Department • Peterborough NH 03458. Be sure 
to include check or detailed credit card information. NoC.O.D. orders accepted. All orders add $1.50 for the first book. $1.00 each additional book for U.S. and foreign sur- 
face. $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Questions regarding your order? Please write to Customer Service at the above address. 



For Toll Free Ordering Call 1-800-258-5473 
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RESISTANCE TO TANDY'S COLOR CLONE 

There appears to be some grumbling among the handpicked 
distributors for the TDP-100, the first Tandy computer 
marketed outside the Radio Shack chain. 
PAGE 374 

PC INTO I PLUS III WILL GO 

A California firm has a slavedriver that will make PC pro- 
grams run on a TRS-80. 
PAGE 376 

THE NEW SOURCE 

A cast of comic characters will be helping the "Avis" of the in- 
formation utility business get its new system on the road to 
success. 

PAGE 378 



HARDWARE 



Enter the Dragon 



Will Tandy be a dragonslayer for this 6809-based import? 



By John P. Mello Jr. 



80 Micro News Editor 



While industry observers level their steely eyes across the Pacific 
at Japan waiting for that nation to enter the low-end com- 
puter market, another invasion may be in the making on the other 
side of the Atlantic. 



The low-end melee in America has 
spread to Her Majesty's isle and the re- 
sults could be some tough competition 
in 1983 for the Color Computer. Its 
most formidable foe would be the 
Dragon 32 (see Jake Commander's col- 



umn on page 37). 

"The Dragon is probably our fiercest 
competitor," Tandy UK Managing Di- 
rector John Sayers told 80 Micro. "The 
VIC-20 and the Dragon are the two 
most aggressively marketed machines in 




the United Kingdom. 

The computer manufactured by 
Dragon Data Ltd., Swansea, Glamor- 
gan, UK, has the same 8-bit micropro- 
cessor as the Color Computer (Mo- 
torola's 6809E). Standard equipment 
includes 32K of RAM, typewriter key- 
board, Microsoft Extended Color Basic, 
and five octaves of sound (255 tones). It 
costs about $350. 

Sayers said about 80 percent of Tan- 
dy's ROM pack software will run on the 
Dragon. That surprised Dragon's sales 
and marketing director, Richard Wad- 
man. "Do you mean to tell me that 
Tandy told you that 80 percent of their 
software will run on our machine?" he 
replied when informed by 80 Micro 
of Sayer's comments. "That was nice 
of them." 

"Being a 6809," Wadman explained, 
' 'if you write pure 6809 code and you go 
straight in, you've got no problems. It 
should run straight away. The problem 
is the Microsoft Basic we use is different 
than Tandy's. The routines are in dif- 
ferent places." 

He said about 30 programs are 
available for his micro, most of them 
games. 

Although the Dragon is priced £40 
below the Color Computer, Sayers 
said Tandy isn't waging a price war 
against it. 

"I think the fact that has to be put 



Tandy UK: 80 percent of the Color Comput- 
er's ROM packs will run on the Dragon 32. 
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Apparat, Inc. 

4401 So. Tamarac Parkway, Denver. CO 80237 (303) 741-1778 
_40 TO ORDER CALL: 1-800-525-7674 



MODEL III PRICE LIST 

(All 48K with Tandon or NEW Vz height Teac drives & the Apparat Disk Controller) 

2 single sided 40 track drives $1 799. 00 

2 dual sided 40 track drives 2045.00 

2 dual sided 80 track drives 2295.00 

with RS-232 C add 1 1 5.00 

Price includes NEWDOS/80 & TRSDOS 
NOTE: These Model III computers contain Apparat installed disk drives and memory. They 
are warranted by Apparat, Inc. for 1 20 days. 



5 




OKIDATA ML 84 

The best. For less. 

The printer with correspondence quality and data processing through- 
put! The 200 cps bidirectional ML 84 is the multi-mode printer you can 
afford. Okigraph'" dot-addressable graphics are standard. Six program- 
selectable character sizes with true decenders, enhanced and empha- 
sized print. The ML 84 proves top of the line doesn't have to mean top 
dollar. $1 1 25.00 



SPOOL/64 

Saving time, increasing productivity 
and lowering costs. 

SPOOL/64, a 64K byte hardware print spooler, keeps your computer processing while your printer is 
printing. No more valuable time lost by waiting for a print run to finish. 

This unit plugs directly into your personal computer and printer with one easy connection. It can then 
transfer up to 3,000 characters per second. The data is stored in the spooler's memory and sent to the 
printer at a rate the printer can accept. $31 9.00 



TANDON DISK DRIVES 

With power supply & Chassis for 
TRS-80) Model I or III 



• Single sided 40 track $285.00 

• Dual 40 or Single 80 track. .. $415.00 

• Dual sided 80 track $51 5.00 

• Special - 2 Dual sided 80's. . $999.00 
(Adds almost 1.5 megabytes of storage to a 
double density model I or model III) 



Version 2.0 

The most sophisticated DOS ever pro- 
duced for the TRS-80 Models I and III. It 
provides the user with "MAINFRAME" 
power on a "MICRO". 

Some Features available are: 

• Jobstream Control Language 

• Mod I/Mod III Diskette interchangability 

• Double Density Support on Model I 

• Pagenation of BASIC listings on the screen 

• Basic program single stepping 

• Dynamic variable manipulation 

• Multiple array sorts with BASIC CMD "O" 

• Complete technical support provided 

All this plus much more for only 
$149.00 



NEWTERM /80, MODEL III $49.95 

• Runs under popular operating systems • Interrupt driven to 19,200 baud 
• Translation table • Automatic sign-on • Status line 

CHEXTEXT®, $59.95 
"Surefire Spelling Checker" 

See Desktop Computing Sept. '82 issue, p. 52-53 for review. . . ."Chextext, a program that 
avoids the limitation brought about by hashing/since it retains the integrity of the 
words . . . The dictionary, or any part of it, may be displayed on the screen." 



FLEXTEXT/PLUS, $34.95 

For the Mod I & II for all EPSON printers 
with GRAFTRAX/PLUS 



InfoWorld 

Software Report Card 

NEWDOS/80 
Version 2.0 



Performance 
Documentation 
Ease of Use 
Error Handling 



£ i, a w 

d a □ 
□ u □ 
ansa 
d a a 



CREATIVE CUISINE, $29.95 

Electronic Cookbook 

UNITERM/80, $89.00 

Universal terminal program that takes advantage 

of the extended NEWDOS/80 commands 

MICRO CLINIC, Mod I $24.95, Mod III $29.95 

The ultimate in memory & disk diagnostics 

APPARATS PROM BLASTER 

An eprom programmer for most 25 X X and 27 X X 

chips. TRS-80. 

MOD I a III $119.00 

Cable 1 7.95 

Bus Extender 69.95 

MODEL I DOUBLE DENSITY PACKAGE 

Converts a standard TRS-80 Model I to 
Double Density. $129.00 
Apparat Doubler & NEWDOS/80 V 2.0. 
$278.00 value for only $219.00 



Scripsit* & TRS-80 S are registered trademarks of Tandy Corporation Freight F.O.B. Denver, call for shipping charges. Foreign Orders shipped Air Freight. 



NEWS 



across," he noted, "is the Color Com- 
puter is £40 more, but for that £40 you 
get better support, better backup. 
You've got the ability to upgrade to any 
configuration you like, including disks. 
And that's the way we sell it." 

However, the sting of the low-end 
war may have cracked Tandy's armored 
pricing policy. Sayers noted the Fort 
Worth firm may be manufacturing Col- 
or Computers in Korea next year. But 
the Tandy UK executive did not know 
what effect the move would have on the 
computer's price. 

Another difficulty competing with 
Dragon, Sayers claimed, is the firm is 
subsidized by the government. Wad- 
man denied that. "We have no subsi- 
dies from anywhere," he said. 

Sayers also rapped the documenta- 
tion for the Dragon: "What's happen- 
ing, would you believe it, is the manual 
that's coming with the Dragon is pretty 
lousy and people are trying to buy the 
[Color Computer] manual off us." 

Wadman countered: "We've had 
about 16 reviews in this country and on- 
ly one of them has mentioned the docu- 
mentation as being no good. It's not the 



same documentation as the Tandy. It's 
a little more serious, but the British like 
to think that they're a little more serious 
than the Americans." 

Dragon began selling its micro last 
August and by September it had sold 
11,000 machines. "We've been pleas- 
antly surprised by its sales," Wadman 
said. Production was about 7,000 units 
a month in 1982, but Wadman said it 
would be stepped up this year "because 
of interest in Europe." 

Another low-end micro in the UK is 
the Color Genie marketed by Lowe 
Electronics Ltd. of Matlock, Derby- 
shire. According to Keith Bedford, 
Lowe's service and development mana- 
ger, the Color Genie's edge in the crowd- 
ed market is its Z80 microprocessor. 

"The ordinary programs written for 
the TRS-80 Model I and Model III or 
Genie will run on the Color Genie," 
maintained Bedford. And since many 
software writers are familiar with the 
Z80, he said, the Color Genie has 
greater potential than other machines for 
getting software written for it. 

At £ 199, the Color Genie is also priced 
below the Color Computer, but 



Tandy's Sayers claimed the Lowe ma- 
chine, manufactured by EACA Inter- 
national Ltd. of Hong Kong, isn't much 
of a threat to the Radio Shack micro: 
"The one from Lowe is not really in the 
business at all. We don't hear much of 
it. We don't see much of it." 

But Bedford said the Color Genie has 
advantages over the Color Computer. 
"It's a lot easier to use," he said of the 
new Genie, "and it's got a lot more fea- 
tures on it." Those features include a 
typewriter keyboard, three-channel 
sound, four programmable function 
keys, and upper- and lowercase charac- 
ter display. 

When will the British invasion take 
place? Apparently not soon. 

"Officially," Dragon's Wadman 
said of his firm's micro, "we don't have 
any plans to market it there, but we are 
talking to people in the States." 

And at Personal Micro Computers 
Inc. of Mount View, CA, Lowe's 
American distributor, a spokesman said 
the company had been studying the 
Color Genie, but hadn't made a com- 
mitment to market the machine in the 
United States yet. ■ 



A glance at the low-end warriors 



FEATURES 


COLOR COMPUTER 


DRAGON 32 


COLOR GENIE 


Microprocessor 


6809E 


6809E 


Z80 


Standard RAM 


16K 


32K 


16K 


Maximum RAM 


32K 


64K 


32K 


Display 
(characters 
by lines) 


32 x 16 


32 X 16 


24 X 40 


Resolution for 
Graphics 


256 x 192 


256 x 192 


160 x 96 


Typewriter 
Keyboard 


NO 


YES 


YES 


Upper and 
Lowercase 


NO 


NO 


YES 


RS-232C 


YES 


YES 


YES 


Sound 


1 Channel 


1 Channel 


3 Channel 


Baud Rate 


1200 


1500 


1200 



Colors 
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GEMINI- 

FOR PRINTER VALUE THAT'S 
OUT OF THIS WORLD 




Over thirty years of down-to-earth experi- 
ence as a precision parts manufacturer has 
enabled Star to produce the Gemini series 
of dot matrix printers — a stellar combina- 
tion of printer quality, flexibility, and reliabil- 
ity. And for a list price of nearly 25% less 
than the best selling competitor. 

The Gemini 10 has a 10" carriage and 
the Gemini 15 a 15%* carriage. Plus, the 
Gemini 15 has the added capability of a bot- 
tom paper feed. In both models, Gemini 
quality means a print speed of 100 cps, high- 
resolution bit image and block graphics, 
and extra fast forms feed. 

Gemini's flexibility is embodied in 
its diverse specialized printing 
capabilities such as super/ 
sub script, underlining, back- ' 
spacing, double strike mode 
and emphasized print mode. An- 
other extraordinary standard m i < ron 



arth experi- feature is a 2.3K buffer. An additional 4 K 

cturer has is optional. That's twice the memory of lead- 

ini series ing, comparable printers. And Gemini is 

Dmbina- compatible with most software packages 

id reliabil- that support the leading printers. 
>% less Gemini reliability is more than just a 

promise. It's as concrete as a 180 day war- 

ige and ranty (90 days for ribbon and print head), a 

is, the mean time between failure rate of 5 million 

ty of a bot- lines, a print head life of over 100 million 

5emini characters, and a 100% duty cycle that 

cps, high- allows the Gemini to print continuously, 

aphics, Plus, prompt, nationwide service is readily 

available, 
d in So if you're looking for an incredibly 



a high-quality, low-cost printer 
i/£ that's out of this world, look 
^\ to the manufacturer with its 
feet on the ground — Star and 

® the Gemini 10, Gemini 15 dot 

micron i cs»in c ^ matrix printers. 




MAKING A NAME FOR OURSELVES 

1120 Empire Central Place, Suite 216, Dallas, TX 75247 
For more information, please call Bob Hazzard, Vice President, at (214) 631-8560. 
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DOCUMENTATION 



Set 
it by 
phone 

Firms in California 
and Michigan pio- 
neer typesetting by 
telephone. 

By Eric P. Grevstad 



Contributing Editor 



Micro owners, your timeless writing 
can now be typeset by telephone. 
And at a price upsetting to your local 
print shop. 

According to Marleen Winer, co- 
owner of TeleTypsetting Company of 
Ann Arbor, MI, her firm can typeset a 
user's copy at half the cost of commer- 
cial typesetting. A $20 to $30 job at the 
print shop, she said, costs $6 per 8.5-by- 
11 -inch page. 

Users can earn "considerable sav- 
ings" by phone typesetting, said Steve 
Westmoreland, vice president of Type 
Share in Downey, CA. His firm charges 
$4 per foot of copy on 4-inch-wide pa- 
per and $6 per foot on 8-inch-wide 
paper. 

Users also pay telephone costs and 
overnight delivery charges. In the case 
of Type Share, CompuServe charges 
are involved. 

Both companies offer a choice of 
type styles, number of columns, and 
other format options. The Michigan 
firm adds a free computerized spelling 
check. 

Users can send Type Share copy to 
CompuServe at any time. TeleTypeset- 
ting, if called in advance, will leave its 
machines on overnight to receive 
material. 

Despite its convenience and low cost, 
typesetting by phone hasn't birthed a 
bevy of cottage publishers. 

"Our customers are businesses or 
those aspiring to be in business," said 
Winer of TeleTypesetting. 

Westmoreland noted, "We have one 
lady who writes poetry," but many of 
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Type Share's users are "people in the 
printing business, who don't have a 
large need for typesetting but want to 
offer it as part of their service." 

The typesetters supply users with 
codes for setting column widths, type- 
style, and other specifications. When 
word processing a document, the user 
imbeds the codes in it. 

While sprinkling your words with 
codes takes some getting used to, Winer 
said, most customers take it in stride: "I 
give them a test paragraph and most of 
them don't even bother with it. . .We 
have people who get it right doing four- 
or five-page newsletters the first time." 

After converting word-processed 
copy to ASCII, TeleTypesetting users 
phone their copy directly to that firm. 
Type Share customers dump their 
ASCII copy into CompuServe, where it 
is retrieved by the California company's 
computers. 

When the firms' computers receive 
the copy, they run it through typesetting 
machines. The finished work is returned 
to the user by overnight carrier or the 



BUSINESS 



TDP resistance 



United Parcel Service. 

Westmoreland estimated 30 percent 
of his customers "never had a computer 
before" coming to Type Share for type- 
setting. For computer novices, the firm 
offers a $775 starter package. It in- 
cludes a VIC-20, modem, and typeset- 
ting manual. 

Conventional rather than specialized 
work is phone typesetting's forte, West- 
moreland contended: "If a guy is going 
to send one business card, he can prob- 
ably get it done cheaper locally. [With] 
people sending three, four, or five pages 
[the service] starts to pay for itself." 

It pays best for someone in business, 
he said. "One of the key things this does 
for someone with a computer is turn it 
into something they can make money 
at, make it really a practical-usage tool." 

Winer added the novelty of computer 
typesetting has its own attractions: 
"The people who really like our service 
are those who think some way comput- 
ers are neat, and this is one more neat 
thing they can do with their microcom- 
puter." ■ 



Tandy's first-time scheme to go outside its Radio Shack 
system reportedly has encountered some distributor 
resistance. 

Selling Color Computers outside Radio Shack stores reportedly 
has been met with resistance by some of the independent RCA 
distributors targeted to peddle the machine to their retail customers. 



Some distributors have told the Elec- 
tronic News they would not market the 
TDP- 100 for Tandy. 

Pricing, as some market analysts 
predicted (80 Micro, November 1980, 
p. 458), appears to be a monkey wrench 
in Tandy's outside distribution scheme. 

Tandy sweetened the plan in October 
by chopping $50 from the $273 price 
distributors were slated to pay for the 
TDP- 100. That cut, reportedly, would 
make the suggested retail price of the 
TDP $379. 

When asked by 80 Micro about the 
reports of distributor resistance, Ron 
Stegall, Tandy's vice president for retail 
computer marketing, observed: "I'm 
not aware of that. I don't know why 
they would resist it. It's selling very well 
out there in 4500 [Radio Shack] stores." 

But not well enough for Tandy to 
maintain its share of the market, several 



analysts have maintained. They see the 
Fort Worth firm's outside distribution 
"experiment" as a concession its Radio 
Shack chain may be inadequate to re- 
tain its slice of the low-end pie. 

One distributor challenged those 
analysts' contentions. The distributor, 
who requested anonymity, explained 
low prices aren't the only thing on a 
consumer's mind when making a pur- 
chase. "That's how you sell Buicks, 
Chevrolets and Cadillacs," he said. 

He maintained many children work 
with Color Computers in school. If they 
have to choose between a TDP or some 
other brand, they'll choose what they're 
familiar with, he said. 

Another reason consumers will buy 
the machine, he contended, is Tandy is 
recognized as a blue chip name in 
microcomputers. 

But the computers sent to the in- 



Serial Line 
Analizer 



Serial Line Analizer 

Plugs into TRS-80 color computer Rom 
Pack port. Displays EBCDIC, ASCII, Binary 
and HEX at 50, 75, 110, 134.5, 150, 200, 300, 
600, 1050, 1200, 1800, 2000, 2400, 4800, 9600, 
1 9200 Baud. Baud rates can be split over two 
channels. Analizer is async and supports 
computer/modem/terminal/printer applica- 
tions or trouble shooting. Industrial serial 
analizers sell for 3000 and up. New techno- 
logy allows us to sell it for $199. 

EPROM Programmer 

Read and program EPROM on the TRS-80 
color computer, for $80. 

EPROM Board 

Board with sockets and support chips allow 
you to plug in your own EPROM and execute 
them on the color computer, for $30. 

Tape map utility 

Displays TRS-80 tape file information: File 
name, file type, gap information, start ad- 
dress, load address and data blocks, $15. 

Tape save utility 

4K color computers can save machine code 
or binary files on tape with this utility, $15. 

Musid 

Simple note entry using joystick on TRS-80 
color computer. Supports whole notes 
through thirty-seconds and 11 keys. Can 
save music scores and recall them later to 
play or to change. Easy to use, $30. 

Add $1 .50 for post, and handlg. Prices subject 
to change. Wl residents add 5% sales tax. 



SUPERVENTURE IS HERE! 

An incredible journey awaits you in — 

Hazuia 
(fufBt 

A NEW EXPERIENCE 
IN TEXT ADVENTURE! 

As BAZUL, the Royal Runner, you will 
journey through enchanted forests, hidden 
caves, dismal swamps, and magical lands. 
Your mission? To recover 26 rare ingredi- 
ents for a healing potion— the only cure for 
the deathly ill King Rifraf. Can you save the 
Kingdom, or will it fall under the control of 
the Evil Jester? Machine Language, Save- 
a-Game Feature, Over 400 Word Vocab- 
ulary. Will boot on Model III. Requires 1 
disk drive and 32K. 

(Soon available for Model I) 



$29.95 



ONTROL LRAFT INC. 



P.O. Box 123 • Muskego, Wl 53150 

414-784-9027 ^, 10 




P. O. Box 502 
Florence, Alabama 35631 
(205) 766-0030 ^94 



Vttlll 
NlfEfl™ 

PUTS THE 

POWER IN 

YOUR HAND 

TO REMOVE 

MR/lTER 



CQMF 



• Printer paper dust 

• Dust data processing equipment 

• Dust your computer room 
"Clean Room" clean 

2 CLOTHS FOR S 2 95 ppd 

VISA • MASTER • CHECK 

MWB INDUSTRIES, INC. 

2013 FRANKLIN STREET 

DETROIT, MICHIGAN 48207 

(313)259-1104 

DEALERS INQUIRIES INVITED "90 



TRS-80 

1 00% Radio Shack Equipment 

SAVE A BUNDLE 

Order Toll Free 1-800-87 '4-1551 

FLA Residents 904-438-6507 collect 

EPSON OKIDATA CITOHetc. 



mm sales co. 



704 W Michigan Ave; P.O. Box 8098 
Pensacola, FLA 32506 



yM 



'TRS-80 is a trademark of Tandy Corporation. 



sSee List of Advertisers on Page 435 
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dependent distributors will be marketed 
as TDP products — not Tandy's. That 
discouraged one distributor to pass up 
the chance to sell the computers. 

"It was really the merchandising ap- 
proach from Tandy Corporation that 
scared the living daylights out of us," 
said Dennis D'Angelo, general manager 
of the specialty products division of 
Raymond Rosen Company located in 
Philadelphia, PA. 

"The only way to sell this product is 
to say, 'Hey, this is a product of the 
Tandy Corporation," he explained. 
"They're going to merchandise this as 
TDP electronics and advertise it as TDP 
electronics." 

Retailers could be persuaded to sell 
the higher-priced TDP, he said. "It's 
not in discount stores hanging from 
fish wires a la Toys R Us." And with 
competitive pressure driving home com- 
puter prices down, he continued, mer- 
chants could make a little more money 
on a TDP. 

"But we felt it was going to be a hard 
sell — especially at the retail price point 
they were at and not having a national 
program behind it," he said. 

He noted, "They never presented to 
us any concrete program. They never 
said we're going to run so many ads to 
sell the TDP name." 

The TDP's retail price wasn't the on- 
ly pricing problem for D'Angelo's 
business: "They never gave us a com- 
mitment that we would be competitive 
with Radio Shack. There was always the 



possibility Radio Shack would be lower 
than us." 

"There's no price protection offered 
to a distributor," he said. "We felt that 
to take a lot of inventory would place us 
in a precarious position." 

Another disadvantage Raymond 
Rosen Company found with the Tandy 
plan was it offered no room for expan- 
sion. "We were limited to Color Com- 
puters," D'Angelo said, "and we 
wanted to offer the II and III to our 
customers, too." 

The current product line of 
D'Angelo's firm doesn't include 
microcomputers. "We were going to 
enter the business through the TDP," 
he noted. "Now we're just dragging our 
feet. We're talking with some people 
and will probably get into business 
some time in 1983." 

Although Raymond Rosen won't be 
carrying the Color Computer clone, 
D'Angelo had kudos for the micro: 
"The machine is a great machine. No 
doubt about it. It's probably a better 
machine than a lot of the personal com- 
puters out there today. 

"It was the merchandising approach 
that went behind it that we were con- 
cerned with. We felt that in the long 
term we would be losers. And more im- 
portantly, our dealerships would be 
losers. We have to go back to those 
people and sell them a lot of other 
equipment. We can't burn our bridges 
behind us."B 



HARDWARE 



TRS-80 
into 
IBM PC 

Plug this peripheral to 
your Tandy micro 
and get ready to run 
PC programs. 

The best of both worlds. You can 
have it with a new gadget that makes 
your TRS-80 into an IBM Personal 
Computer. 

The device, called MicroMerlin, is a 
single-board micro that plugs into the 
Model Ill's 50-pin connector or the ex- 
ternal bus connector of the Model I 
Expansion Interface. 

"You don't have to open up any- 
thing," explained Manolito Aden, pres- 
ident of Micro Projects Engineering 
Company. "You just plug it in and 
your Radio Shack will be able to run 
programs written for the IBM PC as 
long as they use CP/M-86 function 
calls." 

MicroMerlin contains an Intel 
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• 48K buffer for high 
speed throughput 

• Diablo 1640/1650/630 
software compatible 

• Serial and parallel interfaces 

• Serial baud rates to 19.2K 

• Automatic baud rate selection 

• Four CPU's, no cables, belts, 
wheels or pulleys 

MONEY BACK 
GUARANTEE 

ORDER NOW 
VISA • MASTERCARD 

800-962-8185 
in CA 800-538-9294 

^■237 



Letter quality daisy 
wheel printer 

12 print styles, 15 languages, 

96 char, wheel, standard ribbon 

Automatic bi-directional 

printing 

Proven reliability 100,000 

printer mechanisms produced 




amatically low price 



• Up to 32 CPS print speed 
in typical applications 

• Interconnecting cables for all 
major micro-computers 

• Automatic proportional spacing 

• Parallel 6K bytes per sec. 
transfer rate 

• Optional extras: forms tractor, 
cut sheet feeder. 

The DTC 380Z 

DAISY 

Wheel Printer 



$ 



frxnnr* Data Terminals & Communications 
LS/Ula 590 Division St., Campbell, CA 95008 
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chip, the microprocessor in the PC. 
Once you plug MicroMerlin into your 
TRS-80, you can boot a DOS in drive 0, 
insert a PC disk in drive 1 , and Aden's 
gadget will run the IBM program. 

When you run a PC program, Micro- 
Merlin uses the TRS-80 as a slave. The 
two microprocessors, the Z80 and 8088, 
run independently, Aden said. The 
Radio Shack machine's Z80 does its 
thing — checking the keyboard, operat- 
ing the disk drive, working the moni- 
tor — he explained, but it also responds 
to demands made on it by MicroMerlin. 



COMMUNICATIONS 



With the addition of a disk control- 
ler, he noted, MicroMerlin can act as a 
stand-alone computer. In that mode, 
you can connect a dumb terminal to the 
box via its serial port. 

"We've got a customer in Pennsylva- 
nia who wants a couple of hundred of 
these," Aden said. "He's going to sup- 
ply his own terminals. We have a com- 
mand in the operating system that 
switches control from the Radio Shack 
computer to the serial port. That cus- 
tomer will be able to run 80-column 
programs right away." 



MicroMerlin, with 64K of random 
access memory and 8K of erasable pro- 
grammable read-only memory, costs 
$1195. CP/M-86 can be purchased 
from Aden's Culver, CA, enterprise for 
$249. Other options include an expand- 
er card for additional memory ($275) 
and RS-232 interface ($89). 

MicroMerlin's memory can be ex- 
panded to 256K. Aden's price for each 
64K block of memory is $189. 

Aden said demand for his gadget has 
been brisk: "We've got our first month 
of production already booked." ■ 



New Primes at Source 

Will new $5 million center put Source on top in info utility business? 



By Alan Abbey 

Special to 80 Micro 



Snoopy, Miss Piggy, and Garfield are helping The Source expand 
its on-line computing capacity by 10 times, so it can add more 
than 200,000 subscribers in a few years. 




378 • 80 Micro, January 1983 



Photo by Allan Abbey 



The cartoon characters and six other 
stuffed animals sit atop each of the 
seven new and two older Prime 750 
computers The Source has installed in 
its basement computer center in spank- 
ing new offices in McLean, VA. The 
dolls identify each of the computers, so 
The Source's programmers can quickly 
identify which machines need attention. 

The dolls add a humorous touch to 
what is a deadly serious step to greatly 
expand the company's capacity and 
thrust the three-year-old firm into the 
forefront of the information utility field. 

The computers, along with a Telenet 
and Tymnet switching system to handle 
user calls, were unveiled at a glossy 
ceremony on Columbus Day at The 
Source's new headquarters. It was at- 
tended by industry, press, and politi- 
cians, including Virginia Governor 
Charles Robb and former Defense 
Secretary Melvin Laird. 

The computing center represents a $5 
million investment and a vote of confi- 
dence in The Source by its parent com- 
pany, the Reader's Digest Association, 
which bought the fledgling information 
utility two years ago. Until the expand- 
ed Prime 750 system went on line last 
September, The Source had been rely- 
ing on a management firm across town 
from its old offices to operate and 
maintain its system of two Prime com- 



The Source hopes its new Primes will end 
the sluggishness and slow response time of 
the old information system. 



BEFORE YOU GET TOO EXCITED ABOUT 
LOBO'S NEW COMPUTER, THERE'S 
SOMETHING YOU SHOULD KNOW. 



There's plenty to be excited about in Lobo's 
new MAX-80,™ as you'll see in just a minute. 

But first we want to warn you: you can't 
get one right away. Already, orders are 
coming in faster than we can build systems. 
However, if you can appreciate an incredi- 
ble price/performance bargain, you'll agree 
the MAX-80 is well worth waiting for. 

WHAT'S ALL THE EXCITEMENT 
ABOUT? 

We're glad you asked. And the answer 
is pretty simple. Just look at this list of 
standard features: 

• 5 MHz Z-80B processor. That's 2 1 /2 times 
the speed of a TRS-80 Model III or Soft- 
Card/Apple! 

• 64k RAM. 128k is a low-cost option. 

• CP/M included. A few more dollars get you 
LDOS, an incredibly powerful operating 
system that lets you run standard Radio 
Shack software. 

• Software-selectable 25 x 80, 16 x 64, and 
16 x 32 screen formats. For full compati- 
bility with CP/M and TRS-80 applications. 

• All disk interfaces built in. Plug in any 
combination of 5 1 /4" floppies, 8" floppies, 
and Winchester disk. 

• Two RS-232 serial ports. Ready to plug in 
modems, printers, or what-have-you. 

• Centronics-type parallel port. For any 
printer using this standard interface. 

• Plus: numeric keypad with 4 function keys, 
software definable text and graphics char- 
acters, built-in clock/calendar with battery 
backup, and buffered I/O expander port. 

Now for the best part: the factory-direct 
price for all this power is just $820- 
including shipping and Lobo's standard 
1-year hardware warranty! 
WHAT TO DO NOW. 

Call Lobo toll-free. Tell us what hardware 
and software configuration you're interested 
in (see below), and we'll give you an 
approximate shipping date. A $100 deposit 
will hold your place on the waiting list. 

Then get a good book to help you pass 
the time. 



MAX-80 





CPU and Accessories 

MAX-80 computer with 64k 

RAM and CP/M $ 820.00 

64k expansion RAM 

(installed) $ 95.00 

12" (diag.) high-resolution 

anti-glare green phosphor 

monitor $ 175.00 

LDOS operating system 

instead of CP/M $ 39.00 

LDOS operating system in 

addition to CP/M $ 69.00 

Dual 5 1 A" Floppy Disk Systems 

4402CM single-sided, 40 

track; 180 kB per diskette $ 690.00 

4802CM double-sided, 

80 track; 720 kB per diskette $1 ,175.00 

Dual 8" Floppy Disk Systems 

NOTE: Lobo CP/M permits reading and 

writing standard single-sided, single density 

CP/M disks with either of these systems. 

8202CM single-sided, double 

density; 577 kB per diskette $1,185.00 

5202CM double-sided, double 

density; 1 155 kB per diskette $1 ,485.00 

Winchester Disk Systems 

950M 5W system: 4.8 MB 

hard disk plus 720 kB floppy $2,405.00 



950 MX same as 950M above 

but no floppy drive $2,100.00 

1850M 8" system: 8.0 MB hard 

disk plus 1 155 kB floppy $3,085.00 



The Lobo Warranty 

All Lobo hardware products carry a 
limited 1-year parts and labor warranty. 
Call or write for complete warranty 
statement. 



© 1982 Lobo Drives International, Goleta, CA 
CP/M trademark of Digital Research Corp. 
TRS-80 trademark of Tandy Corporation. 
SoftCard trademark of Microsoft Corporation. 
Apple trademark of Apple Computer. 
LDOS trademark of Logical Systems Incorporated. 

ALL PRICES INCLUDE SHIPPING WITHIN THE U.S.A. 
California residents add 6% sales tax. 
Payable by credit card, check, or money order. 

TOLL-FREE ORDER NUMBERS: 

U.S. (except California), 4Mfc, ■■■■ 

800-235-1245 w .A. 

In California: 800-322-6103 or 

800-322-61 04 Hours. 7AM 5PM Pacific Time 



|f>B 

dnvei 

INTERNATIONAL 



% 

,L ^^^ 



Lobo Drives 
International 

Dept. MC 1 

358 S. Fairview Ave. 

Goleta, CA 93117 



Prices subject to change without notice. 
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• See List ot Advertisers on 
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Virginia Governor Charles Robb (left), The Source's Chief Executive Officer, George Grune, 
and Defense Secretary Melvin Laird, now chief counsel for Readers Digest at dedication 
ceremonies for The Source. 



puters. The outside firm also owned the 
software that ran the system, and The 
Source's electronic mail and bulletin 
board programs. 

By the company's own admission, 
the early system was sluggish to respond 
to user calls and was vulnerable to 
power failures. The new computer 
center, with its expanded capacity, 
dedicated back-up computer, and on- 
site power supply, will answer both 
those problems, Source officials 
predict. "We will have more capacity 
and more reliable hardware and soft- 
ware," said Jeff Entwistle, the com- 
pany's bearded director of systems 
development. 

Clearly, reliability and room for ex- 
pansion are chief among the new sys- 
tem's selling points. For now at least, 
there will be no new services added as 
the company tries to improve what it 
has on line for users. The company is 
still introducing its newly improved 
electronic mail, a service aimed at the 
business clients it is aggressively court- 
ing. Entwistle promises new offerings in 
the future, but said the company will 
keep them a surprise until they are ready 
for unveiling. 

The Source is going for what it be- 
lieves is a growing market of people and 
businesses who fall between the two 
universes of traditional timesharing 
users, the early hobbyists, and the ori- 
ginal heavy number crunchers, such as 
banks. 

To be prepared for its big push, The 
Source expanded its Prime 750 comput- 
er system. Each has a 3 million byte 
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capacity. They are supplemented by 19 
disk drives, each of which has an addi- 
tional 300 million bytes of storage, for a 
total of 5.7 billion bytes of storage 
memory. 

As the tour guides said during the 
dedication ceremony, "The human 
mind still has 100 times more memory, 
but these can recall it faster." The 
system is designed for "virtually limit- 
less growth," according to the com- 
pany's effusive promotional literature. 

Part of the new computing center will 
be used for storing tapes of users' files. 
That should please people who acci- 
dentally erase their files, because The 
Source is promising to replace them 
for them. 

Key to the expanded operations are 
the Telenet and Tymnet systems that 
will handle all the incoming calls. It is 
composed of two Telenet TP's and a 
Tymnet engine. In about 400 metro- 
politan areas, you can reach The Source 
by dialing the local Telenet or Tymnet 
number. Other ways for you to access 
The Source include calling the com- 
pany's toll-free WATS line, which has a 
$15 per hour surcharge, dialing long 
distance, or calling on the firm's local 
line if you are in the Washington, DC, 
metropolitan area. 

The Source is also signing Uninet for 
a trial run. This service is similar to 
Telenet and Tymnet, and is available in 
smaller cities than the other two. If it 
works out, the company will keep it on 
a permanent basis. 

It has 100 incoming direct phone 
lines, and 14 WATS lines along with the 



Telenet and Tymnet switching systems. 
The company believes it now has 
enough phone capacity so users will be 
able to call at any time. 

With the new system in place, The 
Source will step up its drive to lure 
business customers. George Grune, the 
nattily dressed chief executive officer 
who came from Reader's Digest, talked 
optimistically of the future: "The 
Source has grown from a service for 
5,000 to 6,000 hobbyists to a manage- 
ment service for professionals and prov- 
en decision makers who need its infor- 
mation to instantly make decisions." 

The company said SourceMail, its 
electronic mail service, is the heart of its 
business programs. Others are PARTI- 
CIPATE, a computer conferencing net- 
work; CHAT, for terminal-to-terminal 
conversations; POST, for electronic 
messages and classified advertising; 
MGRAM, for sending Mailgram Mes- 
sages from computer terminals; and 
PRIVATE SECTOR, which enables 
businesses to create specialized elec- 
tronic communication products for 
their customers and members. 

Data bases The Source has geared to 
businesses include stock and commodi- 
ty reports, summaries of articles from 
leading business publications, and, for 
high-flying executives, airline schedules. 

The fees for using The Source went 
up last August. According to a com- 
pany spokesman, they will not go up 
again for a while. It costs $100 to join. 
Hourly charges are $20.75 during the 
day, $7.75 in evenings and on week- 
ends, and $5.75 an hour after midnight. 
There is a $10 monthly minimum. 

Company public relations director 
Michael Rawl said The Source is ahead 
of its own projections for future profit- 
ability. He claimed it would have turned 
a profit last year if the Reader's Digest 
had not bought it and planned the ma- 
jor expansion of staff and computing 
capacity. The Digest is willing to sacri- 
fice short-term profits for long-term 
growth and is gambling The Source will 
become number one in its field. 

The company cemented its position 
in the growing northern Virginia circle 
of computer firms with a dedication 
speech from Gov. Robb. He called the 
opening of the new office and computer 
center "a celebration of the future." 
Laird, the senior counsel of Reader's 
Digest, was on hand to smile and shake 
hands at the dedication ceremonies, and 
did nothing more official than intro- 
duce Robb to the crowd of 100. ■ 



"Chcckbook-Checkwnter II is available for. 
TRS-80 ; Model 1 /III / 
TRS-80 Color Computer 
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Product; Coijlnuoi.& fan-fold' 
creeks v/ith dual-w.ndov/ed 
envelopes, cNeckboox binder and 
software designed especielly for com- 
puter use in the home Zoj can t cet con- 
tinuous checks iike these anywhere n the 
: world. 
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Savings: Special package — in- 
cluding software — to get voj 

- started. 200 checks, 1 00 envelopes 
and binder- $59.95. j,Q0 checks, 300 
envelopes and binder- $79.95 3oth with 
our versatile 'Checkbook -Checkwi iter II ' 
program -.rr.jt will have you printing /our 
checks the day you receive them, 

SPECIAL BONUS; 1 *»' # *" * 

• Each 250tft customer— 50% off your order,- 

• Each 500th customer— your order free; 

• Each 1000th customer— your order free, 
and free check refills for life. 




Guarantee Our check, and ac- 
cessories are guaranteed to please 
you and guaranteed compatible 
with your bank. In fact, if you order a 

■ special package and aren't satisfied for 

■ any reason, simply return it for a full refund 
. (including postage) and you can keep the 

"Checkbook-Checkwrlter II" program. 

Now CHECK WITH US.. -Order a special 
package with moneyback guarantee 
today! Just enclose a voided check for 
encoding information with your order. Or 
send today for our free information 
package. We guarantee you'll be pleased. 
Visa, M.C, AMEX orders welcome. 
Shipping: S2.00 USA, $5.00 Outside USA. 
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SYNERGETIC SOLUTIONS 

RD •.MULBERRV, a. 33860 • PHONE (81 3) 646-6557 








EVERYTHING FOR YOUR COMPUTER 

Creative Computer 



Department 80 1236 E. Colonial Drive 

(305) 894-0789 (Florida) Orlando, FL 32803 USA 

TOLL FREE 800-327-9294 
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PRINTERS 



Epson MX 100 $ 699 

Epson MX 80FT 579 

Okidata 80 349 

Okidata 82A 469 

Okidata 83A 719 



C. ltohF10-40CPS $1399 

C. Itoh Prowriter Par 495 

C. Itoh Prowriter Serial 649 

Brother/ComRex 
Daisy 995 



HAVE THEY EVER ASKED 
Why You Bought A Computer? 

— INFO-SCAN WILL SHOW THEM WHY — 

Combines the Features of a Word Processor. Data Base 
Manager, and Information Retrieval and Display Facility. 

Instantly recall and display information of any sort: sales 
leads; inventories; product data 6 prices; daily appoint- 
ments & reminders; names & addresses; diaries; lesson 
plans & student lists; recipes; index magazine articles, 
music and program libraries. You create information files 
using a simple word-processing like entry method. A short 
key describes the record. Scan the keys on the screen, select 
one, press a button and the full record displays (or prints). 
Add, delete, change records in a snap. Written in machine 
language. Fully self-contained. Simple to operate, you don't 
need a Ph.D to use it! No programming or other technical 
knowledge required. 15 page manual. 
INFOSCAN Model l/lll 48K 1 Drive $49.95 

— OR SHOW THEM STUNNING GRAPHICS — 

Add the professional touch to your programs. Create com- 
plex graphic and text screens effortlessly. Over 30 com- 
mands for screen manipulation. Built in 'HELP' facility. 
Enter 1-1/2 inch graphic letters with a single keystroke (48K 
required). Save completed screens as a BASIC subroutine, 
merge with your programs. Full screen displays instantly 
from your program with a single GOSCJB. Do animation. 
Load existing screens to make changes. Scores of useful 
features. Written in Machine language. 26 page manual. 
SCREEN ARTIST II Model l/III 32K 1 Drive $32.95 



Call or write for full brochure, in- 
cluding many educational prod- 
ucts. Full money back guarantee 
VISA, Mastercard, COD wel- 
come. Add $2.50 for shipping. 
Ct. residents add 7.5% sales tax. 



The 
Smallsystem 
Center s ™ 



Post Office Box 268 New Hartford. CT. 06057 (203) 482-3689 



RIBBONS I 



PRINTER 



I CARTRIDGES 



RADIO SHACK 








PRINTERS 1 








Daisy II, DWP 410, I 


10 For 


$24.95 


6 for 24.95(DW II only) 


Black 








Brown /Blue/Red I 


6 For 


24.95 


N/A 


LP 1-2-4 | 


4 For 


18.95 




LP 3 & 5 


3 For 


13.95 




LP 6 & 8 (DMP 400) I 


3 For 


13.95 




DM P 200 | 


3 For 


13.95 




DMP 500 ! 


3 For 


13.95 




EPSON / IBM 






EPSON BRAND 


MX-70/80/80/F/T j 


3 For 


16.95 


16.95 ea. 


MX-100 i 


3 For 


18.95 


21.95 ea. 


OKIDATA ! 








80-82-83 I 






3 For 11.95 


CENTRONICS | 








700/730/737/739/779 








ZIP PAK I 


4 For 


18.95 





MISCELLANEOUS 



Plastic File Bx 50-5 %'". . .$19.00 

Library Case 5 V*" 3.00 

Library Case 8" 4.00 

Head Clean Kit 23.00 



Green Screen I, II, III $11.00 

Mailing Labels 5000 12.00 

+ Shipping 

NEWDOS80 2.0 139 

LDOS5.1 105 



Write For Free Catalog 

Over 600 items in Diskettes, Paper, Labels, Ribbons, Checks, Storage 
Boxes, Furniture, Binders and Hardware. *-Mfg. Trademark. Florida 
plus 5% tax. 

FREE SHIPPING except hardware. 

Most orders out in 24 hours with VISA, M/C, Money Order, Cashier 
Check, Bank Wire and C.O.D. Personal check over $150 allow 10-14 
days. Mail order only. Prices subject to change. 

9-8 Monday-Friday, 9-6 Saturday. ^ 190 



^See List of Advertisers on Page 435 
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High tech health hazard 

Survey of workers' perceptions shows belief computers 
cause health problems and reservations about women's 
movement. 



M 



any office workers operating word processors feel the ma- 
chines cause health problems. 



That's one of the findings of a na- 
tional study of office workers' attitudes 
sponsored by Verbatim Corporation of 
Sunnyvale, CA, the world's largest 
manufacturer of disks, minidisks, head- 
cleaning kits, and cassettes. 

According to a summary of the 
study's findings, 68.2 percent of the 
workers responding to the survey felt 
using word processing equipment could 
result in health problems. Those prob- 
lems include eyestrain and backstrain. 

Nearly eight in 10 respondents, Ver- 
batim said, called for better lighting for 
word processing workers and 78.8 per- 
cent wanted rest breaks. 

Many workers also commented man- 
agement seldom consulted office staff 
on the design of work space or the struc- 
turing of the work day to improve 
working conditions and minimize 
stress. 

"The findings have revealed some of 
the real feelings and needs of office 
workers," Verbatim President Malcom 
Northrup said in a statement. 



"Verbatim is not saying there is a 
health problem in the office," a spokes- 
man for the company told 80 Micro. 
"There are studies that have been done 
that say there is really no reason 
for concern about the equipment. But 
the fact remains that workers are con- 
cerned." 

The survey also discovered many of- 
fice workers have reservations about 
how much the women's movement has 
improved career opportunities. 

About half of the office workers 
polled said career opportunities had 
been "somewhat" enhanced by female 
advocacy, Verbatim said, while a quar- 
ter thought career opportunities had 
been "greatly" enhanced. 

One survey respondent noted, "Sex- 
ual prejudice is very much alive and well 
today, but at least now it cannot be 
flaunted openly." 

Another said, "As a result of the wom- 
en's movement, there seems to be token 
vice presidents whose duties are really that 
of an administrative assistant." 



One survey respondent: "Sexual prejudice is very much^ 
alive and well today but at least now it cannot 
be flaunted openly." 




"Women's Lib opened the doors for 
women to get into management," a 
third worker observed, "but it has not 
done much for the advancement of sec- 
retaries to other positions. They are still 
regarded as someone's girl." 

The survey, conducted by Group At- 
titudes Corporation, also found: 

• Workers had a "strong desire" to 
participate in in-house discussion 
groups regarding the acquisition of new 
equipment, attend sales presentations 
by equipment vendors, and pass ideas 
to management via a suggestion box. 

• Workers felt fewer demeaning tasks 
were demanded of word processing op- 
erators than secretaries. 

• The office task workers liked best 
was typing, followed by telephone con- 
tacts and operating word processing 
equipment; and 

• Better than three-fourths of the re- 
spondents felt automation had im- 
proved office efficiency. 

According to the Verbatim spokes- 
man, Donovan Neale-May, the firm 
commissioned the study to "heighten 
the awareness" of office managers to 
Verbatim products. 

"Based on the input we have received 
from this study," Northrup stated, "we 
plan to launch a number of ongoing 
programs designed to improve the qual- 
ity of life for these valuable personnel in 
tomorrow's automated office." 

One of those programs, Neale-May 
said, will enlist the help of a local 
museum. 

"We want to create a Verbatim art 
collection fund," he explained. "The 
San Francisco Museum of Modern Art 
will collect paintings from up-and-com- 
ing painters around the world. They will 
be reproduced in poster form and given 
away free to anybody who feels like 
they'd like to liven up their work space. 

"The idea is to bring art into the 
workplace, a workplace that many feel 
is becoming a sterile environment." 

Group Attitudes Corporation con- 
ducted the survey in July 1982. A sam- 
ple of 1,263 secretaries, administrative 
assistants, and word processing operat- 
ors in large, medium, and small com- 
panies in five major geographic regions 
responded to the 104-item, self-admin- 
istered questionnaire. The sample was 
weighted to represent the 3.9 million 
secretaries estimated to be in the work- 
force and to reflect the geographic 
spread of those workers. ■ 
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Expensive 




EXPENSIVE- The LNW 
System Expansion II and built-in "•£$$!$ 
comes with a full 32K of 200ns RAM&-* 1 " 
RS232c 20 MA current loop serial interface. 
That's for starters. Next, consider our heavy gauge 
steel case, power indicator lamp, gold-plated 
connectors, FR-2 glass epoxy circuit board with 
solder mask and silk screen legends. Then there is 
the parallel printer port, screen printer port, real 
time clock, and extra heavy duty onboard power 
supply with over current protection, over voltage 
protection and thermal shutdown. If that's not 
enough then there is the floppy disk controller, 
guaranteed operation at a 4MHz CPU speed and 
our 6 month warranty. Every one of these features 
is STANDARD. This is true system expansion. 
You get every 'expensive' feature without 
spending more. 

CHEAP - Our price is $399.95. Any way you 
compare, features or price, LNW's System 
Expansion II is the clear winner. The LNW 
System has been field tested for over two years 
with thousands of users. It works with any DOS, is 
100% TRS-80 Model I compatible and it works 
'right out of the box'. If there is any doubt in your 
mind as to whether you should buy ours or the 
'other guys', just ask an LNW owner! 

WE ARE #1 - Number one in price, features, 
reliability, performance and delivery. LNW is 
committed to 'expensive' features and quality at 
reasonable prices. LNW is committed to support, 
thorough documentation, and reliability. 

LNW Research Corp. 

2620 WALNUT Tustin, CA. 92680 
(714) 641-8850 (714) 544-5744 



made us the number one 
manufacturer ■:'."■ of system expansion units 
and accessories for the Model I computer. 

EXPANSION OPTION - 8-inch drive capability 
is as easy as plugging in the LNDoubler 5/8 
option*. Now you can have any combination of 
single- or double-density, single- or double-sided, 
8"* and/or 5" disks on-line! 8-inch disk storage 
increased to 591,360 bytes - 77-track single-sided, 
double-density or 1,182,720 bytes - 77-track 
double-density, double-sided. 

The LN Doubter's unique 5/8 switch allows you 
to boot from 5- or 8-inch system disks and it's 
accessible from outside the interface. The $219.95 
LNDoubler 5/8 comes with a double-density disk 
operating system (DOS+ 3.3.9), complete with 
BASIC and utility programs... ready to run your 
software. 

Each of your present 40-track, single-sided 5-inch 
drives will store up to 184,320 bytes (formatted 
storage) - that's an 80 % increase in storage 
capacity for only half the cost of just one disk 
drive. With three 8-inch double-density, 
double-sided drives your Model I will have 3.75 
Megabytes of online storage - that's more storage 
than a Model II or Model III! 
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'8" drive operation requires special cable, K" 
double-density requires ft. 55MHz CPU speed-up 
modification or LNW-80 4MHz computer. 
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PR director 
exits Tandy 

Tandy Corpo- 
ration's direc- 
tor of public- 
ty has resigned 
his post to 
start a public relations con- 
sulting firm. 

Martin B. Winston, who 
has formed Winston and 
Winston with his wife, Judie, 
said some blue-chip silicon 
firms are interested in his ser- 
vices. 

"I'm talking to all the 
heavies," he claimed, "Texas 
Instruments, Data General, 
DEC, Apple, IBM." 

What can smooth-talking 
Winston provide his clients' 
PR departments? For one 
thing, a lube job. "I can act 
as Vaseline," the 34-year-old 
PR man said. "I can help 
make the whole contact busi- 
ness easier." 

Before Winston left Tan- 
dy, he completed a promo- 
tional campaign expected to 
garner the Fort Worth firm 5 
billion product exposures 
during the 1983-TV year. 

The campaign, which cost 
Tandy no more than $1,000, 
is aimed at getting the firm's 
products used as props for 
TV shows. 

Shows agreeing to use the 
products include "Walter 
Cronkite's Universe," "Hill 
Street Blues," "The Devlin 
Connection," "St. Else- 
where," "Remington 
Street," "The New Bob 
Newhart Show," "The 
Greatest American Hero," 
and "Quest." 

Winston told Advertising 
Age many of the products are 
"cosmetic" models. They 
look like working products, 
but have failed quality con- 
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WOOING COMPUTER FIRMSPenr/jouse maga- 
zine, using what makes it popular— skin — has 
launched a campaign to persuade software firms to ad- 
vertise in the Bob Guiccione publication. This ad, 
which ran from September to December in The Sizzle 
Sheet— a trade publication for marketers of computer 
and electronics, notes 23 percent of Penthouse readers 
own a home computer, 17 percent plan to buy home 
video games in 1983 and 13 percent plan to buy home 
computers. The ad originally ran in color. 



trol. Tandy has found those 
products are less likely to be 
stolen from a set. 

Winston, whose new firm 
will have offices in Fort 
Worth and Greenwich, CT, 
added, "You could say we're 
making Hollywood our junk- 
yard." 

What's in a 
logo? Plenty, 
says Tandy 

The Bell Sys- 
tem symbol 
has sparked 
skirmishing 
between the 
American Telephone and 
Telegraph Company and 
Tandy Corporation. 

Radio Shack's parent has 
complained to the U.S. 
Justice Department about 
AT&T and the Bell Operat- 




ing Companies using the bell- 
to-a-ring logo in their adver- 
tisements. 

Letting AT&T and the 
companies use the logo, 
makes a mockery of the anti- 
trust settlement between Ma 
Bell and the department, 
Tandy contends. 

By sharing the trappings of 
the Bell system with the 
operating companies, Tandy 
said in a letter to the depart- 
ment's antitrust division, 
AT&T intends to "unfairly 
enshrine in the minds of con- 
sumers the continuing 'one- 
ness' of the Bell System." 

That will give AT&T a 
competitive edge that under- 
cuts the goal of the antitrust 
settlement, Tandy argued. 

It maintained AT&T's re- 
organization plan should 
provide "the divested operat- 
ing companies may have use 



of the Bell name, the Bell 
symbol, and related trade- 
names, trademarks and mar- 
keting symbols as a package, 
while AT&T may not use any 
of these names, marks, logos, 
or marketing symbols for any 
purpose." 

Unless those provisions are 
included in the plan, Tandy 
added, "At&T will divest the 
[operating companies], but it 
will be a divesture in law, not 
in fact. Through massive ad- 
vertising, AT&T will in effect 
tell consumers that the Bell 
System remains one — eco- 
nomically and operational- 
ly — and that it is business as 
usual. 

"Competition, the whole 
purpose of the consent 
decree, will be the victim." 

In a letter to the antitrust 
division, AT&T Vice Presi- 
dent and General Counsel 
Howard J. Trienens said 
Tandy's request went beyond 
anything contemplated by 
the final judgement in United 
States v. American Tele- 
phone & Telegraph Co., et al. 

As the issue got muddier 
and muddier, William F. 
Baxter, head of the antitrust 
division, attempted to clear 
the waters. 

After divestiture, he wrote 
to Trienens, the division 
would see as violating the 
agreement "any use of the 
word Bell independently of a 
corporate name, as in the 
name of a product or service. 

"We would also object to 
the use of a corporate name 
itself, such as American Bell, 
in such a fashion as to imply 
a relationship with the [oper- 
ating companies] . . . 

"Under this approach, for 
example, we would view as 
violative of the modification 
the use after divesture of Bell 
Packet Switching Service or 




Rose 



You've Cot 

TOTAL ACCESS 

TO YOUR COMPUTER HARDWARE & SOFTWARE 
NEEDS. CALL ROSE TODAY! 



TM 



* DISK DRIVES 

Total Access 40 Track $239 

Aerocomp 40T Flippy $319 

Aerocomp 80T $399 

Aerocomp 80T Flippy $409 

Aerocomp 40T Dual Head $409 

Aerocomp 80T Duol Heod $519 

ForTRSSOMod. I. Mod. III& IDMPCexrernolGTI99/4A 

Incl. power supply & enclosure. 

J?Apple Comparible Drive $309 

-$" Apple Comp Disk ConrrollerDoard. . . $99 

* BARE DRIVES 

Torol Access 40T $199 

Aerocomp 40T Flippy $269 

Aerocomp 80T $329 

Aerocomp 80T Flippy $359 

Aerocomp 40T Duol Heod $329 

Aerocomp 80T Dual Heod $469 

* DRIVE CABLES 

2-drive $24 

4-drive $34 

Extender coble $13 

* OPERATING SYSTEMS 

TRSDOS 2.3 Disk & Manual $20 

LDOS (I or III) $119 

D05PLU5 34 $129 

NEWDOS/80 (I or III) $129 

* DISK CONTROLLERS/SEPARATORS 

Aerocomp "DDC" double dens, disk 

conrroller for Mod. I $139 

w/DOSPLUS 3.3D $179 

w/LDOS $229 

Aerocomp "DDS" double dens, dara sep. for 

Percom or LN Doubler $49 

Aerocomp "SDS" single dens, dara sep. for 
Mod. I $29 

MODEL III DRIVES 
Complete kits including 40 track disk drives (1 

sor 2), disk conrroller board, power supply and 

Soil hardware and cables 

One Drive System Kir 

Two Drive Sysrem Kir 

* ODD STUFF 

Single drive power supply $44 

Drive enclosure (silver) $24 

Diskerres (box of 10) $24 

M*S0 ribbons $9 



120 day warranty on drives. Add $5 per drive 
shipping inConr. US. UPS COD charge $1 .50. There is a 
15 day FREE TRIAL ON DRIVES. If nor completely 
sarisfied I'll refund your money (less shipping). I'll 
rake exception ro improper use or mishandling. 



* RADIO SHACK COMPUTERS 

26-1061 Mill, LI. 4K 595 

26-1062 Mill, Lll, 16K 799 

26-1065 Mill, 48K 1 drive 1495 

26-1066 Mill, 48K 2 dr RS232 1950 

26-3004 16K Color Compurer 299 

26-3002 16KCCw/exrended BASIC. ... 399 
26-3003 32K CC w/exrended BASIC. ... 499 



26-3501 PC 1 , (Call abour accessories) 1 29 

26-3601 PC 2, (Coll abour accessories>.....229 

26-4002 64K Mil, 1 -drive 2899 

26-6001 128KM16, 1 -drive 4199 

26-6002 128K M16, 2-drive 4799 

26-6050 DT-1 Terminal 599 

* PERIPHERIALS - Model HHIH6, CC 

32K LNW E/l w/RS232 complete 375 

LNDOUBLER 5/8 w/o DOS 199 

26-1 143 Radio Shock DDen board 125 

26-1 125 Mill Hi Pes coord 299 

26-1 145 Ml PS232 firs rAS E/l 85 

26-1 148 Mill RS232 with coble 89 

26 1 172 DC Modem I 125 

26-1 1 73 DC Modem II 199 

26-1208 CCR-81 Recorder 51 

26-1 130 Mill Hard Disk, primary 2099 

26-1131 Mill Hard Disk, secondary 1599 

26-1 132 Mod I H/D odoprer 32 

16-0230 13" Color TV, remote control. . 353 

26-1 162 Mill 1st drive kir, pure RS. 629 

26-3008 C C Joysricte, pr 21 

26-3022 CC drivel, includes conrroller . . . 449 

26-4104 MII/16 Hi-Pes board 419 

26-4150 MII/16 Hard Disk 8.4Mbyre, pri...3799 
26-4151 MII/16 Hard Disk8.4Mbyre,sec....2899 

26-4160 1 -Drive expansion 938 

26-4161 2-drive expansion 1431 

26-4162 3-drive expansion 1897 

26-4165 1-drive unit 1099 

26-4166 2-drive unit 1699 

26-4167 Thinline add-on drive 535 

26-6010 Mil ro M16 upgrade 1299 

26 601 1 1 28K RAM board 599 

* PRINTERS & OTHER ACCESSORIES 

26-1 158 Daisy Wheel II. 43 cps 1599 

26 1447 RS. Tractor Assy. 208 

26-1448 Sheet Feeder 999 

26-1 165 Line Printer V 160cps 1 195 

26-1455 Acoustic cover 339 

26-1250 DWP-410, 25cps 1207 

26-1459 RS. Tractor Assy 199 

26-1251 DMP-400, 140 cps 969 

26-1252 DMP-500, 220cps 1399 

26-1253 DMP-100, 50cps 309 

26-1254 DMP-200, 120cps 679 

26-1 191 Multi-pen plotter 1650 

26-1 192 CGP-1 15 Color printer 199 

26-1 193 Flatbed plotter 799 

26-1 195 Digirizer 369 

26-1 196 GT-1 16 "X-PAD" 295 

ANADEX DP 9260A 200cps 1449 

PROWRITER 1 , 1 20cps, 1 0" F/T 469 

PROWRITER 2, 1 20cps, 1 5" F/T 669 

STARWRITER F 10, 40cps 1399 

PRINTMASTER F-10. 55cps 1 599 

Rurishauset tractor feed i 208 

Rutishauser sheet feedet 999 

* LNW COMPUTERS 

96K LfW-80 Model I, NTSC/RGB, R5232, 5"/8" 
DDen conrroller, FREE 12" green phospher 
monitor and cable included 1695 



128K LNW-80 Mod II, NTSC/RGB, RS232, CP/AA 
comparible, 5"/8" controller, FREE 1 2" green 
phos monitor/cable included 2495 

* MEDIA &SUPPUES 

8" disks SSDDen, Guaranteed Forever 32 

8" disks DSDDen, Same Guarantee 39 

5" Flipsorr, holds 50 disks 23 

8" Flipsorr, some deal 29 

5" Library Boxes 2.50 

8" Library Boxes 3.50 

5" or 8" Head Cleaning Kir 9 

Trocr paper Irr size, 2900 sheer 20 lb 25 

Call for ribbon G prinrwheel prices. 

* SOFTWARE 

All Radio Shack Software 20% off 

Aron CP/M Model II 160 

Pickles 6 Trout CP/M Model II 160 

Pickles 6- Trout CP/M. Model 16 190 

All SNAPPWARE 10% off 

All MicroPro 35% off 

*TRS-80 SPECIAL EQUIPMENT 

CP/M (481'Q for Mod III w/hordwore and 

software complere 275 

CP/M (64K inc) for Mod III with hardware 

and software 440 

80 x 24 video board for Mod III 299 

GREEN Phospher Anriglare CRT 79 

AMBER Phospher Antiglare CRT 89 

16K Memory 200nsec Guar 1 yr 8/$12 

64K Memory 200nsec Guar 1 yr 8/$48 

ZVM-121 12" Green Phos. Man 135 

ALWAYS CALL FOR THE LATEST PRICES. They may 
have changed in the 60+ days since this ad was 
written. 

ORDER NOW! 
TOLL FREE 
800-527-3582 . 

Wrire or call. Toll free lines are for orders only. 
Texas residenrs call 214/458-1966 and 
deduct $2.00 from your order. If you need 
rechnicol information or service use the Texas 
number. Prices are subject to change without 
notice and are moil order only. I accept VISA 
or MASTERCARD you can send a check or 
money order (allow a couple of weeks for 
personal or company checks ro clear) or 
order COD (cash, certified check or money 
order only). Shipping is nor included unless 
otherwise indicored. Texas orders add 5% rax 
No rax odded on shipments outside Texas. 
Order up - I need rhe money! 
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TRS80 (j Radio Shack are trademarks of Tandy Corp. Copyrighr 1982 TOTAL ACCESS 



TOTAL ACCESS 

P.O. BOX 3002 
RICHARDSON, TX 75080 

214-458-1966 „ 81 

NEXT DAY SHIPMENT on all in stock Merchandise 



sSee List of Advertisers on Page 435 
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Bell Dimension PBX as the 
name for a product service." 
After reading Baxter's let- 
ter, Trienen suggested every- 
one wait until the reorganiza- 
tion plan was filed with the 
department to iron out the 
nettlesome issue. 

Tandy buys 
Data point's 
share of 
disk drive firm 

Tandy Corpo- 
ration has 
bought out 
Datapoint's 
interest in 
Texas Peripherals, a disk 
drive manufacturer owned by 
the two firms. 

According to Electronic 
News, the amount of cash 
Tandy would pay for Data- 
point's 50 percent share in 
Texas Peripherals was un- 
disclosed. 

Tandy and Datapoint told 
EN the buy-out would not af- 
fect the companies' agree- 
ment, announced last June, 
to marry their technology for 
local area networking. The 
weekly said development of 
that service has been ham- 
pered by software problems. 
Texas Peripherals, set up 
in 1980, has been making 
5.25- and 8-inch drives. It has 
325 employees and occupies a 
50,000-square-foot former 
Sears Roebuck retail store in 
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Odessa, TX. 

Garland Asher, Tandy's 
vice president of finance, told 
EN, "We've taken a majority 
of the production of that 
plant since Day One." 

When the agreement was 
inked, he explained, it includ- 
ed procedures for one firm 
buying out the other. 

Asher said Tandy decided 
to buy out Datapoint because 
"We want the production. 
We need the production. It 
makes sense all around." 

He added the deal would 
not affect Tandy's agree- 
ments with other disk drive 
manufacturers. 

In a related matter, Bill 
Meserve, a senior consultant 
for Arthur D. Little Com- 
pany of Cambridge, MA, 
noted partnerships like the 
one between Tandy and 
Datapoint are necessary to 
survive the coming shakeout 
in the microcomputer in- 
dustry. 

When you talk 
to these cash 
registers, 
they talk back 

Supermarket 



HARDWARE 




]M||=S| shoppers in 
" K Lexington, 

MA, don't 
want to talk 
about the Computer Age — 
especially with a computer. A 
Bay State supermarket chain, 
Stop & Shop, hoped to hu- 
manize the checkout lane by 
installing talking cash 
registers. Shoppers weren't 
enamored with the idea. Sur- 
veys indicated shoppers dis- 
liked hearing the price of 
hamburger coming out of 
black box at ear level. 

A frequent complaint of 
shoppers was the machines, 
called Positalkers, created 



high noise levels in the super- 
market. Another gripe was 
the machines' Midwestern 
female voice was cold and 
unpleasant. 

Shoppers also viewed the 
Positalkers as unnecessary 
and they suspected the cost of 
the boxes — $300 each — was 
being passed on to them 
through higher food prices. 
Stop & Shop said that suspi- 



cion was unfounded. 

The chain finally pulled the 
boxes out of the Lexington 
store and returned to the 
cold, hard reality of the sales 
slip. 

National Semiconductor 
Corporation, the California 
manufacturer of Positalker, 
said Stop & Shop is the first 
supermarket in the nation to 
have the machine removed. 
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HOT AIR ATTRACTION. Leading Edge Products 
Inc. of Canton, MA, has joined the fight against cancer 
in children in a big way. One cent from each floppy disk 
it sells goes to the Jimmy Fund, a Boston-based group 
funding programs in cancer research and treatment of 
children with cancer. This hot air balloon was one of 
many attractions at the First Annual Computer Fair 
sponsored by Leading Edge. The proceeds from the fair 
were donated to the Jimmy Fund as well as a check for 
$6,700, the first installment on the Canton firm's one- 
cent campaign. 



Softshell introduces 



MAP 



Information retrieval programs for professionals □ use 
multiple keys, partial information or words to quickly 
search large TRS-DOS* data and text files □ no need to 
code information or establish fixed fields □ Softshell's 
Multiple Access Programs (MAP) use advanced hash cod- 
ing techniques. 

SAMPLE APPLICATIONS: 

Matching Client to Product or Service 

Yourclient needsa house in the $90,000 to $100,000 range 
and requires 4 bedrooms and a den. In a matter of seconds 
you can search your listings for all houses that meet the 
requirements. 

Indexing Private Collections of 
Professional Literature 

Your patient with SLE has a pericardial effusion. You 
remember filing away an article on the cardiac complica- 
tions of autoimmune disease. But what was the title and 
where did you file it? Just type in the words 'autoimmune' 
and 'cardiac' and within seconds find all titles in your 
collection which have these words. 



MAP 



$125.00 



Programs to create, index and search data or text files □ 
interactive help file □ documentation 

MINIMAP $25.00 

Introductory MAP program D instruction manual D expla- 
nation of hash coding techniques used by MAP. 

Programs require 32K, 1 disk; specify Model I, II or III 

Softshell, P.O. Box 18722, Baltimore, MD 21237 

Master Card and Visa accepted "TRS-DOS TM Tandy Corp. 



0000 Q 

An exciting new game from the com- 
pany that is setting the standards. 
Colorful, high scoring, fast action play 
with arcade quality sound effects. 
High resolution, multi-colored charac- 
ters on a black background. Smooth 
accurate joystick control. Demonstra- 
tion mode. Pause feature. 1 or 2 
players. 100% machine language. 
Requires 16K color computer with 
joysticks. 

Cassete— $29.95 Disc— $34.95 

Add $1 .50 for shipping; $3 outside U.S.; 4% tax 
in Mich. VISA, Mastercard or Money order. 
Please allow 2 weeks for checks. 

| DEALER INQUIRIES INVITED 

ifitracolor 

1 COMMUNICATIONS 

SETTING THE STANDARDS 

6048 Horizon Drive, East Lansing, Ml 48823 



TRS 80 Color Computer is TM of Tandy Corp 
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Ready to Run Software 

from Canadian Computer Services. 

Data Management Systems - Including the Data! 

RETRIEVAL SYSTEM 80 

Instantaneous access to all of the articles and 
programs in "the magazine for TRS-80* users': 

Fast Random Access Retrieval 

Super Fast Z80* Index Search and Scan 

Index Search by One to Three Criteria Keys 

Key Reference Help Page, Hardcopy and Sound 

Easy to Use Single Entry Menu Commands 

ARCHIVE RETRIEVAL SYSTEM 

Create and maintain your own magazine archives 
with all of the above great features, plus: 

User Defined Search Keys 

Z80 Data Entry and Edit Routines 

Super Fast In-Memory Key File Sorting 

600/1200 Model l/lll Records Per Data Disk 

READY TO RUN DATA DISKS 

No Typing Necessary 

1980, 1981 and NEW 1982 80 micro* Data Disks 

' Covers Every Article and Program Published 

General and Programmers' Archives Disks 

For Use with Both of the Above Programs 



Retrieval System 80 

Archive Retrieval System 
General Data 80, 81 & 82 
Program Data 80, 81 & 82 



$29.95 

$44.95 

each $29.95 
each $29.95 



For 48K 2 Disk TRS-80 Model I and III Computers 

Mail Orders Rainbow Software Services Ltd. 

7070B Farrell Road Southeast 
Calgary. AB., T2H 0T2 Canada 

Card Orders Action Line 1 (403) 253-6142 

Dealer, distributor and club inquiries welcomed 



CANADIAN COMPUTER SERVICES 



"Trademarks TRS-80 Tandy Corporation - Z80 Znog Inc - 80 



sSee List ol Advertisers on Page 435 
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E-papers 
no threat 
to real papers 

' 'There is no 
clear and 
present dan- 
ger to the 
American 
newspaper industry from 
electronic delivery of infor- 
mation to the home." 

That was one of the find- 
ings in a report on a two-year 
experiment by the Associated 
Press and 1 1 newspapers on 
the CompuServe Informa- 
tion Service (see 80 Micro, 




November 1982, p. 462). 

The report — prepared by 
the AP and RMH Research 
Inc., a Fairlawn, NJ, subsi- 
diary of Harte-Hanks Com- 
municatons — added that any 
danger posed to newspapers 
by electronic information is 
in the future. 

The New Jersey research 
firm found newspapers ac- 
counted for only 5 percent of 
the total usage on Compu- 
Serve. 

Once the novelty wore off 
the experiment, access de- 
clined dramatically. From 
February 1982 to June 1982, 



accesses dropped from 
1,2000 to 136. The average 
access time during that 
period was less than five 
minutes. 

During the last eight mon- 
ths of the experiment, the AP 
reported, one-third of Com- 
puServe's users looked at an 
electronic newspaper once; 
roughly one-fifth looked 
twice. 

A control group of 100 
households accessed the 
e-papers 30 percent more 
than CompuServe regulars — 
called "electros" in the test. 
Members of the control 



households— dubbed "real 
people" — accessed the news 
an average of 6.5 minutes. 

But even for real people, 
the allure of the Network Na- 
tion wasn't news. They spent 
40 percent of their time ac- 
cessing CompuServes CB and 
games. 

Neither group would net a 
news organization a pile of 
money. At going rates, the 
AP said, an electro would 
gross an e-paper 8 cents; a 
real person would gross the 
paper 10.46 cents. 

However, CompuServe 
does have its newspaper ad- 



Anthem for a microcomputer 




When Walt Disney Productions opened 
its Experimental Prototype Community 
of Tomorrow in Lake Buena Vista, FL, 
last October, it gave computerdom some- 
thing it's been lacking for a long time — 
an anthem. 

Visitors entering Epcot's computer center will see Ken 
Jennings — straight from his role in Sweeny Todd as a Pear- 
ly (an early English street entertainer whose suit and hat 
were covered with pearl buttons) — flitting about singing 
"The Computer Song." 

The song was written by Richard B. and Robert B. Sher- 
man, creators of the score for Mary Poppins. Its lyrics go 
like this: 

You see my friends 

the computer 

makes life easier 

saves me time and headaches, too 

He sorts things out 

analyses in a shake 

My enormous problem 

to him's a piece of cake 

He's got a great big memory like an elephant 

utilizes knowledge without end 

That's why I'm a rooter 

for the computer 

Ev'rybody needs a friend 

When my work piles up and I'm seeing red 

'cause I need five arms and an extra head 

I find the computer 

becomes me trouble shooter 

He keeps miles and miles 



of acts on file, 

My wish is his command 

Nothing is astuter, than a computer 

when I need a helping hand. 

Let me explain — They keep on top of 

accomodations 

record and update reservations 

coordinate telephone operations 

and help plan energy conservation 

They're really a great financial device 

payroll service is kept precise 

They project attendance, then give advice 

on personnel, food and merchandise 

They're constantly focusing all their attention 

on matters of safety and fire prevention 

They've given efficiency a new dimension 

with number examples too many to mention 

and that's why I'm a rooter 

for the computer 

Ev'rybody needs a friend 

You see my friends, the computer does the 

drudgery, leaves me free for the better things 

I push some buttons and in 'alf a mo, 

what was a sticky wicket becomes an easy go. 

He's got a great big memory like an elephant 

How he works is hard to comprehend 

Complicated computations take him just a tick 

He coordinates and tabulates and does it 

double quick, and that's why I'm a rooter 

for the computer 

Ev'rybody needs a friend! 

No need to stand, no need to stand 
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□ 



COMPUTER CONNECTION 



New Toll Free Order Number 





Printer Stands 

End the paper mess on 

your computer desk. Our 

printer stand allows your 

paper to be fed from under 

the printer, making room 

for the used paper to stack 

behind the print out of the way. Available with 

an optional removable shelf (Shown) for easy 

computer forms change. Available in Large 

size also, for MX- 100 and other large printer users 

also. Also available with center slot for bottom 

feed printers. 

Regular Stand (300010) $29.95 

Regular w/ shelf (30001 1) $44.95 

Large Stand (300020) $34.95 

Large w/shelf (300021) $49.95 

Large w. slot (300050) $49.95 

Add S2.00 Shipping and Handling 

B.T. Hard Disks 

We want you to have all the power that your TRS- 
TRS-80 is capable, at prices that have other manu- 
facturers cross-eyed! These Five, Ten and Fifteen 
Megabyte units are easy to use, just plug them into 
the expansion buss of your Model I or Model III. 
Comes complete with the fantastic DOS PLUS 4.0 
Operating System! Available in configurations: 
5 Megabyte Fixed, 10 Megabyte, 15 Megabyte 
Fixed. 



SYSTEM PRICING 

5 Megabyte Winchester Fixed Disk 

201505 Model I Version 

203505 Model III Version 

10 Megabyte Winchester Fixed Disk 

201510 Model I Version 

203510 Model III Version 

15 Megabyte Winchested Fixed Disk 

201520 Model I Version 

203520 Model III Version 

Add $10.00 shipping and handling 



$2399.95 
S2399.95 

$2549.95 
$2549.95 

$2699.95 
$2699.95 



□ 4x5 Model III 



We are now delivering the most powerful TRS- 
80 ever built! A TRS-80 Model III with a 
Tandon double sided drive. Holmes 4 MHZ 
speed up, Langley St Clair Amber non glare 
tube. 5, 10 or 15 megabyte Miniscribe hard drive 
and the fantastic Dos plus 4.0 Operating System. 



203805 5 megabyte III 
203810 10 megabyte III 
203815 15 megabyte III 



$3995.00 
$4145.00 
$4295.00 



□ 




Upgrade Kit 

Putting Disk drives into your TRS-80 Model III 
will turn it into the powerful computer it was 
designed to be. The B.T. Enterprises DISK 
DRIVE INSTALLATION KIT is easy to do and 
represents a substantial savings over the cost if 
done by Radio Shack. 

The kit was designed to be installed by a non- 
technical person, and takes an average of 45 to 75 
minutes to complete. The only tools necessary are a 
phillips and flat head screw driver and a pair of 
diagonal cutters. No cutting of traces or soldering 
is necessary. 

KIT CONSISTS OF: 

• The NEW HOLMES Controller Board 
assembled & tested 

• Switching power supply 

• Disk drive mounting brackets 

• All cables and hardware 

• Instructions with diagrams 

• Drives are optional 

♦Controller Board supports 8 inch external drives 
and extended density 5-V 4 inch drives (dual headed 
and 80 track) 

203103 Disk Upgrade Kit $279.95 

203113 Disk Upgrade w/2 40tk&32K $799.95 

2031 15 Disk Upgrade w/2 40tk DH 

& 32K $1029.95 

203116 Disk Upgrade w/2 80tk & 32K $1029.95 

203117 Disk Upgrade w/2 80tk DH 

&32K $1229.95 

203003 Controller Board only $139.95 

200500 Switching Power Supply 

(3 voltages) $99.95 

203010 Controller Assembly Kit $75.00 

203510 Controller Assembly Kit 

w/ power Supply $174.95 

DH — Dual Headed 
Add $2.00 Shipping and Handling 




Shipping and Handling Call 
TRS-80 is a Trademark of the Tandy Corp. 



| B. T. Enterprises 
10B Carlough Road 
Bohemia, N.Y. 11716 
516 567 8155 (voice) 
fS&Jl 5J6 588 5836 (modem) 

B.T. Enterprises is a division of Bi-Tech Enterprises Inc 



Dealer Inquires Welcome 
Prices Subject to change 
N. Y.S. Residents Add Tax 



New Toll Free Lines for 



orders 
800 645 1165 
WELCOME 



Mo^ 


VfSA 




DINERS CLUB 
INTERNATIONAL 



^See List of Advertisers on Page 435 
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diets. The AP noted, "In an 
already demographically odd 
group of current custom- 
ers. . .one out of 10 is odder 
still: a newspaper junkie, 
even though the fix is elec- 
tronic." 

Little tailoring for the elec- 
tronic medium was done by 
the experimenters, RMH ob- 
served. That's something 
CompuServe hopes to ad- 
dress in its future news 
efforts. 

The information utility's 
senior vice president, George 
Mi not, told Editor & Pub- 
lisher the test has led Compu- 
Serve to start building a news 
component to its service. 

The news model, he said, 
will be "fully interactive ac- 
cording to customer needs" 
and will allow a customer to 
create a news file of his own 
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design. Users will instruct the 
system to collect news stories 
on specific subjects and call 
them up on demand. 

CompuServe news will be 
tailored to a videotext sys- 
tem, Minot said, and present- 
ed in "capsule" form. He 
added, "Videotext customers 
want and are willing to pay 
for up to the minute news." 

Prez scoffs 
at shortage 
of programmers 

Shortage of 
programmers? 
Not according 
to the presi- 
dent of Pan- 
sophic Systems Inc. 

David Eskra, speaking at a 
software exposition in 
Chicago, called the highly 





trumpeted programmer 
shortage "a sham." 

The real problem, he re- 
portedly said, is gaining ac- 
cess to that "ton of data that 
has the potential to solve all 
kinds of business problems." 

New mag on 
portable micros 

Portable com- 
puters will be 
the focus of a 
magazine 
scheduled for 
publication next month. 

According to a statement 
from publisher Marshall W. 
Freeman, the new bimonthly 
will be totally devoted to 
developments and applica- 
tions of the new wave of por- 
table computers. 

Many people need port- 
ability for their daily needs, 
the statement said. Portable 
Computer will focus on port- 
able products and how to use 
them. Articles will be geared 
to the non-technical user. 

Applications stories will 
review uses of portable com- 
puters in big business, small 
business, and in the home — 
except for games. 

Circulation is "guaran- 
teed" at 20,000, Freeman 
said. It will be distributed on 
a paid and controlled circu- 
lation basis. Subscription 
price for the magazine is 
$12.50. 

Portable Computer will be 
published by Miller Freeman 
publications. The San Fran- 
cisco, CA, firm publishes 10 
business magazines and six 
newsletters. The 80-year-old 
enterprises has offices in New 
York, Chicago, Atlanta, 
Portland, London and 
Brussels. 

The editor of the new 
publication is Stephen J. 
Schneiderman. 




Guide 

to software 

writers' markets 



Eric Balkan, 
editor of Soft- 
ware Wanted: 
How and 
Where to Sell 
Your Program, has an- 
nounced the release of the 
1982-83 version of his guide 
to software markets. 

Referring to an article on 
CompuServe's Software Au- 
thor's special interest group 
(80 Micro, November 1982, 
p. 470), Balkan lamented, "I 
was pained to read that there 
is no neatly bound directory 
of writers' markets for mi- 
crocomputer programmers." 

He said he publishes such a 
reference book. The 1981-82 
edition contained 75 listings. 
This year's will contain more 
than 140. The listings include 
information on royalties paid 
by publishers, programs 
needed by software houses, 
and tips on what to look for 
before signing a contract. 

His book was favorably re- 
viewed in Creative Comput- 
ing in May 1982, he wrote. 

For more than a year, 
Balkan has provided infor- 
mation on CompuServe for 
The Micro Advisor and In- 
formation News and Views. 
"I have yet to see any kind of 
decent money," he said. "I 
get a 12 percent royalty — 
which comes out to a penny a 
minute per user. That results 
in about $70 a month. With 
that kind of remuneration, it 
doesn't pay to update the 
data bases very often." 

Software Wanted costs $25 
and is available from Battery 
Lane Publications, PO Box 
30214, Bethesda, MD 20814. 



I 



NFLO INC. 



P*e4e*U 




2 MEGABYTES DISK STORAGE 

$1 ,000.00 



INFLO 2 MEG SYSTEM FOR TRS-80, LNW, or PMC 80 



$1000.00 



THE INFLO 3.2 MEGABYTE HIGH SPEED SYSTEM FOR: 



TRS 80 MOD I or III or PMC 80 
Late LNW 80 or LNW Model II 



NEW PRICING 



LNW Model II 



$1550.00 
$1300.00 

$1995.00 



FULL LINE OF LNW PRODUCTS AND SOFTWARE 

CHARM $39.95 

AUTOPLOT/LNW $99.50 

LNWBASIC $69.95 

HIRES 1&2 $20.00 



LA (504) 293-3400 

NJ (201) 751-8444 

FL (305) 443-7749 



CALL YOUR LOCAL DEALER 

MA (413) 583-6383 

DC (703) 527-9060 

NY (516)924-9229 



IL (312) 782-5300 

Wl (414) 261-1780 

OR (503) 232-5552 



THE LNW USERS GROUP BI-MONTHLY NEWSLETTER IS NOW IN CIRCULATION; 
FOR MORE INFO ON THIS GROUP CALL THE LNW BBS (516) 924-8115 



LNW is a trademark of 
LNW Research Corp. 



TRS-80 is a trademark of 
Tandy Corp. 



Inflo Inc. 

244 Mill Rd. 
Yaphank, NY 11980 

(516) 924-9229 
Dealers inquiries invited 



B8S Number is for Modem use only 




sSee List of Advertisers on Page 435 
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Big Blue to be 
lion of desktop 
market by 1986 

The Big Blue 
will dominate 
the desktop 
computer 
market by 
1986, according to the presi- 
dent of the Yankee Group, a 
Boston, MA, consulting 
group. 

Howard Anderson, in a re- 
port appearing in Computer- 
world, predicted Internation- 
al Business Machines would 
corner 19.2 percent of the 
desktop market by mid- 
decade. 

Ways he said IBM would 
persuade 4 million users to 
buy its micros included mar- 
keting its Personal Computer 
through Sears Roebuck and 
Company and pumping $1.6 
billion into R&D for the PC. 

The Big Blue will also keep 
the competition reeling, he 
said, with a new product an- 
nouncement every month. 

Apple would lose its front 
spot in the market by failing 
to introduce new products, 
he contended. 

Both Apple and Tandy 
would be hurt by IBM using 
the PC under the firm's Sys- 
tems Network Architecture. 
He explained it is difficult to 
connect foreign equipment to 
an IBM network. 

Pricing will be another fac- 
tor in IBM's dominance. An- 
derson said the enterprise 
would peg its prices to 115 
percent of the lowest prices in 
the market. 

"IBM is turning into a 
must carry for retail outlets," 
he observed. He added other 
vendors may find themselves 
paying for shelf space in re- 
tail stores and losing profits 
392 • 80 Micro, January 1983 




TEACHING WITH TRON Walt Disney Educa- 
tional Media Company has released a 16mm film, 
Computers: The Friendly Invasion, introducing stu- 
dents to computers. Not only can youngsters see 
how man is building a better world with computers, 
but they can also see some dazzling computer 
graphics from TRON. The 19.5 minute movie for 
grades 5 to 12 can be ordered from WDEMC, 500 
South Buena Vista St., Burbank, CA 91521. 



as a result. 

In a related matter, Yan- 
kee released a report predict- 
ing what the home computer 
market will look like when 
the smoke clears in 1982. 

The U.S. market for the 
micros will have increased 
400 percent, to 1.76 million 
units worth more than $1 bil- 
lion, the report said. In 1981, 
it noted, 340,000 unit worth 
$395 million were sold. 

Yankee maintains sales of 
micros in the $200 to $500 
and under $200 range will 
continue to increase. Sales of 
micros over $500 will decline, 



it added. 

The report predicted $200 
to $500 computers will have 
53 percent of the home mar- 
ket in 1982 and 1983, the 
under $200 micros 29 percent 
in 1982 and 34 percent in 
1983. Over $500 computers' 
market share will drop from 
18 percent in 1982 to 13 per- 
cent in 1983. 

In the top spot of the $200 
to $500 group, Yankee for- 
casted a shift from Atari to 
Commodore or Texas Instru- 
ments. But it said Atari will 
bounce back in 1983, once it 
increases its production facil- 




ities. 

In 1981, Atari had 44 per- 
cent of the $200 to $500 mar- 
ket, Tandy 30 percent, TI 16 
percent and Commodore 10 
percent. 

Generic R2D2 

"The first 
manufactured 
intelligent ro- 
bot for the 
home experi- 
menter," the RB5X, has been 
announced by RB Robot Cor- 
poration of Golden, Co. (For 
related story, see 80 Micro 
August 1982, p. 330.) 

Looking like a generic 
R2D2 and priced at $1 195, the 
robot uses an INS 8073 micro- 
processor and a ring of "tac- 
tile sensors" (bumpers) to 
learn from its experience, de- 
tecting and responding to 
obstacles in its path. Once a 
random response proves suc- 
cessful, the droid remembers 
and repeats it when confront- 
ed with the same situation. 

In the climax of its reper- 
toire, the robot recharges its 
own batteries, sensing when 
the eight "C" and four "D" 
cells are low, finding its charg- 
er, and detaching itself when 
ready to roll again. 

An RS-232 interface lets 
users transfer its memory to a 
microcomputer to study 
memory patterns and alter 
programs. The robot comes 
with three self-learning pro- 
grams stored in 8K of RAM, 
(a $295 option package adds 
16K), a Polaroid sonar sensor, 
blinking lights. Its manufac- 
turer promises game and 
equipment software and sev- 
eral more options in the near 
future, including a mechanical 
arm and a voice synthesizer. 

Sales of between 300 and 
1,000 units are forecast for 
the last quarter of 1982. 
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STOCK MARKET COMPUTER 
SOFTWARE 

Now available — 34 programs from the book 
NEW USES FOR THE HOME COMPUTER IN THE STOCK MARKET 

The book has won praise through the world and has been pur- 
chased in over 40 countries. 

The author has had 20 years experience as a stock broker and con- 
ducted eight years of computer research developing these 34 
programs. Especially valuable to stock or commodity traders. 

Available on disks or tapes for TRS-80. Model I Level II and 
Model III Price $49.95 

Also Available 
Market Average Package. Contains weekly prices going back over 
90 years. Also included are 5 utility programs. Price is $29.95. In- 
valuable for cycle research. Send check to: 
Thomas V. Lenz, Dept. M 
596 W. Karval Ct. - Spring Creek 
Elko, Nevada 89801 
(overseas, U.S.A. Dollar International Money Order or a Draft 
payable on a U.S.A. Bank) 

State whether you want disk or cassette 



MOVING? 

Let us know 8 weeks in advance so that you won't miss a 

single issue of 80 Micro. 

Attach old label where indicated and print new address in 

space provided. Also include your mailing label whenever 

you write concerning your subscription. It helps us serve 

you promptly. 

D Extend my subscription one additional year for only 

$24.97. 
□ Payment enclosed DBill me 

Canadian and Mexican $27.97 1 year only US funds. Foreign $44.97 1 year only US 
funds, drawn on US bank. Please allow 6-8 weeks for delivery 



80 MICRO 



If you have no label handy, print OLD address here. 

—i 

Uj 

°Q Name 

< ' 



>< Address 
<. City 



State. 



Zip. 



print NEW address here. 



Name. 



S 

S Address 



City. 



State. 



Zip 



P.O. Box 981 • Farmingdale NY 11737 



RIBBONS 

Low Price • FREE Shipping 

SATISFACTION GUARANTEED 

MX-80 Cartridge 



1-2 



price each in quantity of 
3-5 6-11 12-23 



24-47 



8.95 8.41 7.90 7.43 6.99 

RIBBON LOOPS 

new ribbon for your old cartridge 

top quality nylon • standard matrix ink 

price each in quantity of 



MX-70/ MX-80 
MX-100 double length 
NEC Spinwriter Nylon 
Radio Shack 26-1418 



1-2 

3.95 
7.86 
2.92 
2.26 



3-5 

3.63 
7.23 
2.69 
2.08 



6-11 

3.34 
6.65 
2.47 
1.91 



12-23 24-47 

3.08 2.83 
6.12 5.63 
2.27 2.09 
1.76 1.62 



Loops are available in blue or black ink (same price). 
You may mix any combination for quantity price breaks. 
Ribbon loops include DO-IT-YOURSELF INSTRUCTIONS. 
Florida residents add 5% sales tax • Ask for Free catalog 

VISA DATA SYST EMS MasterCard V 99 

(305) 788-2145 • Box 99 • Fern Park, FL 32730 




ONLY 

*69.95 

n The Magnificent 
WORD PROCESSING SYSTEM 

For the TRS-80 Model I and III 



Written in fast Z80 machine language. 
Single key control of all editing functions for ease 
of use. 

Dynamic display of word count, line count, and free 
memory count. 

Superscripts, subscripts, underlined, bolded. ex- 
panded and condensed type styles - combine and 
intermix within a line. 

Automatically justifies and word-wraps on the screen 
as you type 

Search, Replace, and Global Search and Replace. 
Odd and even page user-definable headers, footers, 
and page number lines. 

User-definable linespacing. sheet size. top. left, and 
bottom margins. 

Move blocks of text from disk, to disk, and within 
the text. 

Examine disk directory on any disk and kill flies 
while editing. 
Full screen editing of EDTASM and BASIC text files. 



Auto 



nbenng for EDTASM and BASIC 



;n function. 

ts text, inserts headers, num- 

\e screen without printing il 



1 Print contents of sc 
* Print previewing fori 

bers pages, etc. on 

on paper. 
1 Page by page pausing capability for sheet fed 

printers 

Supports both parallel and serial printers. 

Printer control code access. 

Supports proportional space justifying on 

Centronics 737. 739. Line Printer IV. Daisy Wheel II 

Diablo. Oume. Starwnter. Spinwriter. C. Itoh 

Prowriler. NEC PC-8023A-C. TEC 8500R. 

Also supports special functions of Microhne. MX-80 

MX-100. and Grattrax Plus 

Any character or symbol your printer can print is 

accessable with the Special Character feature 
1 Works with NEWDOS, NEWDOS80. TRSDOS. 

LDOS. and DOSPLUS - Single or Double Density 



GUARANTEE 



Many word processing systems claim theirs are the best, but few would 
dare to guarantee them. Not us! We are confident that ZORLOF is the 
most useful word processing system on the market for under $200.00. 
If you don't agree, return it within 30 days for a full refund. 



CAU. (305) 259-9397 

Add $2.00 shipping & handling. Florida residents add 5% sales tax. Checks require 3 weeks to clear banks. 



ANITEK SOFTWARE PRODUCTS a P O. BOX 1 136 D MELBOURNE, FL. 32935 □ (305)259-9397 



-See List of Advertisers on Page 435 
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readers 1 choice 



The votes are in and counted. May 
we have the envelope, please? 

Our first Readers' Choice ballot- 
ing was, to say the least, an interest- 
ing experience. Naturally, we 
learned which software our readers 
consider to be numero uno. We also 
learned that it's impossible to in- 
clude all of the software available 
for the TRS-80, as evidenced by the 
large number of write-ins. And fi- 
nally, we picked up some tips on 
how we can improve the Readers' 
Choice Awards this year. 

As for the results, we found few 
surprises. Several write-ins made it 
to the final list, most notably Visi- 
Calc. Radio Shack led the way with 
most winners — 22 in all. Eleven of 
those finished first. It seems that de- 
spite the vast support industry that 





has grown around the TRS-80, 
Radio Shack is still a primary source 
of software. 

Generally, what you see here are 
the three top finishers in each cate- 
gory. The exceptions are when there 
were ties (such as for Model I/III 
games) or not enough entries to war- 
rant publishing more than the top 



one or two (e.g., Color Computer 
graphics, Model II accounting). 

In most categories, the votes were 
spread over a large number of pack- 
ages. In only four categories did one 
entry get more than 50 percent of the 
votes— Model I/III DOSes (NEW- 
DOS80), Model I/III Business (Visi- 
Calc), Model II Business (VisiCalc 
again), and Color Computer DOSes 
(TRSDOS). 

In terms of sheer numbers, the 
top three overall were Model I/III 
NEWDOS80, Model I/III Scripsit, 
and Model I/III VisiCalc. 

We'd like to thank the many 
readers who took the time to fill out 
and send in ballots (not to mention 
tear a page from their 80 Micros). 
Keep those pencils sharpened for 
this year's balloting. ■ 



Model I/III 

Accounting 

1 . Accounts Payable System (RS) 

2. General Ledger (RS) (write-in) 

3. Accounts Receivable, Invoices (Tar- 
anto & Assoc. Inc.) 

Versa Ledger (Computronics) 

Business 

1 . VisiCalc (VisiCorp) (write-in) 

2. Budget Management (RS) 

3. Easy Calc (Instant Software) 

Data-Base Management 

1. Maxi Manager (Adventure Interna- 
tional) 

2. Aids-Ill (Meta Tech) 

Profile III Plus (RS, small Computer 
Co.) 

Data Communications 

1. ST80 (Small Business Systems) 

2. Modem 80 (Alternate Source) 

3. Omniterm (Lindbergh) 

Disk Operating Systems 

1. NEWDOS80 (Apparat) 

2. DOSPLUS (Micro Systems) 

3. TRSDOS (RS) 



Education 

1 . Typing Teacher (Instant Software) 

2. Typing Tutor (Microsoft) (write-in) 

3. K-8 Math with Student Management 
(RS) 

Games 

1 . Scarfman (Cornsoft Group) 

2. Eliminator (Adventure Interna- 
tional) 

3. Sargon II (chess) (Hayden) 

Star Fighter (Adventure Interna- 
tional) 

Spelling Checkers 

1 . Electric Webster (Cornucopia) 

2. Scripsit Dictionary (RS) 

3. Chextext (Apparat) 

Utilities 

1. Super Utility Plus (Breeze/QSD) 

2. EDTASM (RS) 

3. Tasmon (Alternate Source) 

Word Processing 

1. Scripsit System I/III (RS) 

2. Newscript (Prosoft) 

3. Lazy Writer (Soft Sector) 



Color Computer 

Business 

1. Spectaculator (RS) 

2. Personal Finance (RS) 

3. Stock Portfolio Management (MPP 
Graphics) 

Data Communications 

1. SuperColor Terminal (Nelson Soft- 
ware) 

2. Colorcom/E (Eigen Systems) 
(write-in) 

Disk Operating Systems 

1. TRSDOS (RS) 

2. CCMD + 9(Cer-comp) 

3. Flex (Frank Hogg Laboratory Inc.) 
(write-in) 

Education 

1. Typing Tutor (RS) 

2. Geography Pack (Spectral Assoc.) 

3. Math Tutor (Custom Software Engi- 
neering) 

Spelling Tutor (Custom Software 
Engineering) 
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For fast relief 

Take DOSPLUS 3.4 
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Do you have that tired 
dragged out feeling 
known as "DOS Drag" 
from an operating system 
that is just too slow? Do 
you have "Computis 
Interruptous" because 
you spend more time 
with your DOS manual 
than you do at your com- 
puter? Has an undepend- 
able DOS got you down 
with the inadvertent "Dumps" 

Then you need DOSPLUS 3.4. 
DOSPLUS 3.4 contains all the active 
ingredients for a quick recovery. Dependable fast 
action features like instant boot-up, BASIC array sort 
(multi-key multi-array), Tape/ Disk- Disk/Tape utility 
(with program relocator), Input ©(controlled screen 
input from BASIC), and complete disk editing 
features including random access file editing and 
ASCII modification on sector dump utility. 

And who wouldn't feel better with proven fea- 
tures like the ability to use a "DO" (command 
chaining) file from within a BASIC program, 
and more reliable BACKUP and FORMAT utilities. 




In addition, you have the 

convenience of repeating 

the last DOS command 

with "/" <ENTER>, a 

single file convert from 

Model III TRSDOS, file 

directory supported for 

Model III TRSDOS disks, 

complete device routing 

supported with FORCE and 

JOIN, and the ability to read or 

create 40 track disks in 80 track 

Plus many other time and effort 

atures. 



Of course, in order for a prescription to work, 
you've got to follow instructions — in this case 
the instructions are contained in the new 
easy to use easy to follow 240 page DOSPLUS 
users guide with system technical reference section. 
So, if you're experiencing any DOS 
related discomfort, get instant relief. $*| J\ C^95 



Get DOSPLUS 3.4 



MZ*Z 




MICRO SYSTEMS 
SOFTWARE, INC. 

5846 Funston Street • Hollywood. FL 33023 



DOSPLUS 

First in the Industry backed by a lifetime warranty. 

fHiitciHo rvf Pla \ FOR v«a/mastercharge/c.o.o. orders 
^vuisiuc ui r ia.f toll free unes will accept orders onlyi 

CALL TOLL FREE ^w Apptocations and Technical Information. 



1-800-327-8724 



call (305) 963-3390 or drop us a card. 

Dealers inquiries Invited 
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Games 

1. Color Pak Attack (The Micro 
Works) 

2. Color Berserk (Mark Data) 

3. Ghost Gobbler (Spectral Associates) 

Graphics 

1. MPP (MPP Graphics) (write-in) 

Utilities 

1. EDTASM+ (RS) (write-in) 

2. CBUG (Micro Worker) 

3. CCEAD (Eigen Systems) 
Sigmon (Data Soft) 

Editor /Assembler (Microworks) 

Word Processing 

1 . Telewriter (Cognitec) 

2. Color Scripsit (RS) 

3. Super Color Writer II (Nelson Soft- 
ware) 

Model n 

Accounting 

1 . Accounts Receivable (RS) 



2. Accounts Receivable, Balance For- 
ward (Taranto & Assoc.) 

Business 

1. VisiCalc (VisiCorp) 

2. Aids-Ill (Meta Tech.) 

3. Inventory Control System (RS) 
Market Tracker (H & H Trading) 
SuperCalc (Sorcim) (write-in) 

Data-Base Management 

1. Profile II (RS) 

2. Database Management (Inst, for Sci- 
entific Anal.) 

3. Aids-Ill (Meta Tech.) 

Data Communications 

1. Model II Videotex (RS) 

2. Binary Synchronous Communica- 
tions (RS) 

3. Smart Terminal (Small Business Sys- 
tems) 

Disk Operating Systems 

1. TRSDOS(RS) 

2. CP/M (Digital Research) 



Education 

1 . Microtyping (Hayden) 

Games 

1. Sargon II (Hayden) 

2. Hypergate (Synware) 

Medical 

1. Medical Office Systems (Windham 
Software) 

2. FMS 80 (Micro/Sys 80) 

3. Medical Office Management 
(Charles Mann & Assoc.) 

Utilities 

1. Development Package (Racet Com- 
putes) 

2. Extended Built-in Functions (Snapp- 
ware) 

3. RSMII (Small Systems Software) 

Word Processing 

1. Scripsit 2.0 (RS) 

2. WordStar (Micro Pro) 

3. Electric Pencil (IJG) 




When six bedraggled editors 
get together to discuss soft- 
ware, you never know what's go- 
ing to happen. And so it was when 
our ad hoc panel made its first 
selections for the 80 Micro Hall 
of Fame. 

The debate was lively, not only 
over the 12 packages that were 
nominated, but over the criteria 
for the honor. What features must 
a piece of software have before it 
can be considered one of the elite, 
one of the all-time greats? Mass 
appeal? Industry impact? Excep- 
tional quality? 

The answer was "all of the 
above" — with qualifications. 

Some of us felt, for instance, 
that a program might deserve con- 



sideration because it blazed trails 
or set trends in the TRS-80 world, 
even if it no longer was considered 
the best of its kind. Others felt that 
we had to consider extremely 
popular programs that, while they 
might not embody the highest level 
of quality or originality, are de- 
pendable and useful workhorses. 

The process was further com- 
plicated by the fact that we agreed 
to operate by consensus — that is, 
everyone at the table had to say yes 
to a product before we inducted it. 

We ended up with the five you 
see below. 

Electric Pencil (IJG) 

Electric Pencil caused quite a bit of 
debate, as one could expect from a 



group of Scripsit users. We agreed 
that better word processors might be 
available (although that's largely a 
matter of personal preference and 
need), and that EP is not the most 
popular word processor on the 
market. But we also reached the con- 
clusion that no word processor has 
had the impact that EP did when it 
first debuted in 1976. It demonstrated 
conclusively that a TRS-80 could be 
used for serious word processing, and 
was the model for later word pro- 
cessors. 

EP was a problem child for author 
Michael Shrayer at first, with 68 dif- 
ferent versions for different machines, 
drivers, printers, and so on. Version 
2.0, coauthored by IJG President 
Harvard Pennington, appeared in 
February of 1982. Pennington says 
over 50,000 copies — perhaps 
5,000-7,000 of them actually 
bought — are in use. 

"We felt it was a landmark piece of 
software, and it has fulfilled its expec- 
tations," says Pennington. "To some 
extent, all microcomputer word 
processors owe their success to Elec- 
tric Pencil." 

Scripsit (Radio Shack) 

In the early stages of the selection 
process, a lively debate grew between 
champions of Electric Pencil and sup- 
porters of Scripsit. But it finally oc- 
curred to us that one did not necessari- 
ly have to be chosen to the exclusion of 
the other, simply because they were 
both word processors. And so Scripsit 
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Daisy wheel quali^r" 
without daisy wheel expense. 

You need the quality print that a daisy wheel printer provides but the thought 
of buying one makes your wallet wilt. Selectric™ Interface, a step-by-step guide to 
interfacing an IBM Selectric I/O Writer to your microcomputer, will give you 
that quality at a fraction of the price. George Young, co-author of Microcom- 
puting magazine's popular "Kilobaud Klassroom" series, offers a low-cost alter- 
native to buying a daisy wheel printer. 
Selectric Interface includes: 

♦ step-by-step instructions 

♦ tips on purchasing a used Selectric 

♦ information on various Selectric models, in- 
cluding the 2740, 2980, and Dura 1041 

♦ driver software for Z80, 8080, and 6502 chips 

♦ tips on interfacing techniques I 

With Selectric Interface and some background in electronics, you can have a high- 
quality, low-cost, letter-quality printer. Petals not included. 



ISBN 0-88006-051-4 128 pages $12.97 

Credit card orders call TOLL-FREE 
1-800-258-5473. Or mail your order with 
payment plus $1.50 shipping and han- 
dling to: Wayne Green Inc. Attn: Retail 
Book Sales, Peterborough, NH 03458. 
Dealer inquiries invited. 

A Wayne Green Publication 



□ Yes, I want Selectric Interface. Enclosed is $12.97 (BK7388) per 
copy plus $1.50 for shipping and handling. 
~1 MASTER 1 DVISA 



□ AMEX 



Card § 



Expires. 



Signature 
Name 



Address 
City - 



State and Zip 



A Wayne Green Publication! 

All orders shipped UPS if complete street address is given. 



became a member of the 80 Micro Hall 
of Fame. 

Scripsit was not the first word pro- 
cessor, but it certainly has become the 
overwhelming choice of TRS-80 
owners, and is the one to which all new 
entries are compared. It's now one of 
Radio Shack's best-selling programs. 
We chose Scripsit largely because of 
this universality. This popularity is 
reflected in the fact that Scripsit is 
modified by our readers far more than 
any other program 

Scripsit was introduced in 1979. It 
received more in-house testing than 
most other Radio Shack programs, 
says Ed Juge, director of computer 
merchandising, because it was a pro- 
gram nearly everyone would use. 

"It took off beautifully; it's been 
good to us," he says. "I think 
everyone has liked it in general." 

Microsoft Basic (Microsoft) 

Microsoft Basic was far and away 
the most obvious choice for the Hall 
of Fame. Hardly a TRS-80 owner lives 
who has not had some contact with this 
workhorse. Because it was an interpret- 




TEACH YOUR 
CHILDREN 



ALPHA— Our best seller. Enhanced with larger letters 
and three excercises. Alphabet recognition for pre- 
schoolers. 



ALPHA II— More alphabet excercises. Find the dupli- 
cate letters; letters before and after; put in alpha- 
betical order. 



SIGMA— Addition problems for grades 1-3. 

SIGMA-EX— Addition problems for the younger or 
slower learner. 

SIGMA-82— Addition, subtraction, multiplication and 
division. Nine speed levels. Time left and total time 
constantly displayed. 

SPE-L— Spelling practice for grades 2-4. 



Learning to Count Money— A THREE PROGRAM 
SYSTEM THAT TEACHES THE IMPORTANT SKILL OF 
COUNTING MONEY. SUPERIOR GRAPHICS. (SOLD 
BY THE SET ONLY.) 



Available on cassette only for TRS-80 Models I and III 
$6.95 each, two for $12.00, four for $21.00 Learning to 
Count Money— $19.95 



Add $1.00 to total order for first class shipment. 

^188 
Mercer System* Inc 



87 Scooter Lane 
Hlcktvllle. N.Y. I 1801 



ed language, it made editing and 
debugging a relative snap, and thus 
changed the face of microcomputer 
programming. 

Microsoft Basic has been with 
microcomputers since the beginning, 
debuting on the Altair in 1975. 

"We thought that micros could 
become pretty popular, and we 
wanted a language that was easy to use 
and that didn't have a lot of steps," 
says Bill Gates, Microsoft's executive 
vice president. Basic seemed like a 
good choice, so Microsoft wrote a ver- 
sion that would be appropriate to the 
microcomputer environment." 

From the 4K models of those days, 
MBasic has grown to include graphics 
and other extensions. In the future, 
nonkeyboard input and even more 
graphics and business applications 
are likely. 

"I think Microsoft Basic is running 
on more machines than any program 
around, and in some ways people take 
Basic for granted," says Gates. "I'm 
glad to see it getting recognition. If 
people still had to use machine 
language, it would be pretty bad." 

How does Microsoft's position in 
the marketplace look? 

"We are so dominant in Basic that I 
see us holding our position in that 
language," says Gates. 

NEWDOS (Apparat) 

"I feel like I just had a baby," 
Jason Matthews, manager of software 
research and development, said when 
we told him that NEWDOS had been 
elected to our Hall of Fame. 

We chose NEWDOS because, as 
one of our panel said, "It wasn't the 
first DOS, but it was the first really 
usable one." Also, as our Readers' 
Choice results show, it has become the 
most popular. 

NEWDOS was originally released 
in 1978 as a 35-track Model I DOS, 
written because TRSDOS 2.1 didn't 
function as most people expected an 
operating system to function. 
NEWDOS Plus upgraded the original, 
and added the Superzap utility. 
NEWDOS80 was introduced when the 
Model III began to supplant the 
Model I. 

In the future, Apparat hopes to 
adapt NEWDOS for hard disks, as 
soon as the market indicates which 
one to support. 

Creator and still sole author is 
"Sam Jones," who wishes to keep his 
privacy and avoid being swamped by 



phone calls. 

"But I'll call him as soon as we 
hang up, and I can guarantee you'll 
hear the 'Whoopee' clear out in New 
Hampshire," Matthews said. 

Adventure (Microsoft), 
Adventureland 
(Adventure International) 

This created the most controversy 
on our panel, for two reasons. First, 
the original adventure games were on 
mainframes, and the TRS-80 versions 
were derivatives. Second, the word 
"adventure" refers more to a genre 
than to a specific program. 

But there can be no doubt about the 
impact adventure games have had on 
the TRS-80 world. They are often 
among the first programs novices use 
and beginning programmers write. In 
addition, they have also provided 
many computerphobes with a painless 
and pleasurable introduction to 
computers. 

The origins of adventure games 
seem to be shrouded in the mists of 
computer lore. Adventure experts 
agree that they've been played on 
mainframes for years, but they took 
several paths to reach the land of the 
micros. But here's what several phone 
calls produced: 

The progenitor of the adventure 
games was a mainframe adventure 
called Colossal Caves, written by 
William Crowther and Don Woods in 
the mid-70s on a DEC PDP. The first 
TRS-80 adventure, said Adventure In- 
ternational president Scott Adams, 
was his Adventureland, inspired by, 
but not based on, Colossal Caves. 
Adventureland came out in the sum- 
mer of 1978, about six months before 
AI officially set up shop. 

Meanwhile, Gordon Letwin, then 
with Heath and author of HDOS, was 
working on Adventure, completing it 
in 1979. Letwin said he took his game 
directly from the mainframe version 
(though he knew it not as Colossal 
Caves but as Adventure). 

"We supported all the esoteric fea- 
tures, and even some of the original 
bugs, of the first version," he said. 

He finally marketed the game 
through Microsoft, for whom he is 
now working. 

At first, we didn't know whether to 
give our award to Adventure or 
Adventureland. We finally concluded 
that both deserved it equally, and have 
thus ushered them into the Hall of 
Fame as a tandem. ■ 
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IT 



• provides you with more information on your TRS-80* than any other single source 

• gives you 20-30 programs in each issue 

• reviews equipment and software so you know what or what not to buy 

• gives you the truth about the TRS-80 — its good points and its limitations (80 Micro is 
not affiliated with Tandy) 

• lets you save money — lots of it — by comparison shopping within the ad pages 

• clues you in on how other TRS-80 owners are using and updating their systems 

• tells you what's really happening in the industry 

• brings you Wayne Green's outspoken and often controversial editorials every month 

• and best of all it gives you a no risk subscription offer — 



Subscribe today— if you are not satisfied with the first issue— write "cancel" across your invoice and send it back. The 80 Micro is yours to keep. 



r 



YES ... I WANT 80 MICRO 



□ Check enclosed for $24.97 

Bill my □ AE DMC □ VISA □ Bill me 

Name 



Address 
City _ 



.State. 



Card# 



.Expire Date 



L 



Signature 




.Interbank/?. 



Canada and Mexico $27.97, one year only, US funds. Foreign $44.97, one year only, US funds, DRAWN ON US BANK ONLY 



80 Micro • PO Box 981 • Farmingdale, N.Y. 11737 
*TRS-80 is a trademark of the Radio Shack Division of Tandy Corp. 
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FEEDBACK LOOP 



by Terry Kepner 



Send any questions or problems dealing 
with any area of TRS-80 microcomput- 
ing to Feedback Loop, 80 Micro, 80 
Pine Street, Peterborough, NH 03458. 

T^egarding key repeat (T.B., Glendora, 
IX. CA, October issue), Byte magazine 
(4/82) has a machine-language program 
''Mod III, TRS-80 Model III features for 
your Model I, " page 380, by Joe Rocke 
that might be what he's looking for. It 
works quite well on my Model I. 

J.R.T. 

Clinton, MA 

True, but T.B. was asking for a pro- 
gram in Basic that would give him a flash- 
ing cursor (his letter was condensed to 
conserve column space). 




Problems 

and 
solutions 



Regarding the weather forecasting pro- 
gram requested by L.R. (September 
issue), enclosed is a program I wrote for 
that purpose. It was developed from in- 
formation from a National Weather 
Bureau chart. The program is a comput- 
erized version of that chart. 

A.P. 

Kenosha, WI 

Your program works pretty well. It's 
presented here as Program Listing 1 . 

Let me add to your answer to A. N. 
(October issue). It's possible to use upper 
and lowercase with Scripsit in a computer 
without the lowercase modification. 
Holding down the shift and Scripsit con- 
trol key will give all lowercase letters ex- 



100 CLEAR 500:DIH FCS( 19) ,WD$( 8) ,BT$( 5) 


620 PRINT "6 = SOUTH WEST" 


110 FC$(l)="CONTINUED FAIR, NO DECIDED TEMP CHANGE" 


630 PRINT "7 = WEST" 


120 FC$( 2)= "SLOWLY RISING TEMP AND FAIR FOR 2 DAYS" 


640 PRINT "8 = NORTH WEST" 


130 FCS(3)="FAIR WITH SLIGHT TEMP CHANGES FOR 1 TO 2 DAYS" 


650 INPUT W: CLS 


140 FC$(4)="FAIR, FOLLOWED WITHIN 2 DAYS BY WARMER AND RAIN" 


660 PRINT "INFORMATION ENTERED AS PRESENT CONDITIONS" 


150 FC$(5)="WARMER WITH RAIN IN 24 TO 36 HOURS" 


670 PRINT "BAROMETER READING: ";B 


160 FCS(6)="RAIN WITHIN 24 HOURS" 


680 PRINT "BAROMETER MOVEMENT TREND: ";BT$(C) 


170 FC$(7)="RAIN WITHIN 12 TO 18 HOURS" 


690 PRINT "WIND DIRECTION: ";WD$(W) 


180 FCS( 8)= "WARMER WITH RAIN IN 18 TO 24 HOURS" 


700 PRINT 


190 FC?(9)="INCREASING WINDS, RAIN WITHIN 12 TO 24 HOURS" 


710 PRINTTAB(16) "***** HERE IS THE FORECAST ****** 


200 FCS( 10)=" INCREASING WIND WITH RAIN, WITHIN 12 HOURS" 


720 IF (B>=30.2) THEN 760 


210 FCS(11)='SUMM£R - WITH LIGHT WINDS, RAIN MAY NOT FALL FOR SE 


730 IF (B>=30.1) AND (B<=30.2) THEN 850 


VERAL DAYS WINTER - RAIN WITHIN 24 HOURS" 


740 IF (B>30) AND (B<30.1) THEN 1=19: GOTO 1170 


220 FC$(12)="SUMMER - RAIN PROBABLE WITHIN 12 TO 24 HOURS 


750 IF (B<=30) THEN 1000 


WINTER - RAIN OR SNOW WITH INCREASING WINDS OFTEN 


760 IF (W>=6) AND (W<=8) THEN 7 90 


CCURS WHEN THE BAROMETER BEGINS TO FALL AND THE WIND SETS IN F 


770 IF (W=2) OR (W=3) THEN 820 


ROM THE NORTHEAST" 


7 80 GOTO 1090 


230 FC$(13)="CLEARING WITHIN A FEW HOURS, CONTINUED FAIR FOR SEV 


790 IF C=l THEN 1=1: GOTO 1170 


ERAL DAYS" 


800 IF C=4 THEN 1=2: GOTO 1170 


240 FCS(14)="RAIN WILL CONTINUE FOR 1 TO 2 DAYS" 


810 GOTO 1090 


250 FC$(15)="RAIN WITH HIGH WINDS, FOLLOWED WITHIN 24 TO 36 HOUR 


820 IF C=4 THEN 1=11: GOTO 1170 


S BY CLEARINGAND COOLER, COLDER IN WINTER" 


830 IF C=5 THEN 1=12: GOTO 1170 


260 FC$(16)="CLEARING AND COLDER" 


840 GOTO 1090 


270 FCS(17)="SEVERE STORM OF WIND WITH RAIN OR SNOW IMMINENT !!! 


850 IF (W>=6) AND (W<=8) THEN 890 


! FOLLOWED WITHIN 24 HOURS BY CLEARING AND COLDER" 


860 IF (W=4) OR (W=5) THEN 940 


280 FC$(18) ="SEVERE NORTHEAST GALES AND HEAVY RAIN OR SNOW !!!!! 


870 IF (W=2) OR (W=3) THEN 970 


FOLLOWED IN WINTER BY A COLD WAVE" 


880 GOTO 1090 


290 FC$(19)="TRANSITION PERIOD - RECHECK WITH LATER DATA" 


890 IF C=l THEN 1=3 


GOTO 1170 


300 BT$(1)="STEADY" 


900 IF C=3 THEN 1=4 


GOTO 117 


310 BT$(2) ="RISING SLOWLY" 


910 IF C=4 THEN 1=5 


GOTO 117 


320 BT$(3)="RISING FAST" 


920 IF C=5 THEN 1=8 


GOTO 117 


330 BT$(4) ="FALLING SLOWLY" 


930 GOTO 1090 


340 BT?(5)="FALLING FAST" 


940 IF C=4 THEN 1=6: GOTO 1170 


350 WD$(l)="NORTH" 


950 IF C=5 THEN 1=9: GOTO 1170 


360 WDS(2)="NORTH EAST" 


960 GOTO 1090 


370 WD$(3) ="EAST" 


970 IF C=4 THEN 1=7: GOTO 1170 


380 WD$(4)="SOUTH EAST" 


980 IF C=5 THEN 1=10: GOTO 1170 


390 WDS(5)="SOUTH" 


990 GOTO 1090 


400 WD$(6)="SOUTH WEST" 


1000 IF (C=2) AND ( (W=5) OR (W=6) ) THEN 1=13: GOTO 1170 


410 WD$(7)="WEST" 


1010 IF (C=4) AND ((W=2) OR (W=3) OR (W=4) ) THEN 1=14: GOTO 1170 


420 WD$(8) ="NORTH WEST" 




430 CLS 


1020 IF (B<=30) AND (B>29.8) THEN 1040 


440 PRINT "ENTER BAROMETER READING" 


1030 IF (B<=29.8) THEN 1060 


450 INPUT B 


1040 IF (C=5) AND ( (W=2) OR(W=3) OR(W=4) ) THEN 1=15: GOTO 1170 


460 PRINT "ENTER NUMBER THAT DESCRIBES BAROMETER MOVEMENT TREND" 


1050 GOTO 1090 




1060 IF (C=3) AND (W=3) THEN 1=16: GOTO 1170 


470 PRINT 


1070 IF <C=5) AND ( (W=4) OR(W=5) ) THEN 1=17: GOTO 1170 


480 PRINT "1 = STEADY" 


1080 IF (C=5) AND ( (W=1)OR(W=2)OR(W=3)) THEN 1=18: GOTO 1170 


490 PRINT "2 = RISING SLOWLY" 


1090 PRINT "NO FORECAST FOR THE CONDITIONS ENTERED" 


500 PRINT "3 = RISING FAST" 


1100 PRINT 


510 PRINT "4 = FALLING SLOWLY" 


1110 PRINT "CHECK YOUR DATA TO SEE IF IT IS CORRECT. IF NOT," 


520 PRINT "5 = FALLING FAST" 


1120 PRINT "ENTER THE CORRECT DATA BEGINNING AT THE PROMPT AT TH 


530 INPUT C 


E BOTTOM OF THE SCREEN" 


540 CLS 


1130 PRINT "IF DATA IS CORRECT, PROBABLY GOING TO BE NICE ANYWAY 


550 PRINT "ENTER NUMBER THAT DESCRIBES WIND DIRECTION" 


" 


560 PRINT 


1140 PRINT "IF YOU'RE REALLY CONCERNED, CHECK WITH THE WEATHER B 


570 PRINT "1 = NORTH" 


UREAU " 


580 PRINT "2 = NORTH EAST" 


1150 PRINT 


590 PRINT "3 = EAST" 


1160 GOTO 440 


600 PRINT "4 = SOUTH EAST" 


1170 PRINT FC$(I) 


610 PRINT "5 = SOUTH" 


1180 PRINT: PRINT: PRINT: GOTO 440 


Program 


Listing 1 
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Space Frontier 



ACCEL3 compiles big 
programs, 30K +. This 
is by design; subset 
compilation and use of 
ROM routines keeps 
code growth low (and 
ensures the highest 
compatibility with the 
BASIC source program). 
Also, the NOEXPR 
option can limit 
compilation to the 
program flow opera- 
tions (GOTO, GOSUB, 
RETURN, FOR-NEXT, 
IF, ON) over part of your 
program, or in toto. 
5.5K, all DOS. 
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ACCEL4, overlay version of ACCEL3, works with 
TRSDOS, LDOS only, no user memory requirements. 
Anyone for 40K + compilations? 

You owe it to your programs. 
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(415)387-3131 

x 11721 San Francisco CA94101 



Southern Software's NEW relational database manager. A Af\ 
Integrated data dictionary, recursive command structure, more. $1 ^tU 



Developed in England by Southern Software. TRS-80. TRSDOS, tm Radio Shack. LDOS, tm Logical Systems. 
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^See List of Advertisers on Page 435 
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cept when you hold down the shift key. 
The drawback is that the lowercase letters 
will not be displayed. Instead, you get a 
different set of characters. Below is a list 
of the characters displayed and their low- 
ercase equivalents: 

!"#$%&' ( ) *+,-. /01234567890 
abcdefghijklmnopqrstuvwxyz 

As you can imagine, your screen will 
look like it's filled with garbage and edit- 
ing is quite difficult, but it does work. 

J.D.D. 
Galveston, IN 

Regarding A.N. of the October issue, 
there is such a program. It was published 
in the May 1980 issue of 80 Microcom- 
puting ("Basic Word Processor, " page 
50). This one program alone has paid for 
my subscription to date. 

E.F.K. 
Peru, IL 



In answer to A.N. , I do know of a 
patch to let you operate Scripsit in up- 



percase/lowercase on an unmodified 
Model I. 

An article of mine included a short 
61 -byte subroutine that converts all 
code sent to the video to uppercase, 
while leaving the code in your text buf- 
fer in lowercase. A different-shaped 
cursor informs the writer of the case of 
the letter he's examining. 

The article is going to be published by 
80 Micro in a book of Scripsit modifica- 
tions, which will be released soon. 

T.L.Q. 
Burke, VA 

I had the same problem as A.N. : My 
printer supported lowercase, but my 
Model I didn 't. Since I couldn 't find a 
program that would let me use my sys- 
tem as is, I wrote one. TRS-Ed, as it's 
called, is marketed by Single Source 
Solution, 2699 Clayton Rd., Concord, 
CA 94519. 

E.S. 
Rockville, MD 

About A.N.'s question, my word 



processor TXMODE, does store lower- 
case in the memory of a Model I with 
the lowercase display modification. 
TXMODE is a machine-language, tape- 
based word processor, and is sold by 
Tops Programming Enterprises (8990 

S.W. Camille Terrace, Portland, OR 
97223) and retails for $29.95 plus $2 for 
shipping. 

S.E. 
Portland, OR 



Our program, The Word Machine, is 
the answer to A.N. 's problem of using 
his unmodified Model I for word pro- 
cessing. We have two versions of The 
Word Machine (which was reviewed in 
80 Micro, September 1982). One sup- 
ports the features of the Centronics 
printers (Radio Shack Line Printers), 
and the other supports Epson MX 
printers. 

We believe that The Word Machine, 
at a price of $3 5 plus $2 shipping, repre- 
sents the best value for the TRS-80 
Models I and III (GB Associates, P.O. 




. ■■ . ■ 

PRACTICAL PERIPHERALS 

BUFFERED PARALLEL INTERFACE 

FOR EPSON PRINTERS 



$159.95 

Plus Shipping 
And Applicable Tax 



The MBP-16K is an intelligent Centronics-compatible parallel interface 
for the Epson MX-80, MX-80 F/T, and MX-100 printers, with 16,384 bytes of 
on-board RAM for data buffering. 

The buffering capability of the MBP-16K increasesyour data processing 
efficiency by eliminating the wait normally experienced while printing. An 
Epson printer prints at 80 characters per second; at this speed it takes 
about five minutes to print a 16,000 character document. During most of 
this time the computer is waiting for the Epson to finish one line so it can 
send the next. The computer can't do anything else during this period 
because its's tied to the printer. By using the MBP-16K it takes the 
computer only tour seconds to send a 16,000 character document. The net 
result is to eliminate the computer-waiting-for printer/printer-waiting-for- 
computer bottleneck, and keep both working. Any program that involves 
printed output will be speeded up by using the MBP-16K. 

The MBP-16K supports all standard Epson Commands, is compatible 
with GRAFTRAX-80, and is plug compatible with the standard Epson cable. 
The MPB-16K does not require any user software for control. 

The MBP-16K is easy to install — it simply plugs into the existing 
auxiliary interface connector inside the Epson without modification of the 
printer. 



■ n "VIZ. A. CON." 
A CONSOLIDATION SYSTEM FOR VIS1CALC USERS 
NEW PRODUCT ADDS 3-D1MENSIONAL CAPABILITY FOR VISICALC MODELS. 

In the past, to do a consolidation with VISICALC, a user had to replicate the model in 
memory and laboriously build the formulas to sum the cells. The first thing one 
discovers using this approach is that you quickly run out of memory. The second is that 
recalculation time gets much longer. The third is that you spend a lot of time operating 
and controlling the consolidation process. 

Now with the help of VIZ. A. CON. you can add a third dimension to your VISICALC 
models. You can combine multiple "pages" of VISICALC data from a model for 
hierarchical consolidations (eg. Department, Division, Company, etc.) or for 
summations over periods of time (eg. Month, Quarter, Year-To-Date, etc.) 

VIZ. A. CON. creates data files usable with VISICALC. You can use VISICALC for 
"what if" games at any level of your consolidation. Then use VIZ. A. CON. to find out 
what happened at other levels. 

VIZ. A. CON. gives you the ability to set up special formulas (e.g. rations, 
percentages) that can be recalculated after a consolidation process. You can customize 
titles, row and column headings, footnotes, etc. for each report created by VIZ. A. CON. 
Reports can be automatically saved in standard ASCII form that can be used with a 
word processor. VISICALC precision is maintained for all data. 

TRS-80 Model l/lll Disk $89.95 

TRS-80 Model II 64K $1 19.95 

IBM PC 64K and above $1 19.95 



ASSET MANAGER 

"ASSET SYSTEM" is a completely computerized asset depreciation system, 
particularly designed for the 48K TRS 80 Model III, DOSPLUS 3.4, and dot matrix printer. 
The system: 

1) assigns control numbers to each asset. 

2) accumulates assets according to General Ledger codes. 

3) computes depreciation expense on each asset. 

The "ASSET SYSTEM" is comprised of six primary programs: 

1) Asset System Menu 4) Asset sort 

2) Property 5) Search 

3) Reports 6) Delete 

The "SYSTEM" is configured to handle 500 asset numbers. Counters are displayed on 
the screen as the data is being entered. This enables you to monitor your progress as 
data is entered. 

TRS80 MOD III Disk only $79.95 

Also available: 

General Ledger Program Disk Model III $125.00 



MICRO SOLUTIONS, INC. Software Center 



Master Charge & Visa 
9949 Harwin, Houston, Texas 77036 



(713) 789 5443 or1 -800-231 -6667 
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Box 3322, Granada Hills, CA 91344). 






00100 
00110 


PRGM: WP/CMD 
BY: TED E. CASH 




G.J.H. 






00120 


DATE: 


9/6/82 








00130 


PURPOSE: PATCH K! Si : I : SPLAY UPPERCASE 


Granada Hills, CA 






00140 




AND PRINT UPPERCASE/LOWERCASE 




FOOO 




00160 


ORG 


OFOOOH 


ANYWHERE ABOVE 7AA5H 




FOOO 


53 


O0170 


X DEFM 


'SCRIPSIT/LC 




Attached is an Assembly-language 


F001 
F002 


43 

52 










listing (see Program Listing 2) that lets 


F003 


49 










you use Scripsit/LC on an unmodified 


F005 
F006 
F007 


53 
49 
54 










Model I. All characters are displayed as 










uppercase, but printed properly in up- 


F009 


«C 










per and lowercase as needed. 


FOOA 
FOOB 


4 3 
0"! 


00180 


DEFB 


3 




The program can be keyed in with 


0014 




OO190 


DEPS 


14H 








00200 PATi ip 


5202H 




either an Editor /Assembler or a ma- 


F023 


08 


O0210 


>AT2 EX 


AF.AF' 


REPLACE CODE 


chine-language monitor like Debug. 


F024 
F026 


CB7F 
C2975F 


00220 
00230 


BIT 
JP 


7. A 
NZ,5F97H 


IN PATCH AREA 
CONTINUE ON IF CNTL CHAR 


When completed, store the routine on 


F029 
P02C 


CD355A 
C3AD5F 


00240 
00250 


CALL 
JP 


5A35H 
5FADH 


CONVERT LOWER TO UPPER 
JUMP TO MAIN ROUTINE 


the same disk as Scripsit/LC with the 


F02F 
P032 


LIOOFO 
CD3044 


00260 
00270 


5TART LD 

CALL 


DE,LC 
4430H 


GET ADDR OF PGM TO LOAD 
TRSDOS LOAD ROUTINE 


following command: 


F035 
P038 


C22D40 
CD2844 


00280 
00290 


JP 
CALL 


nz, 402dm 

44B8H 


IF ERROR RETURN TO OPSYS 
CLOSE DISK FILE 




P03B 


2120P0 


00300 


LD 


HL.PAT1 


GET ADDR OF JUMP PATCH 




F03B 


11925P 


00310 


r,r> 


DE,5F92ll 


POINT TO DEST. 


DUMP WP/CMD (START = X'F000',END = X 


F041 
F044 


010300 

KDBO 


00320 
O033O 


LD 
LDIR 


BC,3 


BYTE COUNT 


'F05D\TRA = X'F02F' 


F046 


2123P0 


O034O 


LD 


HL.PAT2 


GET ADDR OF PATCH 




F049 


110252 


O0350 
00360 


LD 


DE, 520211 


PATCH AREA-RADIO SHACK 
COPYRIGHT STATEMENT 


To execute the routine from TRS- 


F04C 


010C0O 


O0370 


LD 


BC,0CH 


BYTE COUNT 


F04F 


EOBO 


O0380 








DOS, type in WP and press enter. The 


F051 


3E2D 


00390 


LD 


A.2DH 


FIX 


routine will load Scripsit/LC into mem- 


F053 
F056 


329565 
3E40 


O040O 
00410 


LD 


(6S95H),A 
A, 4011 


UP END TO 
RETURN TO 


ory, make the necessary patches, and 


F058 
F05B 


329665 
C30052 


00420 
00430 


r.n 
JP 


(6596H),A 
5200H 


TRSDOS - NOT REBOOT 
JUMP TO SCRIPSIT/LC 


then turn control over to Scripsit/LC. 


F02F 

00000 TOTAL 


00440 
ERRORS 


END 


START 




T.E.C. 
Charlotte, NC 








Program Listing 2 





CDLDR CDIYIPUTEHISTS 




NOW YOU CAN ENJOY THE EASE 
AND CONVENIENCE OF LOAD 80 
CASSETTES WITH 

LOAD 80 

And to start you off right, we're offering a Special First Edition of 
COLOR LOAD 80— "The Best of '82." All the best color pro- 
grams from the 1982 issues of 80 MICRO at the very special price 
of $14.97 plus $1.50 shipping and handling. 

To order your Special First Edition COLOR LOAD 80 cas- 
sette, fill out the coupon or call toll free: 

1-800-258-5473 

Order one for yourself and one for a friend. Perfect for holiday 
gift-giving. 

COLOR LOAD 80 will be offered on a quarterly 
basis (see March '83 80 MICRO for details.] 

Color LOAD 80 is manufactured by Insiani Software Inc., a sub- 
sidiary ol Wayne Green Inc . 80 Pine St.. Peterborough. NH 03-158. 
There is no warranty expressed or implied that COLOR LOAD 80 will 
do anything other than save you typing. 




YES, I want the Special First Edition of 

COLOR LOAD 801 Send me cassettes 

@ $14.97 ea. plus $1.50 shipping & handling 
per cassette. 

□ AMEX 



□ MC 

□ VISA 



□ CHECK 

D MONEY ORDER 



NAME 



ADDRESS 
CITY 



STATE. 



ZIP. 



SIGNATURE. 
CARD# 



EXP. DATE 




CL-183 



LOAD 80 



80 Pine St. •Peterborough, NH 03458 

I l 



• See List ol Advertisers on Page 435 
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THAT APE HAS YOUR GIRL!! 









& 







YOUR CHOICES ARE FEW. YOU CAN LET HIM HAVE HER OR GO AND GET HER! 
BE WARNED, YOU'LL FACE MANY OBSTACLES, FALLING BARRELS, PERILOUS 

LADDERS, MOVING ELEVATORS AND OF COURSE KILLER GORILLA HIMSELF! 

IF YOU CHOOSE TO GO AND GET HER, WITH FOUR LEVELS OF PLAY, YOU MAY 

FIND THE TASK DIFFICULT BUT CHALLENGING. SHE NEEDS YOUR HELP!! 

ORDER SOON BEFORE ITS TOO LATE!! 

SOUND EFFECTS 

TOP TEN SCORES 

TRS-80* MODEL Mil 

Disk $19.95 Tape $15.95 

TO ORDER SEND CHECK OR MONEY ORDER OR CALL (517) 542-3280 



Visit Our Two 
RETAIL LOCATIONS: 

'111 Marshall St. 

Litchfield, MI 49252 

517-542-3280 

886 Ecorse Rd., Ypsilanti, MI 48197 

313-482-4424 

'Authorized Radio Shack Dealership 




ISPLAYED 



IDEO 



DISTRIBUTED EXCLUSIVELY BY DISPLAYED VIDEO 

DEALER DISCOUNTS AVAILABLE 

WRITTEN BY: DuBols and McNamara 




ADD $2.00 for 

Shipping. Add 

$1.50 for COD. 

Michigan Res. Add 4 percent. 

■ TKS-80 Trademark of the Tandy Corporation 



Extra! Extra! 




Insect Frenzy - Page 5 



Volume 4 



All The News That's Fit To ZAP! 



Users vote no to the same 
OLD ARCADE GAMES 




(DV 1982) Blurry eyed users have turned to DISPLAYED 
VIDEO to answer their need for new and exciting arcade 
games. In response, DISPLAYED VIDEO has announced 
eight new programs for the TRS-80* Models I-III. These 
arcade type games feature sound, graphics, joystick compa- 
tibility and are written in machine language for maximum 
speed! Both disk and tape versions allow the user to save 
high scores, a feature not usually found on cassette based 
games. Maze enthusiasts seem to like Ghost Hunter and Killer 






Beetles, while gun slingers look toward Insect Frenzy, Jungle 
Raiders, Space Shootout, Alien Cresta and Battle Stations for 
excitement. A Game that does not fall into these categories 
is Hoppy. It features wild drivers, sinking turtles, and hungry 
alligators. These programs are distributed exclusively by 
DISPLAYED VIDEO and written by Dubois and McNamara. 
Pricing for these programs is $15.95 for tape and $19.95 
for disk. Reliable sources inside the company indicate Killer 
Gorilla will be available by the time you read this. 



TO ORDER SEND CHECK OR MONEY ORDER OR CALL (517) 542-3280 



Visit Our Two 
RETAIL LOCATIONS: 

111 Marshall St., Litchfield, MI 49252 

(517) 542-3280 

or 

886 Ecorse Rd., Ypsilanti, MI 48197 

(313) 426-5086/(313) 482-4424 

* Authorized Radio Shack Dealership 



D ISPLAYED 
DEO 

DEALER DISCOUNTS AVAILABLE 



Joysticks for above programs $39.95 
Add $2.00 for Shipping 
Add $1.50 for COD 
Mich. res. add 4 percent tax 



•TRS-80 is a t 
Prices subject i 



ark of the Tandy Corp. 
nge without notice. 
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As you can see, A.N.'s request for 
help on using his unmodified Model I 
for word processing was amply an- 
swered. The first suggestion, using 
Scripsit with the punctuation and num- 
eral characters displayed, is awkward 
and difficult. Few people have the pa- 
tience to use it. 

The second suggestion, using the Ba- 
sic program published in 80 Micro will 
work very well. 

T.L.Q.'s patch to Scripsit sounds ex- 
actly like what A.N. wanted, a simple 
patch for his copy of Scripsit. If any- 
one's interested in the book of Scripsit 
Patches, watch this column and I'll let 
you know when it's available, and what 
it has. Fortunately, T.C. of Charlotte, 
NC, included a simple patch routine 
(Listing 2). 

The last three readers offered pro- 
grams that let you use an unmodified 
Model I for word processing. About 
their merits, since I haven't seen them I 
can't say, although the reviewer of The 
Word Machine in the September (page 
112) issue seemed to like it. 

If you have software or hardware 
that might be of interest to readers of 
this column, please let me know by 
sending advertisements, documenta- 
tion. After all, if I dont't know about it, 
how can I tell the readers? 



/ use a Microline 80 printer with my 
TRS-80. It works fine, but now it 's time 
for me to change the ribbon. I tried the 
computer store where I purchased the 
printer, but was told they don't carry 
them. I asked the salesperson for the 
ribbon 's specification, but was told they 
don 't have them. What good is the print- 
er without the ribbon? Can you help? 

E.W. 
Charlotte, SC 

I called Okidata (609-235-2600), and 
found that you should use only Okidata 
or Okidata-approved ribbons. These 
ribbons contain a special lubricant that 
keeps the print head in optimal condi- 
tion. Using a ribbon not approved by 
Okidata will severely degrade the life of 
your print head. You can get ribbons di- 
rectly from Okidata ($3.18 each) if you 
buy them in lots of 12 ($38.16 total). If you 
want to buy them individually, contact 
a local distributor, which in your case 
would be either Ten-Tech Associates, 
Greensborough (919-852-6000), or In- 
teract Company, Ashville (704-254- 



1949). Individual ribbons should retail 
for under $4. 

(We inadvertently published the follow- 
ing letter with an incorrect solution in 
our November 1982 issue. Terry 
brought it to our attention, and has 
since provided us with the corrected ver- 
sion below. — Eds.) 

/ have a TRS-80 Model II, an Epson 
MX-80 printer, and Scripsit. I can 't get 
the printer to print in the emphasized 
mode. 

I've sent letters to both Radio Shack 
and Epson America, and it seems that 
they can't help me. I know nothing 
about programming. 

H.J. 

Skokie, IL 



"Why doesn't my 

Epson MX-80 print head 

reset itself 

on the left margin?" 



Your main problem is the word pro- 
cessor. The Epson printer can be made 
to print in the emphasized mode by 
sending it the proper escape code, 
followed by the code for emphasized 
printing. While the TRS-80 Model II 
can easily transmit any code generated 
by Scripsit, Scripsit itself can't generate 
the code required. If you were in Basic, 
you could use the CHR$(x) command 
to send the proper codes to the printer 
via the LPRINT command, subsequent 
LPRINTs would be printed in the em- 
phasized mode, until the printer is 
turned off or the escape code followed 
by the code to turn off the emphasized 
print mode is sent. 

Unfortunately for Model II Scripsit 
users, Scripsit reinitializes the printer 
port when it loads into memory. If you 
had the Graftrax modification on your 
Epson, you could use one of the internal 
hardware switches to set the Epson to 
turn on in the emphasized mode. 
There's another switch you should 
check: Early model Epson printers have 
a switch labeled "TRS-80 Mode." If 
this switch (number 2-4) is set to on, 
you won't be able to use the emphasized 
mode. Check your manual and printer 



to see if the switch is on or off. 

Finally, if you're using condensed 
mode, you can't go into emphasized 
mode, they're mutually exclusive. 

If nothing else works, you might con- 
sider getting Scripsit 2.0. It's supposed 
to let you embed printer codes in your 
text files. 

My problem is with my tractor-feed 
Epson TX-80 printer, which is no 
longer made. When printing several 
sheets, the tractor-feed pins on the left 
belt begin to go off center, causing the 
paper to lag behind on the left side. If I 
maintain a steady pull on the paper, 
everything is okay, but if I don 't, the 
paper jams. The paper is directly below 
the printer, so it can't be that the paper 
weight is too much. It seems as if the 
belt on the left side is slipping, but it's 
hard to notice. 

J.G. 
Bergenfield, NJ 

I called the technical-support depart- 
ment of Epson America (213-539-9140). 
They told me that the left belt is prob- 
ably stretched and not turning the pin- 
feed mechanism properly. Take the 
printer to a local support center and 
have them check out the tractor-feed 
mechanism (the problem could be the 
line feed motor). To get the name and 
address of the closest Epson support 
center (there are six in your state), call 
Epson's phone number and ask for the 
service department. 

Why doesn 't my Epson MX-80 print 
head reset itself on the left margin? 
Sometimes when I turn it on, it slowly 
slides left, then right, then left, then 
right, and so on. 

G.K. 

Charlotte, NC 

Several things could be wrong: The 
head-home sensor, which detects when 
the print head has reached "home" (the 
left margin), could be bad; the PTS 
sensor, which tracks the head position 
on the print carriage, could be faulty; 
or any of the chips of the associated cir- 
cuits on the previous two devices could 
be failing. Also, whether you have a 
Graftrax installed could make a dif- 
ference. 

Your best solution is to get in contact 
with The Computer Room (704-377- 
9821), the closest Epson America sup- 
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port center in your state, and have them 
take a look at it. 



/ have almost mastered Graftrax in 
my Epson MX-80, driven by a Model I 
48K TRS-80. 

I'm having a problem using the 
480-dot graphics mode from Basic. Us- 
ing the example in the manual, suppose 
I want to print 50 dots but want to start 
at the 14th dot column instead of the 
first printing position. If the offset 
equals six dots, or some multiple of six, 
I could position the print head at the de- 
sired place by using LPRINTTAB(x) 
before entering graphics mode. But ij 
the offset isn't divisible by six, that 
won't work. 

I have tried: 

10 LPRINTCHR$(27)"K"; 

20 POKE 14312,14 

30 IFPEEK(14312)O63THEN30 

40 POKE 14312,0 

50 IF PEEK(14312) <> 63 THEN 50 

60 FOR I = 1 TO 14 

70 LPRINT " "; 

80 NEXT 



The output was 14 dots! 
Help! 

R.F. 
Rio de Janeiro, Brazil 

Graftrax-80 is supposed to automa- 
tically justify to the next tab position if 
you're mixing tabs and graphics. 
Graftrax-Plus doesn't do this. 

I don't know the solution to that 
problem. A technical man at Epson said 
your program should work. He suggest- 
ed you enter the bit-image mode and 
send 13 spaces as data, and then start 
sending the graphics data (put your 
PEEK-POKE combinations in a loop 
and send the blanks one at a time). If 
that doesn't work, tab to the closest dot 
position (as a multiple of six) before the 
position you want to start printing, and 
send the extra blanks you need to get to 
the correct position. 

In any case, Epson will be sending 
you a free pamphlet, Bit-Image Graph- 
ics on the Epson, which should help you. 

/ purchased SuperScripsit for my 



48K, dual-disk TRS-80 Model III and 
Epson MX-80 FT with Graftrax 
printer. The problem is that the printing 
is in compressed mode only. Changing 
the Scripsit printer selection switches 
(DW2, LP4, LP8) doesn't help. The 
procedure described on page 120 of the 
SuperScripsit manual also doesn 't help. 
The people at the Radio Shack Com- 
puter Center suggested that I get a new 
printer driver, but I have no idea where 
to get one. 

G.O. 
Phoenix, AZ 

The author of SuperScripsit, Sam 
Sauloman, decided that the best way to 
accommodate the variety of different 
printers on the market was to write it to 
use a separate printer driver. That way, 
any printer could be used with Super- 
Scripsit when the proper printer driver 
was used. What this means is that until 
a printer driver is written for any given 
printer, you must use SuperScripsit with 
the drivers. 

Unfortunately for Epson printer 



Tried and. Proven 




THE ELECTRONIC NOTEBOOK 
PROGRAM BY KSoft 



One year old and a proven success! LOG for the TRS-80 (R) is still the only program on 
the market that addresses one very obvious problem: Despite data-base managers, word 
processors, and a dozen brands of spreadsheets, the fact is that most of the information 
people handle on a day-to-day basis just won't fit into fields, files, and codes. 

LOG, on the other hand, is a program that 'thinks' like you do! LOG turns your video screen 
into a one page of a large notebook. Thumb slowly or search like lightning through your 
previous entries; modify, update, or erase as you desire with the built-in text editor. Ap- 
pend new pages with a single keystroke, up to 170 individual pages on a Model III diskette! 
Keep a separate LOG notebook on any diskette in any drive. 

Yes! LOG supports hardcopy to your lineprinter. 

Yes! All commands are single keystroke (no modes to remember). 

Yes! You can access LOG while BASIC is running. 

Yes! It really works! 

People are using LOG to store address lists, programming notes, diaries, personnel files, 
recipes, record collections, and a hundred other uses. Think up your own applications. 
You'll probably use it every day. 



Model I 
Model III 



48K 

48K 



S49.95 
$49.95 



(upper case only) 
(upper/lower case) 



Minimum system: 48K, 2 disk drives, DOS 2.3 (I) or 1.3 (III) required. Ask about other 
Operating Systems or hardware configurations. 



Write or Call for further information: 

KSoft 

318 Lakeside Drive 
Brandon, MS 39042 



(601) 992-2239 

Master Card and Visa Accepted. 
MS Residents pay 5% sales tax. 
We pay shipping and handling in USA. 



(TRS-80 is a trademark of Tandy Corporation) 



^331 



Radio Shack and TDP-100 






COMPUTERWARE 



® 



Box 668 • 
6809 Specialists Encinitas, CA 92024 
(714) 436-3512 



i Hade-nark ot Computetwa 



^■369 



■See List of Advertisers on Page 435 
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owners, none of these drivers work 
right with Epson printers. Epson's 
technical department referred me to 
Apparat (Apparat is currently prepar- 
ing a SuperScripsit driver for the Epson 
MX printer). They told me the new 
driver should be ready soon. The driver 
will require that your Epson printer 
have the Graftrax Plus (in order to use 
the underlining feature). It will also be 
unable to switch print modes within a 
document. 

The SuperScripsit manual lists the 
source code for the DWII driver and in- 
cludes an example of how a printer 
driver works, but writing one for your- 
self isn't a job for the novice. There's 
lots of code, and the instructions for 
writing your own driver don't give you 
enough specifics to make the job easier. 

The letter from F. G. of Warren, MI, 
(September issue), regarding why the 
LPRINT instruction didn 't give the ex- 
pected response, was of interest to me 
and might be of more interest to your 
readers than you know! 

Your answer was to use the com- 
mand LPRINT " ". But there's at least 
one printer with such badly written soft- 
ware (by the manufacturer's admission) 
that the printer won 't execute a carriage 
return /line feed, even if instructed 
LPRINT, LPRINT " ", OUT###,13, 
or LPRINTCHR$(13)! In particular, 
the Microtek Bytewriter I (also sold as 
the Tek writer), when mated with a 
Model III, has several control codes 
that don't function properly. 

My dealings with Microtek concern- 
ing this matter have made it crystal clear 
that they are a company to avoid. It 
took nearly three months to get deliv- 
ery, although I was never told to expect 
such a delay. It was apparent from the 
beginning that the printer was worthless 
and my calls to the manufacturer pro- 
duced such results as "You don't 
understand how to use it, " and, "Give 
it some time, it'll grow on you. "I'm 
working on my master's degree in com- 
puter science; I know how to use it and I 
didn't spend several hundred dollars 
just to let something "grow on me. " 

After the warranty had expired I was 
told that they knew all about the glitch 
and were trying to fix it. Five months 
after receiving the printer, they finally 
allowed me to send it back for a refund. 
Two months passed before I was in- 
formed that they were sending the print- 
er back to me and "If I didn 't like it, I 
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could sell it locally. " It turned out that 
they had lost the paperwork. After days 
of screaming phone calls they found the 
paperwork and assured me that the re- 
fund would soon be on its way. 

That was something like five weeks 
ago and I've been told (repeatedly) that 
it will be at least another two weeks, but 
probably much longer before I receive 
any money. In all I've lost about $100 in 
replacement-printer rentals, unexpected 
credit-card expenses, and shipping on 
this "equipment." 

But back to your response to F.G., 
please inform him (and everyone else) 
that if a printer does not respond to 
LPRINTCHR$(13), they should call 
the manufacturer immediately! 

J.M. 
Louisville, KY 



"It was apparent 
from the beginning 

that the printer 
was worthless. . . " 



Before anyone contacts an equip- 
ment manufacturer he should first 
make sure the problem is actually with 
the equipment and not the operator. 
For a printer this means checking out 
your equipment first. Yesterday I had 
the unfortunate experience of having a 
Daisy Wheel printer die. All of a sudden 
it was printing garbage. I decided to ver- 
ify the problem by reconnecting my old 
dot-matrix printer. It also didn't work 
right, printing everything in lowercase 
only and ignoring line feeds. Experi- 
mentation discovered the true cul- 
prit — my printer cable. The cable had 
gone bad, a wire close to the connector 
had broken. Depending on the position 
of the cable and how it was flexed, the 
printers worked fine, partially worked, 
or didn't work at all. 

If you are experiencing line-feed 
problems with a printer, perform these 
tests in this order: 

• Reread the printer's documentation 
(there might be a switch you can set to 
fix the problem). 

• Send LPRINT, LPRINT" ", 
LPRINT" ";CHR$(10),LPRINT" 
";CHR$(13), and LPRINTCHR$(138) 
commands (Level II Basic intercepts 
and ignores CHR$(10) and CHR$(13) if 
they're at the beginning of an 
LPRINT). 



• Try a different printer cable. 

• Try your computer with a different 
printer (your printer port could be at 
fault). 

• Try having a friend use your printer 
on his computer. 

If all these procedures leave you with 
a printer that won't line feed when you 
command it, call the manufacturer and 
clearly explain the problem. 

About your difficulties with the 
Microtek printer, the technician I talked 
to said that the printer functions exactly 
as the documentation says it should 
when connected to a Model I or Model 
III. Since no one else has complained to 
him about difficulties with using the 
printer on a Model III, he suggests that 
the culprit was probably the PROM in 
that particular printer. 

Your refund is another problem. Ac- 
cording to Microtek's customer-service 
representative, Sally, your printer was 
shipped to you on November 19, 1981. 
You returned the printer to them on 
May 13, 1982 (that's when they received 
it). The Bytewriter was sold with a 
30-day money-back guarrantee, so you 
should've returned it to them before 
December 31 to qualify for a refund. 
However, a technician in their service 
department authorized the return and 
the refund. Unfortunately, many peo- 
ple who bought the Bytewriter also re- 
turned their units. In the confusion, the 
paperwork for your printer was mis- 
placed, but finally, on July 1, the man- 
agement authorized your refund. 

In August, because of the cash-flow 
problem created by the Bytewriter 
printer (to compete on the market, their 
profit margin had to be slim and the re- 
funds ate it away), Microtek filed for 
Chapter 1 1 . Since then they have been 
paying off authorized refunds as cash 
becomes available. The money to pay 
these refunds is being generated by the 
sales of new peripherals from Microtek 
for the Atari, Apple, and IBM comput- 
ers, which, according to Sally, are 
booming. At the moment, September 
15, they're mailing refunds to the peo- 
ple who canceled their orders in May. 
Sally expects to be processing your 
refund sometime in the next three or 
four weeks. ■ 



Terry Kepner is a free-lance writer and 
programmer, and the vice president of 
Interpro. He's been writing about mi- 
crocomputing since 1979. 



rflJION introduces the 

INTERSTELLAR 



A solid state 

disk emulator for your 

Apple*, TRS 80**, SI 00, 

or SS50 computer 

Minicomputer speeds 
at Microcomputer Prices 

• A FAST mass storage device. Speeds up 
payrolls, receivables, word processing, or 
any program requiring disk storage. 

• No moving parts. Eliminates waiting on 
slow mechanical drives. 

• Standard 256K bytes of storage expandable 
to 1 megabyte. 

• Independent regulated power supply. 

• Automatic power failure detect and battery 
backup. 

• Hardware error detection and write protect. 

• Drivers, diagnostics and utilities software 
provided. 

• Certified to comply with Class B limits 
Part 15 of FCC rules. 

INC. 




Introductory 
Price $1095. 

plus tax and shipping 

SEND FOR 

FREE 

BROCHURE 

Identify your model. 
k"190 



PIOIM, IIMC. Tel.(617)648-1717 

74 Appleton St., Arlington, MA 021 74 

•Trade Mark Apple "Trade Mark Tandy Corp. 



In The. . . . 
SOUTH ATLANTIC 



This exciting, realistic war simulation 
puts you in the commander's seat of the 
British ^rmed Forces, Deal with unpre- 
dictable weather, political unrest, and 
the unruly Argentine Forces to win the 
ultimate goal sovereignty over the 

FADCLAND ISLANDS! 

War in the South Atlantic is available 
fori TRS-80 Models I and III on» 

16K Cass - $1^.95 

?2K Disk - $lQ t Q? 



Order by Check, Money Order, MC or VISA 



PROGRAMS FOR THE 80* s 
P.O. Box 50160 
Indianapolis, Indiana 46250 

(IN residents add k>% sales tax) 



317-849-2055 



-•418 



TRS-80 is a trademark of Tandy Corp. 



DISKETTE 
JUNCTION 




«Ue 




:fiVj 



)N THIS SPECIAL 
INTRODUCTORY OFFI 

Scotch DISKETTES 



$19.95 



Y I ZJ mZf %J per box of 5V- 

1 side/D Density (744D-0) diskett 
compatible with Verbatim (MD525-01 ) 
Limit two per order. 

Scotch Head Cleaning Kh 

5Va" and 8" Kits . 

$19.95 each 

order. 



DISKETTE-JUNCTION stocks a complete 
line of 3M magnetic media including 
96TPI Quad Density. Call now to order the 
Scotch' diskette for your equipment. 



800-321-5134 
OHIO RESIDENTS CALL 
800-362-51 



DISKETTE JUNCTION " 5 

591 8 Smith Rd. • Cleveland, Ohio 441 42 

WE ACCEPT 

VISA • MASTER CHARGE • CHECKS 
MONEY ORDERS • C.O.D. 

• Add $3.00 for shipping & handling. 

• S2.00 EXTRA for U.S. Mail delivery. 

• S3. 00 EXTRA for C.O.D. 
• Ohio residents add 6.5% sales tax. 



Authorized Distributor 
Information Processing Products 



3M 



sSee List of Advertisers on Page 435 
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RELOAD SO 



The first Color Load 80 is now avail- 
able. Selling for just $14.97, it encom- 
passes the best of the Color Computer 
programs from 1982. You can order this 
little gem by calling (800) 258-5473 or by 
using the order form in the Color Load 80 
advertisement. 

The Color Load 80 directory printed 
last month listed 28 programs; since then 
we've squeezed in eight more! With this 
bonus the cost per program is now less 
than 42 cents. 

One of the few programs missing from 
this cassette is Jake Commander's 
"Spirals," from "Spiromania, Part II," 
June/July — 80 Micro does not own the 
software publishing rights. 




Color 

Load 80 

bonus 



The 1982 Load 80 Index also appears 
in this issue. If you've been wondering 



Month Page Article Name 



Program 



Type 



Side A 

Feb 202 Colorful Titrations 

Mar 78 The Editor's Choice 

78 The Editor's Choice 

106 Subchaser 

142 Is a Rose in Color Still a Rose? 

142 Is a Rose in Color Still a Rose? 

142 Is a Rose in Color Still a Rose? 

212 COLORMON 

May 386 Dynamic Item Scheduling 

July 352 Do Not Pass 

Aug 94 The Colorful Computer (Part I) 

188 Color Maze 

202 Four In One Plus Another 

202 Four In One Plus Another 

202 Four In One Plus Another 

202 Four In One Plus Another 

202 Four In One Plus Another 

260 Space Duel 

264 Square Game 

268 Color Breakaway 

SideB 

Sep 140 Basic Word Processing 

230 Joystick Paintbrush 

238 Conversion 

Oct 168 Income Tax Estimator 

Nov 164 More Color Conversions 

164 More Color Conversions 

164 More Color Conversions 

213 Color Assembler 
272 Show the Score 
304 Test Patterns 
308 Music Marvel 
308 Music Marvel 

Dec 388 Picture Editor 

200 Color Morse Code 

200 Color Morse Code 

354 Color Disk Dump 
•all the programs in the article written as one program 



TITLEPGE 

TITRATE 

GESAMTE 

COMMANDR 

SUBCHASE 

ARTIST 

MAZE 

3-D 

COLORMON 

ITEMSCHD 

SIGNS 

COCOL* 

CCMAZE 

BRICKOUT 

POINDEXT 

MATHTALK 

PIXPRINT 

TANK-GUN 

SPACE DUL 

SQRGAME 

BRKAWAY 



WORDPROC 
PAINTBRU 
CONVR 
TAXCALC 
SUBDSTRY 
LLANDER 
MISSILES 
ASSEMBLR 
SHOWSCOR 
TVTEST 
MUSIC 
MARVEL1 
PIC-ED 
HAMLOAD 
HAMSHACK 
DISKDUMP 
each accessible from 



Education 

Graphics 

Graphics 

Game 

Graphics 

Game 

Game 

Utility 

Application 

Education 

Graphics 

Game 

Game 

Game 

Education 

Utility 

Game 

Game 

Game 

Game 



Application 

Graphics 

Graphics 

Applications 

Game 

Game 

Game 

Utility 

Utility 

Application 

Application 

Application 

Graphics 

Application 

Application 

Utility 

the menu. 



Color Load 80 Directory 



what we published in past months, scan 
this list. These are Model I /1 1 1 programs 
and as always, 80 Micro is the documen- 
tation. Tapes or disks for all months are 
available and can be ordered by calling 
(800) 258-5473 or by using the Load 80 
advertisements in this magazine. 

Tapes are available from April 1981, 
disks from March 1982. Order by calling 
(800) 258-5473, or by using the Load 80 
advertisements in this magazine. 

This column will cover a number of in- 
teresting topics in 1983, including how to 
load and assemble Load 80 programs, 
load difficult tapes, maintain your record- 
er, maintain your disk drives and convert 
cassette I/O to disk. For complete use of 
Load 80, read this column. ■ 



An index of all programs on 
Load 80 ran in the Anniversary 
Issue. An index of all Load 80 pro- 
grams in 1982 is on page 465 of this 
issue. 



Program 

1 

2 
3 

4 
5 

6 

7 

8 

9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 



Title 

COPYRGHT/BAS 

ORBITS/BAS 

WORDPROC BAS 

BREAKOUT/BAS 

PINEDRBY/BAS 

DSAVE/SRC 

DSAVE/CMD 

WINDCHLL/BAS 

PARSER/BAS 

PENRAM/SRC 

PENRAM/CMD 

FORMATER/BAS 

TIMER/BAS 

DROSSDOS/BAS 

BASTEP/BAS 

BASTEP/SRC 

BASTEP/CMD 

LEAPYEAR/BAS 

PCALENDR/BAS 

SANDSTME/BAS 

WEATHER/BAS 



Comments 

None 
None 
None 
None 
None 
Needs EDTASM 



Page 

156 
200 
216 
221 
232 

232 Machine Language* 

238 None 

268 None 

276 Needs EDTASM 

276 Machine Language* 

316 None 

316 None 

342 None 

352 None 

352 Needs EDTASM 

352 Machine Language* 

412 None 

412 None 

412 None 

400 None 



•We have included both the source and object code for these programs. 
Use an Editor/ Assembler with the programs marked /SRC. Files 
marked /CMD are ready to use as described in the articles. 

January Load 80 Directory 
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Master 
Reversi 



COSMIC PATROL 
A fast, real-time 
space adventure at 
its best, with sound 
and graphics. 









MASTER REVERSI 
A tournament-winning 
"Othello" game to 
challenge and teach 
you no matter what 
your level of 
expertise. Dozens of 
features to allow in- 
depth analysis of 
moves and games. 






GEOGRAPHY 
EXPLORER: USA 
Have the brightest 
kids on the block 
with this tutorial 
cross-country 
adventure. Learn the 
vital facts about each 
state's capitol, 
largest city, 
population, the 
state's flower, bird, 
tree, song and motto. 



er>4g 



,# Wno/ 



KITCHEN SINK 
It's the Cloud people 
versus the Sparrows 
with a highly unusual 
barrage of artillery. 
Plan carefully, steady 
your nerves and enter 
into the fierce 
conflict with 
confidence. 



* J X+> 



' 



Instant 



?**** 



SUPER»TERMINAL 
A telecommunications 
terminal for your 
home computer, 
enables you to 
communicate with 
almost any other 
computer system 
quickly and 
efficiently. 



EXPERIENCE 



Instant Software 



( ) Check here (or FREE catalog 

I 007 1 RD Geography Explorer: USA. 32K, Mod I & III. disk 
[ 0086R Geography Explorer: USA. 16K, Mod I & Mod III, tape 
U0276RD Geography Explorer. Mid East. 32K. Mod I & III disk 
I J0121 RDGeography Explorer. Europe. 32K, Mod I & Mod III disk 
. J0259R Geography Explorer: Europe. 16K, Mod I & Mod HI tape 
0223R Cosmic Patrol 16K. Mod I & III, tape 

Name 



Address. 

City 

State 



-ZlP- 



$49.95 
S29.95 
$49.95 
$49.95 
$29.95 
$19.95 



HA018 



I70224RD Cosmic Patrol 16K, Mod I & III, disk 
i J0378RD Master Reversi 16K. Mod I only, disk 

J0417R Master Reversi 16K. Mod I & Mod III. tape 
i J0386RD Kitchen Sink 32K, Mod I & III, disk 
I .5700RD SUPER»TERMINAL32K, Mod I & III, disk 

VISAC MCD AED 

Instant Software Inc. 

Elm St., Peterborough N.H. 03458 

Card# 



Shipping* Handling 
C.O.D. orders add 
TOTAL 



Interbank!*, 
Signature _ 



.Exp. Date 



$24.95 
$24.95 
S17.95 
$19.95 
$95.00 



$2.50 
$1.50 



Call toll tree 1-800-258-5473 Outside U.S. & Canada call Worldwide Media 212-686-1520 




TIME 

Happy New Year! 

What better time of the year to 
think about time than January? 
Everyone who goes through the 
Fun House this chilly month will 
receive a perpetual calendar, an 
egg timer, and a leap-year lesson; 
plus a Nickel Bargain Bin offer 
for an electronic birthday card. 

The programs are given for 
Level II and the Color Computer. 

Time ... I don't really know 
what it is. I do know we humans 
have developed tools and systems 
for dealing with it in interesting 
ways. To enter the Secret Time 
Passage of the Fun House, step 
inside the giant grandfather 
clock. 

Leap Year 

A leap year is a year that has 
366 days instead of the regular 
365. There is a leap year every 
four years — nearly. Why are 
there leap years? Without leap 
years the calendar would get out 
of step with the sun and it would 
take about 760 years to put the 
whole system out of whack by six 
months. Imagine celebrating the 
Fourth of July hip deep in snow. 

Hooray for leap years. 

The leap year system started in 



FUN 
HOUSE 





^S^Ev 



By Richard Ramella 



Leap Year 



LEAP YEAR / LEVEL II AND COLOR COMPUTER * 

"A REGULAR YEAR HAS 365 DAYS," 

"BUT LEAP YEARS HAVE 366 WITH THE EXTRA DAY AS FEBRUAR 



100 REM * 

110 CLS 

120 PRINT 

130 PRINT 

Y 29." 

140 PRINT "LEAP YEARS ARE EVENLY DIVISIBLE BY FOUR;" 

150 PRINT "HOWEVER, YEARS ENDING IN -00 ARE ONLY LEAP YEARS" 

160 PRINT "IF EVENLY DIVISIBLE BY 400." 

170 PRINT 

180 INPUT "ENTER A YEAR TO CHECK LEAP YEAR STATUS"; A 

190 IF A<1582 THEN PRINT "THE LEAP YEAR SYSTEM BEGAN IN 1582.' 

GOTO 180 

200 A$=STR$(A) 

210 IF RIGHT$(A?,2)="00" GOTO 230 

220 IF A/4=INT(A/4) GOTO 250 

230 IF A/400=INT(A/400) GOTO 250 

240 PRINT "NO,"; A; "is NOT A LEAP YEAR": END 

250 PRINT "YES,"; A; "lb A LEAP YEAR" 

260 END 





Sands of Time 




100 REM * SANDS OF 


TIME / LEVEL 


ii * 




110 CLS 








120 X=0 








130 L=0 








140 Z=40 








150 FOR Y=0 TO 20 










160 FOR X=L TO Z 










170 SET(X,Y) 




- v\\\\ ill nTirH ii in fill 






180 NEXT X 




e ^*«aii^\jJj l \u\ MllliU 






190 L=L+1 




■ \ 






200 Z=Z-1 










210 NEXT Y 




i| N^3y 


&s 


220 X=X-1 






230 Z=X 








240 FOR Y=Y TO 40 




v"-/ 




250 SET(X,Y) 








260 SET(Z,Y) 




ivJl / * \ 




270 X=X-1 




11 / £ . \ 




280 Z=Z+1 






290 NEXT Y 




1 1^ ' >: A 




300 FOR X=0 TO 40 






310 SET(X,Y) 




a Jl***'*' ■ 




320 NEXT X 








330 X=2 








340 L"2 








350 Z=3 8 








360 FOR Y=l TO 19 








370 X=L 








380 FOR X=L TO Z 
390 RESET(X,Y) 




^ — Tnfr 












Listing continues 
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Listing continued 




400 


B=20 


410 


FOR A=22 TO 40 


420 


SET(B,A) 


430 


IF POINT (B,A+1)=-1 N=N+1: GOTO 450 


440 


GOTO 580 


450 


IF N=2 N=0: GOTO 520 


460 


IF POINT(B+l,A+l)=-l A=40: GOTO 590 


470 


RESET(B,A) 


480 


B=B+1 


490 


A=A+1 


500 


SET(B,A) 


510 


GOTO 460 


520 


IF POINT (B-1,A+1)=-1 A=40: GOTO 590 


530 


RESET (B, A) 


540 


B=B-1 


550 


A=A+1 


560 


SET(B,A) 


570 


GOTO 520 


580 


RESET (B, A) 


590 


NEXT A 


600 


NEXT X 


610 


L=L+1 


620 


Z=Z-1 


630 


NEXT Y 


640 


GOTO 640 


650 


END 





Sands of Time for Color Computers 




100 


REM * SANDS OF TIME 


/ 


COLOR VERSION * 




110 


CLS(0) 












120 


X=0 












130 


L=0 












140 


Z=J0 












150 


FOR Y=0 TO 15 












160 


FOR X=L TO Z 












170 


SET(X r Y,8) 












180 


NEXT X 












190 


L=L+1 












200 


Z=z-1 












210 


NEXT Y 1 












220 


X=X-1 








*^El / x£- 




230 


Z=X 












240 


FOR Y=Y TO 30 












250 


SET(X,Y,8) 








^kj&Sff * 




260 


SET(Z,Y,8) 












270 


X=X-1 








^%*j 




280 


Z=Z+X 












290 


NEXT Y 








IK 




300 


FOR X=0 TO 30 








/ ft \ 




310 


SET(X,Y,8) 








/ *'• ;- 




320 


NEXT X 








a p«ff>;. .... 


^^ v^d 


330 


X=2 








'• N&w w\ 


340 


L=2 










350 


Z=28 












360 


FOR Y=l TO 14 












370 


X=L 












380 


FOR X=L TO Z 












390 


RESET(X,Y) 












400 


B=15 












410 


FOR A=17 TO 30 












420 


SET(B, A, 8) 












430 


FOR T=l TO 10 












440 


NEXT T 












450 


IF PUINT(B,A+1)=8 THEN 


N= 


N+l: 


GOTO 470 




460 


GOTO 640 












470 


IF N=2 THEN N=0: GOTO 


562 








480 


IF POlNT(B+l,A+l)=8 


THEN 


A=30: 


GOTO 650 




490 


RESET(B,A) 












500 


B=B+J. 












510 


A=A+1 












520 


SET(B,A,8) 












530 


FOR T=l TO 10 












540 


NEXT T 












550 


GOTO 480 












560 


IF PuINT(B-l,A+l)=8 


THEN 


A=30: 


GOTO 650 




570 


RESET (B, A) 












580 


B=B-1 












590 


A=A+1 










Listing continues 



1582. However, this program and 
the Perpetual Calendar program 
listing won't work for years be- 
fore 1753, when England adopted 
it. We follow the British pattern 
because historical dates common 
to both Great Britain and the 
United States would otherwise be 
thrown into confusion. 

I never understood the system 
for deciding when to put in that 
366th day as February 29. I 
looked it up. Now I know. It's 
easy, and I'm going to show it 
to you. The listing works on 
Level II and the Color Com- 
puter. 

Sands of Time 

I now present the Fun House's 
latest contribution to humanity: 
Sands of Time. 

I gave it a fancy name to hide 
the fact that it's an egg timer, 
more officially called an hour- 
glass. The versions here are actu- 
ally minute glasses. The Level II 
program takes about three 
minutes and 10 seconds to run, 
and the color version takes about 
two minutes. 

People once used sand-filled 
glasses to mark the passage of 



ATTENTION !! 

Foreign Computer 
Stores/ Magazine Dealers 

You have a large technical audience that 
speaks English and is in need of the kind 
of microcomputer information the Wayne 
Green Publications group provides. 

Provide your audience with the magazines 
they need and make money at the same 
time. For details on selling Microcomput- 
ing. 80 Micro . Desktop Computing and 
Wayne Green Books contact: 

Sandra Joseph 

World Wide Media 

386 Park Ave. South 

New York, N.Y. 10016 

Phone— (212) 686-1520 

Telex— 620430 



•See List of Advertisers on Page 435 
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Listing continued 




600 


SET(B,A,8) 


610 


FOR T=l TO 10 


620 


NEXT T 


630 


GOTO 560 


640 


RESET(B,A) 


650 


NEXT A 


660 


NEXT X 


670 


L=L+1 


680 


Z=Z-1 


690 


NEXT Y 


700 


GOTO 700 


710 


END 



time. They're not used much to- 
day except as egg timers and to 
mark a player's turn in some 
games. 

So let's use one of the most so- 
phisticated timing devices avail- 
able — the computer — to make 
an old-fashioned sand timer. 
Please form a line to the left and 
don't push. There are enough 
souvenir egg timers for everyone. 
Perpetual Calendar 

What day of the week were 
you born? What day was the 
Declaration of Independence 
signed? When is Christmas in 
1990? 

These questions are pretty 
tough to answer because the only 
calendar that ever seems to 
be around is the one for the cur- 
rent year. 

But now we have Perpetual 
Calendar, a simple program that 
prints out a calendar page for 
any month in any year from 1753 
to infinity. The word infinity 



Perpetual Calendar 



100 

110 

120 

130 

140 

150 

160 

17 

180 

190 

200 



210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 



REM * PERPETUAL CALENDAR / LEVEL II * 

CLS 

DATA SUN,MON,TUE,WED f THU,FRI,SAT 

DATA JANUARY, FEBRUARY, MARCH, APRIL, HAY, JUNE, JULY 

DATA AUGUST , SEPTEMBER , OCTOBER , NOVEMBER , DECEMBER 

DIM A$(19) 

FOR B=l TO 19 

READ A$(B) 

NEXT B 

INPUT "THE YEAR";Y 

IF Y<1753 THEN PRINT "YEAR HAS TO BE 17 53 OR LATER* 



GOTO 19 



PRINT 

FOR A=8 TO 19 

PRINT n (";A-7;A$(A) ;" ) "; 

N=N+1 

IF N=3 THEN PRINT: N=0 

NEXT A 

PRINT 

PRINT 

INPUT "THE MONTH (1 TO 12) ";M 

IF M>12 GOTO 290 

A=INT(.51+(1/M) ) 

B=Y-A 

C=M+12*A 

D=B/100 

E=INT(D/4) 

F=INT(D) 

G=INT((5*B)/4) 

H=INT(13*(C+l)/5) 

I=H+G-F+E 

I=I-(7*INT(I/7)) 

CLS 

PRINT A$(M+7) ;Y 

PRINT STRING$(30,"- n ) 

FOR A=l TO 7 

PRINT A$(A) ;" "; 

NEXT A 

C$=STR$(Y) 

IF M<8 AND M/2<>INT(M/2) THEN J=31 

IF M>7 AND M/2=INT(M/2) THEN J=31 

IF M=4 OR M=6 OR M=9 OR M=ll THEN J=30 

IF M=2 THEN J=28 

IF M=2 AND RIGHT$(C$,2) <>"00" AND Y/4=INT(Y/4) THEN J=29 

IF M=2 AND RIGHT$(C$,2)="00" AND Y/400=INT(Y/400) THEN J=29 

L=192 

FOR N=l TO 6 

IF N=l AND 1=7 THEN PRINT @ 218, "1": P=P+1 : GOTO 650 

IF N=l THEN FOR L=L+(4*I) TO 216 STEP 4 

IF N>1 THEN FOR L=L TO L+24 STEP 4 

P=P+1 

IF P<10 THEN PRINT @ L," "; ELSE PRINT @ L,""; 

IF P=<J THEN PRINT P; 

NEXT L 

PRINT 

PRINT 

L=L+36 

NEXT N 

GOTO 670 



-ATTENTION ALL TRS-80® OWNERS- 

No matter how your Model I. II or III is used, whether it be business or pleasure, this product can benefit you. 

The FATIGUE FIGHTERTM reduces the operator fatigue (irritated, watery eyes and headaches) caused by the harsh white video 
display thereby making computer use more efficient and/or enjoyable. The graph at the right will help explain how it works. 
Superimposed on the standard eye sensitivity curve is the band pass curve of the FATIGUE FIGHTERTM as recorded by a spectro- 
photometer. A marker is also on the graph at the ideal psychological tolerance color. As you can see, the green color of the FATIGUE 
FIGHTERTM takes advantage of both eye sensitivity and psychological tolerance to make the display less irritating. 

The FATIGUE FIGHTERTM is made of tough '/« inch thick acrylic sheet which adds absolutely no distortion or fuzziness to the 
display and is industry proven to be an excellent material for optical filtering (e.g. lenses for laser safety goggles). It installs easily on all 
three TRS-80* models with a pressure sensitive adhesive which will not let the filter fall off yet allows easy removal if necessary. Finally, 
the black and silver border design makes it a perfect match for the computer styling. 

If you want a FATIGUE FIGHTERTM of your own but prefer not to order by mail, check with your localcomputer stores to see if they 
have them in stock Otherwise follow the ordering instructions below. 

TRS-80 IS A TANDY CORP. TRADEMARK. 

TO ORDER: 

Send Name 8 Address Typed or Clearly Printed with Check or Money 
Order {U.S. FUNDS) for $14.95 Each. Including Shipping. Canadian 
Orders add $1.00 Each. All Other Foreign Orders Add $2.00 Each lor 
Shipping. NO CREDIT CARO 0R0ERS. COD s (U.S. 0ROERS ONLY) are 
$2.50 Additional Per Order & ire Accepted by Mail or by Calling 
904-3782494 9-5 M-F. Florida Residents Add 4% Sales Tax. 
MAIL 0R0ERS MUST BE SENT TO THE US ADDRESS. 



-DEALER INQUIRIES INVITED- 



^n 



SOUTHERN INNOVATIVE DESIGN 
1520 NORTHEAST 12TH STREET 
GAINESVILLE, FLORIDA 32601 ^s 



-CANADIAN DEALERS ONLY- 

For pricing and ordering information contact: 

MICR0-C0MP ENTERPRISES INC., 955 Brock Rd. S„ Unit 3 

Pickering. Ontario L1W 2X9 Phone: 416-839-4561 
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For serious business microcomputing, 
only oneoperating system 

exactly fits. 



Whether you're in business and do 
microcomputing, or in computing 
and sell to business, you'll like OASIS* 
Not a hobby or scientific system warmed- 
over for business use, ^^^ mmmm 
OASIS is the only operating 
system designed from the 
ground up for business. 



SERIOUS BUSINESS 
COMES IN ALL SIZES. 

Whatever your business 
need, OASIS has the 
operating system to match: 
8-bit or 16-, single-user or 
the multi-user system that 
professionals tell us makes 
micros run like minis. And 
that's even truer now with 
new OASIS-16** (OASIS 
exact business fit #1: 
choice.) 



available, type 'HELP' and the command 
function title — OASIS displays the syntax 
and options available. 
Of course it's all in your language — 
not computerese. (OASIS 
exact business fit #5: 
user-friendliness.) 




ist, most 

:umentation 

packed 

i e 

fevel train-^ 
"telephone : 
'worldwidesa^£& ser 
options ^P^^ftffROl 
"^ >e 

;m anl 
lancial 
Parage; OASIS 
I. (OASIS exact 
business fits #6 through #12.) 




is 

runw it. mere's 
nearly any job. 
it's top quality, too, because our 
kted tools are top quality — and 
there are more of them. Like a high-level 
BASIC Interpreter/Compiler/Editor/ 
Debugger; ISAM/Keyed/Direct/ 
Sequential Files; a smart Print Spooler; 
Automatic Record Locking ( OASIS 
exclusiyesj); plus COBOL & 'C 
Languages. These tools are mandatory 
for high-quality business application 
program development — ask any 
developer. (OASIS exact business fit #2: 
high-quality application software.) 

PORTABILITY PROTECTS BUSINESS 
SOFTWARE INVESTMENTS. 

OASIS is custom-fitted to manufac- 
turers' hardware so application soft- 
ware developed to run on one OASIS 
equipped machine can also run on 
others — and is upwardly compatible 
from 8-bit OASIS Single-User to Multi- 
User, on up to OASIS-16. This kind of 
ap plication software portab ility is 
exclusive with OASIS. 

Device independence allows various 
printers and terminals to be used — 
with no modification to application 



/are: OASIS system software com- 
pensates for differences. (OASIS exact 
business fit #3: portability.) 

ACCURATE DATA & A SECURE 



SYSTEM REDUCE BUSINESS RISKS. 



Data integrity — a challenge for any 
multi-user system — is insured by 
OASIS File & Automatic Record Locking. 
With it, normally all users can view a 
record at the same time. BUT, if the record 
is being updated by one user, other users 
are automatically denied access until 
the update is complete. That means 
data is always accurate and up-to-date. 
It's still another O ASIS exclusive. 

For system security, there's OASIS 
Logon, Password & Privilege Level. 
User Accounting keeps track of who used 
the system, when. (OASIS exact business 
fit #4: data integrity/system security.) 

A FRIENDLY SYSTEM IS 

GOOD BUSINESS. 

For user-friendliness, OASIS sets new 
standards. Example: the EXEC Job 
Control Language is so smart it walks 
users through their applications — 
and around the operating system. 

With our 'HELP' feature, if you are 
unsure of the functions and options 



Now you know why there's 
no reason to struggle trying 
to put a square peg in a 
round hole. For serious 
business microcomputing, 
there is one operating system that 
exactly fits: OASIS. Call or write us 
today for details. 

* For Z80 
* * Available for 8086/8088. Available soon 
for 68,000, 16,000 and others 





■ STRICTLY BUSINESS Hi 

PHASE ONE SYSTEMS, INC. 

7700 Edgewater Drive, Suite 830 

Oakland, CA 94621-3051 

Telephone 415/562-8085 TWX 910-366-7139 

I'm serious about my business — 

please send me : 

D OASIS-16 Manual, $75 

□ OASIS Manual, $60 

D Free Application Software Directory 

and put me on your mailing list. 

(Ada $3 lor shipping. California residents add sales lax.) 

Name 

St. (No Box#)_ 
City 



State. 



Zir. 



D Check enclosed □ VISA D Mastercharge 
□ UPS C.O.D. □ American Express 



Card No 

Signature 



Exp. date_ . 



sSee List ol Advertisers on Page 435 
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YOUR TRS-80 —OUR BASIC BOOK, 
THE PERFECT COUPLE 

LEARNING TRS-80 BASIC starts where the Radio Shack® 
getting started manuals end, fulfilling the needs of 
elementary and intermediate level users. If you own or 
have access to a Model I, 11/16, or III, our 544 page BASIC 
book is a necessity. 

IT'S SIMPLE 

We receive testimonials every day commenting on the 
simplicity of this book. 

• "very well organized... careful step-by-step progression" 
— R.G., Oxnard, CA 

• "extremely logical progression and excellent explanations" 
— J.S., Pacifica, CA 

• "easy reading style"— J. B., St. Louis Park, MN 

In fact we think it is so simple that.... 

WE GUARANTEE IT 



i 



Try LEARNING TRS-80 BASIC free for 15 days and if you don't agree that it is as simple 
as we and users like yourself are saying, then send back the book in saleable condition 
and pay nothing. 



wmMMMMMMMMmmMMMmmsmmMmmm 



Call and order today. (800) 854-6505 our 24 hour order hot line 
(714) 588-0996 our Calif. (8am-5pm) order 



Please send me LEARNING TRS-80 BASIC on a 15 day FREE 

examination. At the end of that time, I will send payment, plus 
postage and handling, or return the book and owe nothing. On 
all prepaid orders, Visa or MasterCard charges, publisher pays 
postage and handling, send $19.95 only (Calif, residents add 
6%) —same return guarantee. Offer good in USA only. 
Payment must accompany orders from P.O. Box numbers. 
Name of individual ordering must be filled in. 

NAME 



ADDRESS 



CITY/STATE/ZIP 

D CHECK I I VISA 

ENCLOSED ACCOUNTS 



MASTERCARD 



GOMPUSOFT* 

PUBLISHING 



SIGNATURE 

P.O. Box 19669 Dept. F San Diego, CA 92119 



CompuSoft Books are available at your local computer and book stores. Allow 4 to 6 weeks for delivery. 




TRS-80 and Radio Shack are registered Trademarks of Tandy Corporation 
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here only means the jillion or so 
numbers the TRS-80 can hold. 

The program works this way: 
At the start you see a prompt, The 
Year? Enter the year you want. 

Then the months are printed 
with their numbers, January be- 
ing 1 and December 12. You enter 
the number of the month you 
want to see, and the computer 
prints the calendar page. 

The program listing given here 
is for Level II. To make this pro- 
gram run on a Color Computer, 
change the following lines to 
read: 



540 L=128 

570 If N = 1 THEN FOR 

L = L + (4*I)T0 152STEP4 

Also, delete line 640. Take it 
out now, before you forget! 

Earlier, I mentioned an elec- 
tronic birthday card. That's a 
program offered as this month's 
Nickel Bargain Bin. It makes a 
nice birthday surprise and can be 
personalized. It includes a cake 
with candles and a verse of 
"Happy Birthday" sung by the 
computer. If you want the list- 
ing, send a stamped, self-ad- 
dressed envelope and a nickel to: 

Richard Ramella 

1493 Mountain View Ave., 

Chico, CA 95926 

Please don't send your nickels to 
80 Micro. Be sure to specify a 
Color Computer listing or Level 
II listing. 

By next month I should have 
the game room ready here in the 
Fun House. I anticipate the ar- 
rival of a truck filled with dice, 
and we shall play some interest- 
ing dice games (no betting, 
please) where your opponent is a 
strategy-wise computer. ■ 



The Original Magazine for Owners of the TRS-80™ Microcomputer 



MODEL I 



MODEL II 



MODEL III • POCKET COMPUTER 



COLOR COMPUTER 



Software 

for TRS-80 

Owners 



CQIYIPUTRQNICS 

MONTHLY NEWS MAGAZINE 



Monthly 

Newsmagazine 

for TRS-80 

Owners 




• PRACTICAL APPLICATIONS 

• NEW EXPANDED BUSINESS 
SECTIONS 

• GAMBLING 

• GAMES 

• EDUCATION 

• PERSONAL FINANCE 



BEGINNER'S CORNER 
NEW PRODUCTS 
SOFTWARE EXCHANGE 
MARKET PLACE 
QUESTIONS & ANSWERS 
PROGRAM PRINT OUTS 
...and MORE! 



YOUR CHOICE ^ 



FREE 



A. 



with your Subscription or Renewal 



NANOS systems corp 

TRS-80 At Your 

Fingertips Complete quick 
reference guide to basic, assem- 
bly language and graphic codes 
— all at your fingertips for all 
TRS-80 computers (specify 
computer). 

Assembly Language Section N/A (or Color Computer 



B. 



OR 



A Word Processor, 
Data Management 
System and Cleanup 

(A maze game) All on cassette. 
(Add $3 for diskette, add $5 for 
modified MOD-II diskette version 
— N/A on color computer or 
pocket computer.) 



•READER SERVICE FOR H & E COMPUTRONICS ^9 



CQMPJTRQNICS" 



CALL TOLL FREE 

800-431-2818 



E 

50 North Pascack Road 

Spring Valley. New York 10977 , , .. ,, ,.,,..,, 

3 ' (Outside of New York State) 

□ One Year Magazine Subscription $24 D New □ Renewal 
D Two Year Magazine Subscription $48.00 □ New □ Renewal 

□ Sample Issue $4. D Mod II Newsletter Subscription $18 
Your Choice: TRS-80" at Your Fingertips '.'. or Word Processor/ Data Management D 
Model ID Model II H Model III O Color Computer LI Pocket Computer □ 



24 HOUR ORDER LINE 

914-425-1535 



NEW! 



NEW! 



MOD-II 

NEWSLETTER 

"$18/year(or 12 issues)' 



Name 




Address 






City 


State 


Zip 




Signature 






Credit Card Number 








Expiration Date 





Add Sl2/Year (Canada. Mexico)— Add $24/ Year Air Mail outside of U.S.A.. Canada, and Mexico 
All Prices and Specifications Sub|ect to Change 

' TRS-80 is a trademark of the Radio Shack Division of Tandy Corp. 



from umm mmwrn 

FOR THE TRS-80 MODEL I AND MODEL III 



System Diagnostic 



For Cassette or Disk 



IS YOUR COMPUTER WORKING CORRECTLY? ARE YOU SURE? 

Tests every component of your TRS-80 for proper operation. 



DISK 



ROM: Checksum test 

RAM: Four separate tests including every address and data value 
^± ^^_ ^^^ ^%^» Video Display: Character generator, video RAM, and video signal tests 

^■■Q *W^fe Keyboard: Every key contact tested 

^^F^^FO Line Printer: Character test 

Cassette Recorder: Read/write/verify data 

RS-232-C Interface: Read sense switches (Model I), connector fault, data transmission, framing, data loop, baud rate 
generator 
Disk Drives: Disk controller, drive select and restore, track seek and verify read, read/write/verify all tracks and 
^S^^ *i t%t m ^^fl^rf sectors, formatting, disk drive timer, disk head cleaner 

^^^M^^L^^J ^ ^^W^Tjt Mo(| el I: single or double density, 35, 40 or 80 track drives 
W ^^m ^WflH^ Model 3: sin S | e or double density, 35, 40 or 80 track drives 

' T T ' single or double sided drives 

— One program adapts to any system configuration and hardware. 

— Individual tests of each device with operator monitoring and intervention. 

— Continuous system tests run continually for hours, with diagnostic reports optionally written on line printer. 

— Complete instructions and documentation. 

SPECIFY TRS-80 " MODEL I OR MODEL UI 



CASSETTE 



SMART TERMINAL 

Enables your TRS-80 to be used as a data communications terminal 
to a time-sharing system, computer bulletin board, or another computer, 
via the RS-232-C interface. 

• MEMORY BUFFER holds data for transmission or data received from 
other computer. 

• CASSETTE or DISK may be used to load or save data from memory. 

• AUTOMATIC TRANSMISSION of data from memory. 

• AUTOMATIC STORAGE of incoming data at user's option. 

• TRANSMIT or RECEIVE WITH VERIFICATION options included for 
communication between two TRS-80S using Smart Terminal. 

• Full CONTROL KEYS, including control key mapping into any ASCII 
character. True BREAK key. Lower case supported on Model I. 

• Buffered LINE PRINTER ECHO for incoming data. 

• Disk and cassette files fully compatible with ELECTRIC PENCIL" and 
SCRIPSIT" programs. 

• BAUD RATE and RS-232-C CHARACTERISTICS can be reset from 
within the program. 

• SAVE PROGRAM option creates "personalized" back-up copy of 
program with all options set as specified by user. 

• ONE PROGRAM supports both cassette and disk systems. Program is 

compatible with PMC-80 and other TRS-80 "work alike" computers. 

Model I or III Version supplied on cassette $69.75 

M .. ... M ....*t» supplied on diskette $74-95 

Model II (CP/M) Version $79-95 



MON-3 and MON-4 

The TRS-80 Monitor Programs #3 and #4 are powerful utility programs 
enabling you to interact directly with the TRS-80 in Machine Language. 
They are as useful for beginners as for advanced programmers. 

• BEGINNERS can learn to interact directly with the computer in 
Machine Language. 

• 40-PAGE MANUAL provided with each program. 

• SIMPLE commands, easy to use. 

The Features Of The Monitor Pro g rams Enable You To The Followin g 

• DISPLAY memory in different ways. 

• DISASSEMBLE memory to see Machine Language commands. 

• MOVE and COMPARE memory areas. 

• SEARCH through memory to find specific values. 

• MODIFY memory in various ways. 

• RELOCATE object programs. 

• PRINT output on video display or line printer. 

• READ and WRITE object tapes in SYSTEM Format. 

• UNLOAD programs using low RAM on disk. 

• SAVE and READ disk files (MON-4 Only). 

• INPUT and OUTPUT of disk sectors (MON-4 Only). 

• SEND and RECEIVE data over RS-232-C Interface (MON-4 Only). 

• Create SYMBOLIC Tapes (MON-3) or Files (MON-4) of Disassem- 
bled output for Editor/Assembler program. 

MON-3 CFor Cassette Systems) $39.95 
MON-4 CFor Disk Systems) $49-95 



MAILING LIST 

Maintains mailing lists of up to 1326 names (48K version). Add, change, 
delete, or find names. Machine language sort according to information in 
ANY field (first or last name, address, city, state, zip code). Three or four 
line labels printed in 1, 2, 3, or 4 columns, in master list, or on video display. 
TRS-80 Model 1/3 Disk Version $69-95 
IBM PC Disk Version $79-95 



HOME BUDGET 

Keeps track of your monthly and year-to-date income and expenses. 
Income and expenses classified by code numbers for identification of 
categories. Data includes date, code number, amounts and check number 
(optional). Computes monthly and year-to-date summaries showing 
income tax deductions. All output printed on video display or line printer 
at user's option. Complete instructions for customizing to suit your own 
budget. 

TRS-80 Model 1/3 Cassette Version $29-95 

TRS-80 Model 1/3 Disk Version $49-95 

1MB PC Disk Version $59-95 



SMALL BUSINESS ACCOUNTING 

Based on Dome Bookkeeping Record #612, this program keeps track of 
income, expenditures, and payroll for a small business. Receipts and 
expenditures can be entered on a daily, weekly, or monthly basis. Program 
computes monthly, through last month, and year to date summaries. 
Payroll section (included in disk version only) keeps record of employees 
and paychecks with up to six categories of payroll deductions. Computes 
employee payroll records and year-to-date payroll totals. Complete 
instructions for customizing to suit your own business. 

TRS-80 Model 1/3 Cassette Version $29-95 

TRS-80 Model 1/3 Disk Version $49.95 

IBM PC Disk Version $59.95 



ICQKIPLJTRaNXCS 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



NEW TOLL-FREE 




HOUR 
24 ORDER 
LINE 

(914) 425-1535 



ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 



• All orders processed within 24 Hours 
• 30-Day money back guarantee 
• Add $3.00 for shipping in UPS Areas 
• Add $4.00 for COD. or NON-UPS Areas 
• Add $5.00 to Canada or Mexico 
• Add exact postage to all other countries 
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Introducing the Most Powerful 
Business Software Ever! 

TRS-80 T " (Model I, II, III, or 16) • APPLE™ • IBM™ • OSBORNE™ • CP/M™ • XEROX™ 



ftfS. 
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The VersaBusiness" Series 

Each VERSABUSINESS module can be purchased and used independently, 
or can be linked in any combination to form a complete, coordinated business system. 



VERSARECEIVABLES 1 - $99.95 

VERSA Receivables'" is a complete menu-driven accounts receivable, invoicing, and 
monthly statement-generating system. It keeps track of all information related to who 
owes you or your company money, and can provide automatic billing for past due ac- 
counts. Versa Receivables" prints all necessary statements, invoices, and summary 
reports and can be linked with VERSALEDGER II*" and Versa Inventory™. 

VERSAPAYABLES™ $99.95 

Versa Payables" is designed to keep track of current and aged payables, keeping you 
in touch with all information regarding how much money your company owes, and to 
whom. VERSA PAYABLES" maintains a complete record on each vendor, prints checks, 
check registers, vouchers, transaction reports, aged payables reports, vendor reports, 
and more. With VersaPayableS", you can even let your computer automatically select 
which vouchers are to be paid. 

VERSAPAYROLL™ $99.95 

VERSAPAYROLL" is a powerful and sophisticated, but easy to use payroll system that 
keeps track of all government-required payroll information. Complete employee records 
are maintained, and all necessary payroll calculations are performed automatically, with 
totals displayed on screen for operator approval. A payroll can be run totally, automati- 
cally, or the operator can intervene to prevent a check from being printed, or to alter 
information on it. If desired, totals may be posted to the VERSALEDGER IP" system. 

VERSAlNVENTORV" $99.95 

Versa Inventory - * is a complete inventory control system that gives you instant access 
to data on any item. Versa INVENTORY" keeps track of all information related to what 
items are in stock, out of stock, on backorder, etc., stores sales and pricing data, alerts 
you when an item falls below a preset reorder point, and allows you to enter and print 
invoices directlyor to link with the VERSARECEIVABLES" system. VersaInvENTORY" prints 
all needed inventory listings, reports of items below reorder point, inventory value re- 
ports, period and year-to-date sales reports, price lists, inventory checklists, etc. 



VERSALEDGER II™ $149.95 

VERSALEDGER IP" is a complete accounting system that grows as your business 
grows. VERSALEDGER IP" can be used as a simple personal checkbook register, 
expanded to a small business bookkeeping system or developed into a large 
corporate general ledger system without any additional software. 

• VERSALEDGER IP* gives you almost unlimited storage capacity 

(300 to 10,000 entries per month, depending on the system), 

• stores all check and general ledger information forever, 

• prints tractor-feed checks, 

• handles multiple checkbooks and general ledgers, 

• prints 17 customized accounting reports including check registers, 
balance sheets, income statements, transaction reports, account 
listings, etc. 

Versa Ledger ir" comes with a professionally-written 160 page manual de- 
signed for first-time users. The VERSALEDGER IP" manual will help you become 
quickly familiar with VERSALEDGER IP", using complete sample data files 
supplied on diskette and more than 50 pages of sample printouts. 



CQMPUTRQMCS 



50 N. PASCACK ROAD, SPRING VALLEY, N.Y. 10977 ^ 



SATISFACTION GUARANTEED! 



Every VERSA BUSINESS" module is guaranteed lo outperform all other competitive systems, 
and at a fraction of their cost . II you are not satisfied with any VERSABUSINESS" module, you 
may return it within 30 days lor a refund. Manuals lor any VERSABUSINESS" module may be 
purchased (or S25 each, credited toward a later purchase ol that module. 



To Order: 

Write or call Toll-free (800) 431-2818 
(N.Y.S. residents call 914-425-1535) 



add S3 lor shipping in UPS areas 
add $4 lor CO.D. or non-UPS areas 



DEALER INQUIRIES WELCOME 

All prices and specifications subject to change . 



' add S5 to CANADA or MEXICO 
' add proper postage elsewhere 



Delivery subject to availability. 



1 TRS-80 is a trademark of the Radio Shack Division of Tandy Corp. - 'APPLE is a trademark of Apple Corp. *1BM is a trademark ol IBM Corp. • 'OSBORNE is a trademark of Osborne Corp. 

•CP/M is a trademark of Digital Research - 'XEROX is a trademark of Xerox Corp. 



Experience Shows - S.B.S.G. has over 11,000 Installed Systems! 



COMMUNICATIONS SYSTEMS 

Small Business Systems Group markets a complete line of software which inter- 
faces the TRS80'" with ANY computer that communicates in ASCII. This family 
of products offers both terminal and host capabilities to users with even the 
most minimal hardware configurations. There has been wide interest in these 
products from "comm buffs," the educational community, and businesses 
and individuals who need to communicate on a regular basis. Our 
systems are among the most versatile and comprehensive on the market today 
for TRS-80'" microcomputers. 




SMALL BUSINESS 
SYSTEMS GROUP 



ST80-IH™ -- The Ultimate Communications System 

The "state of the art" in communications processors, designed for complex 
commercial applications. Included in this package is a set of programs that 
allow your TRS80™ to talk to a timesharing computer, transfer files to and from 
your central business computer, and customize your ST80-III to your specific 
application. 

Features include: Selectable RS232 Setting • Help Display • Echo Feedback 
• Job Log (LDOS Mod I, Mod III) • 2-User Translation Tables • Auto Logon • 
10 Function Keys (Definable) • RUBOCIT Key (Definable) • Warm Restart • 
Automatic I.D. • True Break • Direct Cursor Addressing • DOS Command 
Support • Transmit Line Feed • Printer Support • Video Display Modes: 
SCROLL, FORMAT, PAGE, REVERSE VIDEO (Mod II), CURSOR ON/OFF • 
Autoanswer • Autodial (certain modems) • Append to memory buffer • Big 
buffer for printer • Off hook / on hook • 1 predefined ASCII strings in transla- 
tion tables, • Registered users include NASA, (JSN, (JPS, Westinghouse, and 
many colleges, universities and major banks. 

Minimum Requirements: One disk drive, RS232-C, 32K Model I or III, 64K 
Model II. 

Model I or III $150.00 

Model II $250.00 

FORUM-80™ - Communications Network 

With Bill Abney's hot new communications product, you and your TRS-80™ 

can become part of one of the fastest growing communications networks in the 

country; your computer becomes an on-line bulletin board system: users can 

leave messages, get messages, swap information; exchange VisiCalc'" reports, 

charts, graphs or other correspondence with other computers. 

Features Include: Security System • Constantly displayed time-in-use figure* 

User Friendly • User Configurable or can be modified for custom application • 

Future updates and upgrades available to register owners • Multiple command 

strings • Non-technical user and operator manuals. 

Minimum Requirements: TRS-80'" (3-drive Mod I, 2-drive Mod III), 48K. 

RS232-C, Auto-answer modem. 

Model I or HI $350.00 



ST-80-PBB™ -- Personal Bulletin Board 

A small yet powerful bulletin board for the individual to gather and leave electro- 
nic mail. Messages reside in data base in memory, eliminating the problem of 
scanning magnetic media. 

Features Include: Password Security System • Four levels of Access -Guest, 
Member, Owner, Operator • User Log • Four message types • Smart reverse 
scan to view messages from most recent to oldest. 

Minimum Requirements: TRS-80'" (Mod I or HI), 16K, Level II, Auto-answer 
modem, ST80-X10 Host Program ($50), RS232-C. 

Model I or III $50.00 



ST-80-CC™ -- Communications Center 

More than a personal bulletin board, this is a complete communications system 
for low to moderate traffic. Like ST80-PBB'" it supports four levels of users and 
four levels of messages with text editing and reverse scan of messages. 
Additional Features Include: Transmit same message to many individuals 
• Auto logon and multiple command scanning • Print messages on line printer, 
save messages in memory buffer, maintain database without user intervention. 
Minimum Requirements: TRS-80'" (Mod I or 111), Level II. 48K, one disk. Auto- 
answer modem, ST80-X10 Host Program ($50), RS232-C. 

Model I or III $100.00 



MouseNet™ -- Advanced Bulletin Board System 

Designed to accommodate high volume traffic, to operate simply enough for 
novice users, yet is fast and powerful enough for experienced callers. 
Features Include: Messages stored on disk in keyed file • Uses machine 
language subroutines for speed • Supports text editing commands • Help 
commands guide user • System bulletins display each time a user logs on • All 
messages are dated. 

Minimum Requirements: TRS-80'" (Mod I or lll).48K, RS232-C, 3 Disks, Auto- 
answer modem, text editor (such as Scripsit). 

Model I or III $295.00 



DELUXE PERSONAL FINANCE For TRS-80™ Model II 

This is a sophisticated and unique financial analysis package which can be 
readily customized to suit your personal financial situation. It will: 

• Accept and apply transactions to user-formatted budget categories. 

• Separate cash and check disbursements. 

• Allows up to ten category disbursements per check. 

• Credit income/deposits according to source. 

• Search, correct or void checks. 



• Maintain an accurate checking account balance. 

• Cancel returned checks. 

• Provide monthly summaries of income vs. expenses. 

• Calculate profit/loss. 

• Summarize data by categories. 

• Provides up to ten savings account summaries. 

Model II 

Model I Version 



$75.00 
$35.00 



ACCESSIBILITY 

We are here to serve your after-purchase needs. You can read our Monthly 
Newsletter containing current information about SBSG's products. Our News- 
letter is free to our customers and is available at a minimal cost to anyone 
interested in Microcomputers or call SBSG directly for Programming and 



Accounting Support. We have 8 incoming lines or call our COMM: Micronet 
Bulletin Board: ID * 70319236; FORUM-80'": (617) 692-3973; MouseNet'": 
(617) 692-8121; The Source: *TCC 413. 



H & E COMPUTRONICS Gives A 30-Day Money Back Guarantee On All SBSG Products 



DEALER INQUIRIES ONLY: 



6 CARLISLE ROAD 

WESTFORD, MASS. 01886-5762 

(617) 692-3800 



SMALL 

BUSINESS 

SYSTEMS 

GROUP 



END USER ORDERS: 

•CQMPUTRQNICS 



NAATV-evWTClAi AP^C-ftTCT-JS S€»vW 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 
DELIVERY SUBJECT TO AVAILABILITY 



NEW TOLL-FREE 

ORDER LINE 



lOUtSiOE Of 



(800) 431-2818 



HOUR 
24 ORDER 
LINE 

(914) 425-1535 



CQMPLJTRQNICS 



N 
C. 



• • EVERYTHING FOR YOUR TRS-80™ • ATARI™ • APPLE™ • PET" • CP/M™ • XEROX™ • IBM™ • OSBORNE™ • • 

" TRS-80 is a trademark of the Radio Shack Division of Tandy Corp. ■ * ATARI is a trademark of Atari Inc. ■ 'APPLE is a trademark of Apple Corp. • • PET is a trademark of Commodore 
* CP/M is a trademark of Digital Research ■ 'XEROX is a trademark of Xerox Corp. ■ * IBM is a trademark of IBM Corp. - * OSBORNE is a trademark of Osborne Corp. 



BUSINESS PAC 100 




mm * " rrssed within 24-Hours 

/ \ * A " ° rdCrS n P ncv back guarantee 
/ A * 30-Day money oa 



100 Ready-To-Run 
Business Programs 



(ON CASSETTE OR DISKETTE) Includes 128 Page Users Manual 

Inventory Control Payroll Bookkeeping System Stock Calculations. 

Checkbook Maintenance Accounts Receivable Accounts Payable 



BUSINESS 100 PROGRAM LIST 



NAME DESCRIPTION 

1 RCILE78 Interest Apportionment by Rule of the 78s 

2 ANNU1 Annuity computation program 

3 DATE Time between dates 

4 DAYYEAR Day of year a particular date falls on 

5 LEASEINT Interest rate on lease 

6 BREAKEVN Breakeven analysis 

7 DEPRSL Straightline depreciation 

8 DEPRSY Sum of the digits depreciation 

9 DEPRDB Declining balance depreciation 

1 DEPRDDB Double declining balance depreciation 

1 1 TAXDEP Cash flow vs. depreciation tables 

12 CHECK2 Prints NEBS checks along with daily register 

13 CHECKBK1 Checkbook maintenance program 

14 MORTGAGE/ A Mortgage amortization table 

1 5 MULTMON Computes time needed for money to double, triple 

16 SALVAGE Determines salvage value of an investment 

1 7 RRVARIN Rate of return on investment with variable inflows 

1 8 RRCONST Rate of return on investment with constant inflows 

1 9 EFFECT Effective interest rate of a loan 

20 FVAL Future value of an investment (compound interest) 

21 PVAL Present value of a future amount 

22 LOANPAY Amount of payment on a loan 

23 REGWTTH Equal withdrawals from investment to leave over 

24 SIMPDISK Simple discount analysis 

25 DATEVAL Equivalent & nonequivalent dated values for oblig. 

26 ANNUDEF Present value of deferred annuities 

27 MARKUP % Markup analysis for items 

28 SINKFCIND Sinking ftjnd amortization program 

29 BONDVAL Value of a bond 

30 DEPLETE Depletion analysis 

31 BLACKSH Black Scholes options analysis 

32 STOCVAL1 Expected return on stock via discounts dividends 

33 WARVAL Value of a warrant 

34 BONDVAL2 Value of a bond 

35 EPSEST Estimate of future earnings per share for company 

36 BETAALPH Computes alpha and beta variables for stock 

37 SHARPE 1 Portfolio selection model-i.e. what stocks to hold 

38 OPTWRl I b Option writing computations 

39 RTVAL Value of a right 

40 EXPVAL Expected value analysis 

4 1 BAYES Bayesian decisions 

42 VALPRINF Value of perfect information 

43 VALADINF Value of additional information 

44 LrTllJTY Derives utility function 

45 SIMPLEX Linear programming solution by simplex method 
4b TRANS Transportation method for linear programming 

47 EOQ Economic order quantity inventory model 

48 QUEGE1 Single server queueing (waiting line) model 

49 CVP Cost-volume-profit analysis 

50 CONDPROF Conditional profit tables 

51 OPTLOSS Opportunity loss tables 

52 FGXJOQ Fixed quantity economic order quantity model 

53 FQEOWSH As above but with shortages permitted 

54 FOEOQPB As above but with quantity pnce breaks 

55 QCIECJECB Cost-benefit waiting line analysis 

56 NCFANAL Net cashflow analysis for simple investment 

57 PROFIND Profitability index of a project 

58 CAP1 Cap. Asset Pr. Model analysis of project 



59 WACC Weighted average cost of capital 

60 COMPBAL True rate on loan with compensating bal. required 

61 DISCBAL True rate on discounted loan 

62 MERGANAL Merger analysis computations 

63 FINRAT Financial ratios for a firm 

64 NPV Net present value of project 

65 PRINDLAS Laspeyres price index 

66 PRINDPA Paasche price index 

67 SEASIND Constructs seasonal quantity indices for company 

68 T1METR Time series analysis linear trend 

69 T1MEMOV Time series analysis moving average trend 

70 FGPRINF Future price estimation with inflation 

71 MAILPAC Mailing list system 

72 LETWRT Letter writing system-links with MAILPAC 

73 SORT3 Sorts list of names 

74 LABEL 1 Shipping label maker 

75 LABEL2 Name label maker 

76 BGSBCID DOME business bookkeeping system 

77 TIMECLCK Computes weeks total hours from timeclock info. 

78 ACCTPAY In memory accounts payable system-storage permitted 

79 INVOICE Generate invoice on screen and print on printer 

80 INVENT2 In memory inventory control system 

81 TELDIR Computerized telephone directory 

82 T1MGSAN Time use analysis 

83 ASSIGN Use of assignment algorithm for optimal job assign. 

84 ACCTREC In memory accounts receivable system-storage ok 

85 TERMSPAY Compares 3 methods of repayment of loans 

86 PAYNET Computes gross pay required for given net 

87 SELLPR Computes selling price for given after tax amount 

88 ARBCOMP Arbitrage computations 

89 DEPRSF Sinking fund depreciation 

90 UPSZONE Finds UPS zones from zip code 

91 ENVELOPE Types envelope including return address 

92 ACJTOEXP Automobile expense analysis 

93 INSFILE Insurance policy file 

94 PAYROLL2 In memory payroll system 

95 DILANAL Dilution analysis 

96 LOANAFFD Loan amount a borrower can afford 

97 RENTPRCH Purchase price for rental property 

98 SALELEAS Sale-leaseback analysis 

99 RRCONVBD Investor's rate of return on convertable bond 
100 PORTVAL9 Stock market portfolio storage-valuation program 



□ TRS-80 Cassette Version $99.95 

□ TRS-80 (Mod-I or III), Pet, Apple 

or Atari Versions $99.95 

□ TRS-80 Mod-ll, IBM, Osborne 

and CP/M Versions $149.95 



ADD $3.00 FOR SHIPPING IN UPS AREAS 

ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 

ADD $5.00 TO CANADA AND MEXICO 

ADD PROPER POSTAGE OUTSIDE OF U.S., CANADA AND MEXICO 



N£V * TOLL Fo 

■say?? 

(800 > «i*K 



CQMPLITRQNICS 



rWATV^staTClAi APC^OATOsJH Sf£ 



qn 



^9 




50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



ASK FOR OUR 64-PAGE CATALOG 




HOUR 
OA ORDER 
&* LINE 

(9 14) A25-1535 



DEALER INQUIRIES INVITED 



ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 
DELIVERY SUBJECT TO AVAILABILITY 
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CQMPUTRQNICS 



N 
C. 



• • • EVERYTHING FOR YOUR TRS-80 
MODEL I, MODEL II & MODEL III 



' TRS-80'" is a trademark of Tandy Corp. 



FROM 



|r RACET 



COMPUTES 



• All orders processed within 24 Hours 
• 30-Day money back guarantee 
• Add $3.00 for shipping in UPS Areas 
• Add $4.00 for C.O.D. or NON-UPS Areas 
• Add $5.00 to Canada or Mexico 
• Add exact postage to all other countries 



ESSENTIAL UTILITY PROGRAMS FOR EVERY TRS-80 OWNER *** 



Tack Ahuit Rood Cmpulw Utt£tty VwQiam 



*** ALL PROGRAMS ARE WRITTEN IN MACHINE LANGUAGE 

"* ABSOLUTELY NO KNOWLEDGE OF MACHINE LANGUAGE IS NECESSARY TO USE ANY OF THE UTILITY PROGRAMS 

"• EACH UTILITY PROGRAM IS CALLED UP FROM BASIC USING THE SIMPLE BASIC COMMANDS PROVIDED 

•*• EACH UTILITY PROGRAM COMES WITH A RACET COMPUTES INSTRUCTION MANUAL 

*** EACH INSTRUCTION MANUAL INCLUDES SEVERAL EXAMPLES OF UTILITY USAGE 

*** EACH UTILITY ALLOWS THE USER TO PERFORM CERTAIN BASIC OPERATIONS TEN, TWENTY OR MORE TIMES FASTER THAN THE 

EQUIVALENT BASIC ROUTINE (FOR EXAMPLE, GSF CAN SORT AN ARRAY OF 1000 RANDOM NAMES INTO ALPHABETICAL ORDER IN 

UNDER 9 SECONDS!!) 



GSF (GENERALIZED SUBROUTINE FACILITY) 

• SORTS 1000-ELEMENT ARRAYS IN 9 SECONDS 

• SORTS UP TO 1 5 ARRAYS SIMULTANEOUSLY (MIXED STRING, FLOATING POINT AND 
INTEGER) 

• SORTS SINGLE OR MULTIPLE SUBSTRINGS AS ASCENDING OR DESCENDING SORT 
KEYS 

• READ AND WRITE ARRAYS TO CASSETTE 

• COMPRESS AND UNCOMPRESS DATA IN MEMORY 

• MOVE ARRAYS IN MEMORY 

• DUPLICATE MEMORY 

• FAST HORIZONTAL AND VERTICAL LINES 

• SCREENCONTROLSFORSCROLLINGTHESCREENUP.DOWN, LEFT, RIGHT AND FOR 
GENERATING INVERSE GRAPHIC DISPLAYS 

• ADDS PEEKS AND POKES (MOD-II VERSION ONLY) 



MODEL-I VERSION $25.00 

MODEL-II VERSION $50.00 

MODEL-III VERSION $30.00 



KFS-80 (KEYED FILE SYSTEM) 



• CREATE ISAM FILES (INDEX SEQUENTIAL ACCESS METHOD) 

• ALLOWS INSTANT ACCESS TO ANY RECORD ON YOUR DISKETTE 

• INSTANTLY RETRIEVE RECORDS FROM MAILING LISTS. INVENTORY. ACCOUNTS 
RECEIVABLE OR VIRTUALLY ANY APPLICATION WHERE RAPID ACCESS IS RE- 
QUIRED TO NAMED RECORDS 

• PROVIDES THE BASIC PROGRAMMER THE ABILITYTO RAPIDLY INSERT OR ACCESS 
KEYED RECORDS IN ONE OR MORE DATA FILES 

• RECORDS ARE MAINTAINED IN SORTED ORDER BY A SPECIFIED KEY 

• RECORDS MAY BE INSERTED OR RETRIEVED BY SUPPLYING THE KEY 

• RECORDS MAY BE RETRIEVED SEQUENTIALLY IN SORTED ORDER 

• RAPID ACCESS TO ANY FILE REGARDLESS OF THE NUMBER OF RECORDS 

• MULTIPLE INDEX FILES CAN BE EASILY CREATED WHICH ALLOWS ACCESS OF A 
SINGLE DATABASE BY MULTIPLE KEYS (FOR EXAMPLE, BY BOTH NAME AND ZIP- 
CODE) 

MODEL-I VERSION $100.00 

MODEL-II VERSION $175.00 

MODEL-III VERSION $100.00 



DSM (DISK SORT MERGE) 

• SORT AN 85K DISKETTE IN LESS THAN THREE MINUTES! 

• SORTS LARGE MULTIPLE DISKETTE FILES ON A MINIMUM ONE DRIVE SYSTEM 

• ALL RECORDS ARE PHYSICALLY REARRANGED-NO KEY FILES ARE REQUIRED 

• SORTS RANDOM FILES CREATED BY BASIC, INCLUDING FILES CONTAINING SUB- 
RECORDS SPANNING SECTORS 

• SORTS ON ONE OR MORE FIELDS IN ASCENDING OR DESCENDING ORDER 

• FIELDS MAY BE STIRNGS, INTEGER, BINARY INTEGER OR FLOATING POINT 

• THESORTEDOUTPUTFILEMAYOPTIONALLYHAVEFIELDSDELETED.REARRANGED 
OR PADDED 

• SORT COMMANDS CAN BE SAVED FOR REUSE 

• SINGLE SORT. MERGE. OR MIXED SORT/MERGE OPERATIONS MAY BE PERFORMED 

• SORTED OUTPUT MAY BE WRITTEN TO A NEW FILE, OR REPLACE THE ORIGINAL IN- 
PUT FILE 



MODEL-I VERSION $75.00 

MODEL-II VERSION $150.00 

MODEL-III VERSION $90.00 



MAILLIST (A MAILING LIST DATABASE SYSTEM) 

• iDEALLY SUITED FOR ORGANIZATION MAILING LISTS, PERSONAL ADDRESSBOOK. 
OR MAILING LISTS BASED ON DATES SUCH AS REMINDERS FOR BIRTHDATES OR 
DUES PAYABLE 

• USED ISAM (INDEX SEQUENTIAL ACCESS METHOD) FOR RAPID ACCESS TIMES 

• YOUR MAILLIST CAN ALWAYS BE SORTED AND MAINTAINED BY UP TO FOUR INDEX 
FILES (FOR EXAMPLE, NAME, ZIPCODE, DATE AND NUMBER) 

• MAILLIST ALLOWS UP TO 30 ATTRIBUTES TO BE SPECIFIED (TO BE USED IN SEL- 
ECTION OF SPECIFIED RECORDS WHEN GENERATING REPORTS OR MAILING 
LABELS 

• MAILLIST SUPPORTS BOTH 5 OR 9-DIGIT ZIPCODES 

• PRINTING MAY BE STARTED OR ENDED AT ANY POINT IN THE LIST. ..THE USER CAN 
SPECIFY FIELDS OR CODES TO BE PRINTED 

• CAPACITY IS 600 NAMES FOR MODEL-I, 3500NAMES FOR MODEL II, 38.000NAMES FOR 
MODEL II WITH HARD DISK DRIVE. 1200 NAMES FOR MODEL III 

MODEL-I VERSION $75.00 

MODEL-II VERSION $150.00 

MODEL-III VERSION $75.00 
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HSDS HARD DISK DRIVE SOFTWARE 

• MAKES TRSDOS COMPATIBLE WITH MOST HARD DISK DRIVES. 

• ADDS MANY EXTRA FEATURES TO TRSDOS 



COMPROC (COMMAND PROCESSOR) 

• AUTO YOUR DISK TO PERFORM ANY SEQUENCE OF INSTRUCTIONS THAT YOU 
NORMALLY GIVE FROM THE KEYBOARD (FOR EXAMPLE, INSERT THE DISKETTE. 
PRESS THE RESET BUTTON. YOUR COMMAND FILE COULD AUTOMATICALLYSHOW 
YOU THE DIRECTORY. SHOW THE FREE SPACE ON THE DIKSETTE. LOAD A MA- 
CHINE LANGUAGE SUBROUTINE. LOAD BASIC. LOAD AND RUN A 8ASIC PROGRAM. 
AND SELECT A GIVEN ITEM ON YOUR MENU ALL WITHOUT TOUCHING THE KEY- 
BOARD!) 

MODEL-I VERSION $20.00 

MODEL-III VERSION $30.00 

NOT AVAILABLE FOR MODEL-II 



DISCAT (DISKETTE CATALOG SYSTEM) 

• THIS COMPREHENSIVE DISKETTE CATALOGUING/INDEXING UTILITY ALLOWS THE 
USER TO KEEP TRACK OF THOUSANDS OF PROGRAMS IN A CATEGORIZED LI- 
BRARY FILE INCLUDES PROGRAM NAMES AND EXTENSIONS. PROGRAM LENGTH. 
DISKETTE NUMBERS AND FREE SPACE ON EACH DISKETTE. KEEP A COMPLETE 
CATALOG OF THE DIRECTORIES ON ALL YOUR DISKETTES IN ALPHABETICAL 
ORDER (SORTED ON EACH DISKETTE. OR COMPLETE ALPHABETICAL LIST OF 
PROGRAMS ON ALL YOUR DISKETTES) 



MODEL-I VERSION 

MODEL-III VERSION 

MODEL-II VERSION (SEE MODEL-I 



.$50.00 
.$50.00 



UTILITY PACKAGE) 



BLINK (BASIC LINK FACILITY) 

• LINK FROM BASIC PROGRAM TO ANOTHER SAVING ALL VARIABLES 

• THE CHAINED PROGRAM MAY EITHER REPLACE THE ORIGINAL PHOGRAM OR CAN 
BE MERGED BY STATEMENT NUMBER 



MODEL-I VERSION 

MODEL-III VERSION 

MODEL-II VERSION (SEE MODEL-II UTILITY PACKAGE) 



$25.00 
.$30.00 
. $50 00 



INFINITE BASIC 



ADDS OVER 80 COMMANDS TO BASIC 

SORTING STRING CENTERING/ROTATION/TRUNCATION. JUSTIFICATION. .DATA 
COMPRESSION.. STRING TRANSLATION/COPYING. SCREEN DISPLAY. ..SCROLL- 
ING MATRIX OPERATIONS SIMULTANEOUS EQUATIONS (THROUGH MATRIX 
INVERSION). DYNAMIC ARRAY RESHAPING 



MODEL-I VERSION 

MODEL-III VERSION 

NOT AVAILABLE ON MODEL-II 



. S50 00 
$60.00 



INFINITE BUSINESS 



ADD ON PACKAGE TO INFINITE BASIC (REQUIRES INFINITE BASIC) 

ADOS PACKED DECIMAL ARITHMETIC WITH ^27 DIGIT ACCURACY (-.0.V) 

COMPLETE PRINTER PAGINATION CONTROLS AUTO HEADERS. FOOTERS AND 

PAGE NUMBERS 

BINARY SEARCH OF SORTED AND UNSORTED ARRAYS (INSTANT SEARCH OF AN 

ELEMENT WITHIN AN ARRAY) 

HASH CODES 



MODEL! VERSION 

MODEL-III VERSION 

NOT AVAILABLE ON MODEL-II 



$30.00 

.$30 00 



REMODEL-PROLOAD 



IHE ULTIMATE RENUMBERING PROGRAM. RENUMBERS ALL OR PART OF A PRO- 
GRAM (ALLOWS PARTIAL RENUMBERING IN MIDDLE OF PROGRAMS) 
PARTIAL OR COMPLETE MERGE OF TWO CASSETTE PROGRAMS 



MODEL-I VERSION 

MODEl-lll VERSION 

NOT AVAILABLE ON MODEL-II 



$35 00 
$35 00 



COPSYS 



COPY AND VERIFY ALL MACHINE LANGUAGE (SYSTEM) TAPES WRITTEN IN STAND- 
ARD FORMAT. ..IF YOU BUY A MACHINE LANGUAGE PROGRAM. COPSYS ALLOWS 
YOU TO EASILY COPY THE PROGRAM ONTO ANOTHER CASSETTE AS A BACKUP 



MODEL-I VERSION 

MODEL-III VERSION 

NOT AVAILABLE ON MODEL-II 



$1500 
. $20 00 



FOR DEALER 
INFORMATION CALL: 



RACET COMPUTES"^ 



1330 N. GLASSEL. SUITE M, ORANGE CA 92667 
(714) 997-4950 



MODEL II SPEEDUP— FAST DISK I/O 

THIS IS AN ENHANCEMENT FOR TRSDOS 2.0 THAT WILL 
RADICALLY DECREASE DISK ACCESS TIME. 



DISKS BOOT FASTER TO DOS 
IMPROVE DISK I/O UNDER BASIC 



MODEL II ONLY $99.95 






MODEL II FASTBACK — FULL DISK BACKUP 
IN 55 SECONDS 

IN BUSINESS TIME IS MONEY, AND ONE BACKUP IS WORTH A THOUSAND TEARS. 

• WORKS ON SYSTEMS WITH 2 OR MORE DRIVES 

• CAN REPLACE YOUR EXISTING TRSDOS 12 or 20 BACKUP UTILITY 



MODEI II ONLY 



.$75 00 






MODEL-II UTILITY PACKAGE 



ESSENTIAL FOR EVERY MOD-II OWNER 

RECOVER AND REPAIR FILES AND DIRECTORIES (BY JUST ENTERING A SINGLE 
COMMAND) 

XCOPY ...SIMILAR TO COPY BUT CAN COPY ANY NUMBER OF FILES AT ONE TIME 
FASTER AND MORE ACCURATE THAN COPY SINCE RECORDS ARE COPIED IN 
GROUPS RATHER THAN ONE RECORDS AT A TIME. USING XCOPY YOU CAN COPY 
FILES THAT CAN NOT BE COPIED USING THE COPY COMMAND 
SZAP PROVIDES THE CAPABILITY TO READ AND MODIFY ANY SECTOR ON A 
DISKETTE 

XHIT. CAN BE USED TO REPAIR A DISKETTE DIRECTORY 

DCS ..DIRECTOR CATALOG SYSTEM lo A UTILITY FOR THE MANAGEMENT OF USER 
DISKETTES. ..SETS OF A MULTIPLE DISKETTE DIRECTORY FILE (WITH UP TO 1200 
INDIVIDUAL FILE NAMES). ..ALLOWS SELECTIVELY LISTED OR PRINTED LISTS OF 
DIRECTORY FILES IN COMBINED SORTED ORDER (FOR EXAMPLE. LISTED ALPHA- 
BETICALLY BY DISKETTE. OR A COMPOSITE ALPHABETICAL LIST OF ALL YOUR 
DISKETTES!) 

DEBUG-II. ADDS SEVERAL FEATURES TO THE PRESENT TRSDOS DEBUG UTILITY 
INCLUDING SINGLE INSTRUCTION CYCLE. AUTO (LOOP) BREAKPOINTS. SUB- 
ROUTINE CALLING. BREAK-KEY DETECTION AND MANY OTHERS 



MODEL-II ONLY 



MODEL-II DEVELOPMENT SYSTEM 

• THIS PACKAGE IS A MUST FOR ASSEMBLY LANGUAGE PROGRAMMERS 

• INCLUDES THE MICROSOFT EDITOR ASSEMBLER PLUS WITH ENHANCEMENTS FOR 
THE MODEL-II 

• A COMPLETE DISASSEMBLER 

• SUPERZAP FOR READING AND MODIFY ANY SELECTOR ON A DISKETTE 



MODEL-II ONLY 



$12500 



MOD-II BASIC CROSS REFERENCE UTILITY 

• LIST OR PRINT A SORTED CROSS REFERENCE TO ALL NUMBERS OR VARIABLES 
WITHIN A PROGRAM 

• LIST OF PRINT ALL LINE NUMBERS CONTAINING A SPECIFIED STRING OF CHAR- 
ACTERS 



MODEL-II ONLY 



.$50.00 



**• ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE 



END USERS 
CALL: 



HOUR 
24 ORDER 
LINE 



•CQMPLITRQNICS 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY STATE) 

(800) 431-2818 



V§ 



(914) 425-1535 



DEALER INQUIRIES WELCOME 



ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR COD. OR NON-UPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S.. 
CANADA AND MEXICO 



^See List of Advertisers on Page 435 
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1040A 



Department of the Treasury — Internal Revenue Service 

U.S. Individual Income Tax Return 



'0; 0MB No. 1545-0085 



Use 
IRS 
label. 
Other- 
wise, 
please 
print 
or type. 



Your first name and initial (if joint return, also give spouse's name and initial) 



Present home address (Number and street, including apartment number, or rural route) 



Your social security number 



Spouse's social security no. 



City, town or post office, State and ZIP code 



Your occupation 



Spouse's occupation ► 



Presidential 

Election Campaign T |f joint return, does your spouse want $1 to go to this fund? . . . 



k Do you want $1 to go to this fund? 



Yes 
Yes 



Note: Checking "Yes" will 
not increase your tax or re- 
duce your refund. 



M 



micromatic TRS-8C* Owners r< ><u. < >v„ 

PROGRAMMING 
COMPANY 



Taxes Like An Expert with TAX/SAVELQ U m 

is a trademark of the Radio Shack Division of Tandy Corp. 



FCLQ MODEL I, II** cr MODEL III 

TAX/SAVER II™ — The tax help program for the layman, the professional accountant or tax preparer. 

New and expanded, TAX/SAVER II" offers a different approach to preparing a tax return. Like the original, the new version has 
the tax regulations programmed in so it is more than just a calculator. Designed for non-accountants, TAX/SAVER IP" asks you 
questions, just as an accountant does. Based on your answers, it leads you through the tax maze to your lowest legal tax. Then it 
tells you how to fill in your return, line by line, or it will output to a printer. 

TAX/SAVER II"" also has speed features for those doing more than one return. Optional program instruction and tax text make 
TAX/SAVER II'" the practical system for professional preparers as well. TAX/SAVER II™ has full disk storage of data files (with 
opfional password protection). 

The manual includes information on special tax areas, lists of possible deductions and a tax glossary. 

TAX/SAVER II™ compares itemized deductions to national averages; automatically computes certain limitations • for example, on 
medical deductions and contributions; checks for excess FICA; helps determine dependents. Yet, TAX/SAVER 11™ offers the 
privacy and convenience of home use. 

The user-oriented design with special screen formatting makes data entry, verification and correction easy. Yet you are always in 
control. You can skip any help features or parts of the program that you don't need. 

TAX/SAVER II" 

• Completes long and short forms (1040 & 1040A) 

• Itemized Deductions - Schedule A 

• Interest & Dividends ■ Schedule B 

• Tax Calculation • Tables, Rates 

• Tax Savings Methods • Income Averaging, Maximum Tax, Alternative Tax 

• Business Income ■ Schedules C & SE 

• Capital Gains - Schedule D 

• Allows you the privacy of your own home 

• Lets you help friends and relatives with their taxes 

• Has built-in aids. Answers specific questions like "Is my father my dependent?" and "Are my deductions reasonable?" 

• Manual includes 1982 tax forms, information on special tax areas, lists of possible deductions, and glossary of tax terms 

• Completes long and short forms including itemized deductions, excess FICA, earned income credit, community property, 
tax calculation (comparing all possible filing statuses in one run) 

• Tax regulations are programmed in by our team of accountants. Just type in your figures & you've done your own tax return 

• Helps you find the lowest tax 

• Discounts on yearly updates 

• Prints out on standard IRS forms overlays or plain tractor feed paper 

• Accepts totals from all other tax forms not listed here 




e/tW With, 9*d*Uou£! 
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, Creative Computing 1 81 
mputing 2 81 



REVIEWS: 

"...well designed and easy to use" D. Luba- 
"...TAX/SAVER™ may very well live up to its name' 
M. Tannenbaum, CPA. 80 Mi. 

CUSTOMERS: 

"For the price it can't be beat. I am looking forward 10 next year With Ihis 
program I finish my filing in 2 hours. Thank you." 

"Excellent presentation. Tutorial style is one of lis most attractive atlri 
botes. Finally, a program 1 can really use'" 

PROFESSIONALS: 

"This is the perfect program (or those doing I axes lor others for reasonable 
fees. It was obviously written by folks thai know boih programming and tax 
law." "TAX SAVER' - is superior." 



PROFESSIONAL TAX/FORECASTER ™ 

TAX/FORECASTER", the quick tax estimator (with printout) for both 1982 and 1983 lets you revise its estimate by merely changing one or more lines. Use it as a tax planner either 
together with TAX/SAVER 11" or by itself. TAX/FORECASTER" lets you quickly ask all of your WHAT IF? Questions and instantly recalculates your taxes. A great tax preparation 
aid for both the layman and professional. Includes Income Averaging and disk storage of Client files. 

• Both TAX/SAVER II" and TAX/FORECASTER'" are tax-deductible • Discounts are given on yearly updates • Free tax newsletter is issued annually. 
With the combined package TAX/SAVER II" and TAX/FORECASTER", you can now have, at an affordable price, the power to predict, control and reduce your tax liability. 



D TAX/SAVER II" (MOD I & III) $139.95 - Manual Included 

□ PROFESSIONAL TAX/FORECASTER" (MOD I & III) $99.95 ($79.95 if purchased with TAX/SAVER II") 
D UPDATE for Registered TAX/SAVER IP" Owners $83.95 

□ TAX FORM OVERLAYS $19.95 

□ TAX/SAVER II" - Model II** Version $199.95 

D PROFESSIONAL TAX/FORECASTER" - Model II** Version $129.95 



SYSTEM REQUIREMENTS 

□ TRS-80 Model I with 32K and 2 disk drives 

□ TRS-80 Model III with 32K and 2 disk drives 
D TRS-80 Model II** with 64K and 1 disk drive 

** Availability of Model II programs uncertain at press time. 



■CQMPJTRQMCS: 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 
DELIVERY SUBJECT TO AVAILABILITY 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY STATE) 

(800) 431-2818 



,\ HOUR 

\ 24 ORDER 
_~ LINE 

*SHl (914) 425-1535 



* 30-Day money back guarantee 

* ADD $3.00 FOR SHIPPING IN UPS AREAS 

* ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 

* ADD $5.00 TO CANADA AND MEXICO 

* ADD PROPER POSTAGE OUTSIDE U.S., CANADA & MEXICO 



424 • 80 Micro, January 1983 



SO APPLICATIONS 



by Dennis Bathory Kitsz 



This month I'll continue the LNW-80 
construction project. 
(Before jumping in, I would like to 
ask readers to make sure they glance at 
the end of this column each month. 
Very often I get letters asking questions 
whose answers have already been pre- 
sented as updates or corrections. 
Thanks, folks.) 



Photo 1. The power supply of the LNW-80 is 
quite hefty. I have used heavy-duty bridge rectifi- 
ers bolted to the case (partly shadowed, bottom 
right) and fed through barrier strips. An automo- 
tive cable clamp holds a large filter capacitor, and 
all the wires are hanked together with plastic 
clamps and bolted to the case. A power supply is 
created for an integral disk drive using the added 
heft of the LNW-80 transformer; 5- and 12-volt 
regulators are visible just above and below the 
left side of the filter capacitor. 




Finish 

your 

LNW-80 



Readers please note: although I still 
haven 7 seen it, there are apparently 
copies of a new instruction manual 
floating around. I don't know if it's 
been re/eased yet, but try to get one if 
you order an LNW-80 kit. 

The machine started to look like a 
computer when I had put all the bigger 
physical parts in place — the power sup- 
ply (see Photo 4), the keyboard, mount- 
ing hardware, and so forth. But I knew 
the painstaking stuff was still ahead. 1 
fashioned power-supply connectors 
from stakes and pins, since I really 
wanted to be able to lift the boards for 
the inevitable testing . . . without desol- 
dering wires. That was a good move. I 
raided an old television chassis for 
heavy-duty stakes and slip-on connec- 
tors, which conveniently fit the larger 
holes in the LNW circuit board. 

Assembling the power supply was 
next. Before proceeding, I confirmed a 
rumor that mounting the rectifiers 
directly on the PC board created Trace 
Krispies. I purchased the heaviest rec- 
tifiers available from Radio Shack, 
drilled a pair of holes in the case, and 
mounted them with heat-sink paste. 
Barrier strips went in next — those are 
screw terminal connector blocks — and 
the transformer and rectifiers met on 
either side. 

The transformer didn't exactly match 
its description in the book, but 1 guessed 
right on 110-volt input wires (black), 
stuck them into my extension cord (not 
recommended procedure!), and mea- 
sured the other pairs with my ac volt- 
meter. By this time I felt a little fanci- 
ness was in order, so I used terminal 
lugs instead of bare wire to make con- 
nections to the terminal block. 

The power cord was routed through, 
the fuse block inserted, and the power 
switch installed. I labeled each wire, and 
snaked the lot along the bottom of the 
case, fastening the wire harness to the 
case with plastic straps. The far ends 
were soldered to the slip-on connectors 



scavenged from the old TV. 

It was ready for the first test. All dc 
voltages were fine, so I could proceed 
with assembling the PC boards. I 
tackled all the confusing instructions. 
There were separate directions for each 
of the video outputs, and large letters 
telling me not to install certain parts if I 
wanted that type of video output (say, 
RGB instead of composite video). I 
couldn't immediately discern what I 
should do if I wanted them all — which I 
did — and a call to California evoked 
something incomprehensible about 
them not stocking RGB ROMs at the 
moment. I put all the parts in for all the 
video versions, but have only tested the 
composite black-and-white. 

Next, the trace -scraping and jumper- 
ing was done. A few board revisions 
noted in the instructions made this 
necessary. A good photograph would 
have helped enormously. In went the 
keyboard socket, and I guessed as to 
which output connectors were meant to 
go where. I guessed wrong, it turns out, 
because I later found reference to the 
connectors. 

Finally, everything was ready for 
power -supply testing. I double-checked 
that the power jumpers were out, and 
turned it on. On-board micro-fuse 
blew. Damn. They only give you one. 
The testing section was useless, but I 
found the problem after some probing 
and measuring. I had grabbed a 
regulator marked "7812" to use for the 
7812 12-volt regulator. Alas, I had read 
the date code. It was a 7805 5-volt 
regulator with the 12th week of the 1978 
date code... 7812! I fixed that, but 
what about the fuse? 

There's something about odd little 
fuses like that one. I remembered how 
as a child I used to pull the wires out of a 
wire brush and drop them on my Lionel 
train's tracks. They would heat up, 
melt, and break. The transformer 
would heat up, too, but I always figured 
the wires would break first. (I now use 
that train transformer as the power sup- 
ply for a homebrew computer interface). 
I dug through my wire bag for pieces of 
microphone cable, and unbraided the 
shield. I connected them across my 
Heath bench supply until I got a wire 
that melted and broke at the same cur- 
rent for which the fuse was rated. This 
isn't quite fast enough, but for me it was 
better than trying to locate a 2-amp sub- 
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miniature pigtail fuse here in rural 
America. 

The power supply now passes all 
tests, and it's time to put in the in- 
tegrated circuits. All the TTL stuff goes 
in first, then the miscellaneous ICs, then 
the ROMs, the Z80 processor, and the 
RAM. This is a good order, because it 
keeps the delicate stuff (processor and 
RAM, especially) from hanging loose 
while you fiddle with the other parts. 
An IC inserter also helps, though I've 
taken to picking up RAMs with a thin 
piece of black (conductive) foam held 
between thumb and forefinger. 1 can 
squeeze the leads just right to fit the 
sockets; I'm too clumsy to use an insert- 
er. The delicate parts end up popping 
out of place, heading straight for my 
smiling cats. (Yes, cats will smile if they 
see some static-sensitive memory about 
to turn into an expensive batta-bird.) 

Everything seems to be in place. 1 call 
Claire, who reads the entire parts list to 
me (in a tone of voice that says: hey, 
man, I am b-o-r-e-d) as I check. An 
hour later it's ready for testing. On. 
MEMORY SIZE? Zowdy! It's past 
three; time for bed. 

The Expansion Board 

Things seemed fine the next day, too; 
so I started the expansion board. This is 
an easier project, because it is powered 
by the main circuit board's power sup- 
ply. Feeling confident, I worked quick- 
ly, hooked up the wires, and powered 
up (Photo 5). Splat. Garbage. Nothing 
worked, not even reset-break. Now 



what? 1 carefully followed the power- 
supply wiring — I thought. The jumpers 
were numbered 1-2-3-4-5-6 (LNW-80) 
to 4-2-12-8-10-GND (expansion). The 
accompanying sketch visually suggests 
the wire placement, which is what I 
followed. Uh-uh. That placement is 
12-10-7-GND-13-4. Once I scrambled 
the wires properly, everything began to 
work. The drive came on but... no 
boot. I pushed the hi/lo speed switch. 
Still no boot. 

From Level II the machine worked 
fine. I got full, reliable memory. 
POKEs to 14304 turned the drive on 
and selected it properly. That was it. I 
checked voltages to the controller, and 
these were fine. I checked for bad solder 
joints and bridges; no luck. In despera- 
tion I pulled another 1771 disk control- 
ler from the other kit. Fine! It worked. I 
had been shipped a bum disk controller, 
or I had blown it in the assembly. Who 
knows, but the LN W was now perform- 
ing all those Model I activities with no 
trouble. Including, alas, keyboard 
bounce — at 4 MHz, it was more like 
skitter. LNW had shipped a keyboard 
mechanically almost identical to the 
Model I! And with no denounce routine 
in ROM! What was this? 

Actually, I can't get a straight story 
on that one. There have been at least 
three keyboards shipped with various 
generations of the LNW-80, one with 
no discernable bounce, straight through 
this one that was dismally disappoint- 
ing. I followed the suggestions of 
several people, including Larry Rossiter 




Photo 2. The LNW expansion board (at right), a monitor (at left), and a disk drive (back right) are all 
connected for testing. The keyboard is bolted in place and connected. This un it (the second of t wo built 
for this article) worked on I he first try. 
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of Victoria, BC. He wrote, "Shortly 
after installation of Level II in my micro 
in late 1978, I cured the keybounce by 
thoroughly cleaning the contacts, then 
packing the keytops with Dow Corning 
Compound No. 4." He tells me com- 
pound No. 2 works as well. Others have 
used various silicone gels, and they all 
seem to work for debouncing (as well as 
stopping the clacking of the keys). 

Unfortunately, the keys in both my 
units are sealed. There is no way to get 
the compound in, or to clean them. The 
only other option is at least a possible 
one: LNW ships its Level II Basic 
ROMs as a set of six 27 16 EPROMs. If 
you have access to an EPROM pro- 
grammer (Apparat has one of the best 
deals — with excellent software — for 
about $150), you can include a de- 
bounce routine of your own, just like 
that in the later Radio Shack Basics. 
Any of the popular debounce routines 
can be located in the power-up message 
area around 1 1 1H. But neither of these 
is the kind of cure I like to invoke when 
purchasing what I expect to be a step 
forward in microcomputer design. I 
hope that LNW is shipping either a 
higher-quality keyboard or a debounce 
in ROM by the time you read this. 

Running Interference 

I mounted all the boards in place 
(Photo 6), and prepared for perfor- 
mance testing. But one more complaint 
before talking about the performance 
prowess of the LNW-80. With its heavy 
metal case, I expected the machine to be 
much quieter in terms of RFI (radio fre- 
quency interference). Hardly. Yes, it is 
quieter; but this home only has a radio, 
so I trundled in a borrowed television. It 
was almost as strong as the interference 
put out by the Model I. 

Again, there is a solution to a prob- 
lem that shouldn't exist from the start. 
First, make sure the parts of the case are 
electrically connected; drill a hole, 
scrape off some paint, and add a lug to 
each section to ensure it. Ground the 
case to the computer ground. Next, ob- 
tain some very fine mesh metal screen (a 
laboratory or photo supplier is a good 
source) and cover the rear port area, 
grounding the metal screen to the case. 
The final suggestion comes from a 
commercial keyboard I saw some- 
where; can't recall where. Out of the 
finest, most flexible metal mesh you can 
get, cut 3/4-inch squares. Lift each key- 
top, insert the mesh square, and very 



SPECTACULAR GAMES 



For TRS 80 

COLOR COMPUTER 




If not available at your local daalar ask why not and 

Call Toll Free 800-426-1830 

Excapt WA.,AK., HI., (8:00-4:00 Mon.-Frl.) 



RAINBOW 



CERTIFICATION 

SEAL U /A 



^See List of Advertisers on Page 435 
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gently press it back in place. Work it 
down; if it resists, punch a tiny hole for 
the plastic cross to protrude through. 
The squares should overlap; to be sure, 
weave a piece of fine, bare wire through 
all the squares. Ground the wire. 

Use a short, high-quality cable to the 
video, and as short a cable as possible to 
the other peripherals. If you are build- 
ing peripherals, obtain Gore-shield or 
Scotch shielded multiconductor cable. 
It's expensive, but worthwhile. And 
finally, watch the cassette output. Make 
up your own shielded cable for this 
task; don't use the standard Radio 



Shack fare. With these changes, the RFI 
should now be reduced significantly. 

Tips and Pointers 

Once this first unit was working, I set 
about building the next one; perhaps 
the experience would speed the assem- 
bly, and a second kit would point out 
difficulties that luck had obscured dur- 
ing the assembly of the first computer. 
My hunch was right. 

Virtually nothing appeared on the 
video screen when I turned on the sec- 
ond unit, but my hearing is still acute 
enough that I could discern a distinct 
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S-100 
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IBM Personal Computer 



Do you use your computer? Or does your computer "use" you? Face it, if you're using floppies, your time is being wasted. 
Because a floppy is an inefficient random access storage device. Each time the processor wants to transfer data, it has to wait 
an eternity for the disk to rotate and the head to move. 

So what do you do? Get a SemiDisk. quick. It's a large capacity semiconductor memory board that is driven by software to 
operate like a disk drive. Without all the waiting. Do everything you'd do on a floppy or hard disk, with no modifications to your 
software or hardware. Two board sizes are available: 512K and 1 Megabyte, (the highest density microcomputer memory 
board in the world) And you can put up to 8 megabytes in a system by adding more storage boards. 

What do you need to use it? Just an S-100 system with CP/M 2.2. Or a TRS-80 Model 2 system with 
CP/M 2.2. Or an IBM Personal Computer. That's it. No special processors, DMA, I/O, or disk controllers are required. Plug it in 
and run the installation program, and you're on your way. Fast! Even better, we supply full source code to the driver software, in 
case you'd like to do your own interfacing. 

Best of all, the SemiDisk's price won't warp your wallet. Compare specs, cost/megabyte, storage capacity, and 
compatibility with the competition. You'll see that the SemiDisk is a disk emulator truly worthy of the name. SemiDisk has 
battery-backup capability, too. 

Consider our limited warranty: A full year, covering all parts and labor. Consider our liberal 15 day return policy. Price? 
SI 995 for 51 2Kbyte SemiDisk. $2995 for I Megabyte SemiDisk. Both from stock. SI 0.00 for manual. VISA. Mastercard, COD 
orders accepted. Dealer and OEM inquiries welcomed. (Specify system type and disk format when ordering.) 



Someday, you'll get a SemiDisk. 

Until then, you'll just have to wait. 



SemiDisk 
SYSTEMS 



P.O. Box QG 
Beaverton. OR 97075 



(503)-642-3100 




Call (5031-646-5510 lor CBBSVNW, a Semi-Disk-equipped computer bulletin board. 
SemiDisk trademark of SemiDisk Systems: TRS-80 trademark of Radio Shack 
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change in the horizontal oscillation 
from the monitor. A normal video 
screen is theoretically scanned 15,750 
times per second; monitors and televi- 
sions actually produce a high-pitched 
whine at this frequency when locked in- 
to an image. However, their "free run" 
frequency is nearby, but rarely on-fre- 
quency, and electronic noise from here 
and there causes it to wobble and fluctu- 
ate. Turn on a television, turn the sound 
down, tune to a known station, and 
listen to the high whine; then switch to 
an unused channel, and hear how the 
whine wobbles or disappears entirely. 

If your ears are up to it — mine are yet 
young enough — listen for a change in 
your monitor's high-frequency whine to 
a pure, stable pitch when you turn on 
the computer. That generally means the 
horizontal synchronization has locked 
in, and your computer is providing 
video output. In fact, a few smeared 
dots were visible just at the top of the 
screen; variable capacitor CI 40 (left 
side of the board) was far out of adjust- 
ment (it provides sync), and the vertical 
and horizontal positioning controls 
(variable resistors R144 and R145, back 
middle) were also far off. The first com- 
puter had properly locked in the video 
by chance; I turned these three controls 
until the image stabilized. 

After the computers were moved, or 
during temperature changes (it's ap- 
proaching winter as I write this), the 
video began to glitch. Carefully adjust- 
ing C140 — with a plastic screw- 
driver — will eliminate this. You might 
want to drill a tiny hole in your cabinet 
so you can reach this control. The video 
on the LNW-80 is created quite dif- 
ferently from that in the TRS-80 
because the LNW is set up to provide 
several types of output. Thus, the 
Model I/III hardly ever needs adjust- 
ing, whereas the LNW does. 

LNW has done a very good job of de- 
glitching the video display — eliminating 
the screen hash that was prevalent, 
especially during games. However, it 
didn't work on one of my machines, 
making the display not only hash-filled, 
but worse than the usual state of affairs. 
I traced the difficulty to slow U121 and 
U151, which I replaced with higher- 
speed ICs. If your screen glitches, try 
that solution first. 

High-Resolution Graphics 

This video glitch problem prompted 
me to test all the high-resolution graph- 
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ANNOUNCES ECONOMICAL BUSINESS AND EDUCATIONAL 
SOFTWARE FOR TRS-80 MODEL I AND III COMPUTERS. 



MANAGEMENT COMPONENT INFORMATION SYSTEM (HI.C.I.S.) $49.95. 

• Fast access, easy entry, update and installation. 

• Up to 12.000 items catalogued. 

• Cross references up to 8 categories per item 

• Produces printed reports 

ENHANCEMENT TO TANDY MFG. INVENTORY CONTROL PROGRAM #261559 $49.95. 

• Maintains records on 3 Vendors per part, price breaks, purchase 

history and minimum inventory levels. 

• Generates Purchase Orders and maintains status ot each. 

• Automatic updates ot inventory and price 

Following EDUCATIONAL PROGRAMS written by 
D. Wittwer, 19 Year Science/Math Educator. 

BASIC LANGUAGE PROGRAMMING TUTORIAL I $39.95. 

• 10 Lessons which advance student to Intermediate Competency 

BASIC LANGUAGE PROGRAMMING TUTORIAL II S39.95. 

• 8 Lessons which advance the student to Advanced Competency. 

Software is available on cassette or diskette (please specify). 
Terms Prepaid or C.O.D. VISA or Mastercharge accepted. 

Write MECA for complete details. 

meca 

56677 Sunset Avenue - Yucca Valley. CA 92284 " 3C 



Computer Peripheral 
Resources 

5 Vi" Disk Drive Power Supplies 



•Guaranteed in writing for 1 20 days. 

• Cases accommodate all standard 5 'A" drives. 

•Over current and over voltage protection. 

•Dealer inquiries invited. 

•Call or write for quantity discounts. 



- SPECIAL - 

2 New Bhugarl Drive 

1 Dual P/S H or V 

1 Two Drive Cable 

S489.95 



— — Dual Power Supplies— 

•Horizontal— 12x12x3 1 /2 $74.95 

•Vertical — 7x12x6 $74.95 

• Open Frame — 7x2x3 w/o-case $59.95 
•Single Horiz. P/S — 

6x12x3 1 /2 $44.95 

• Custom 4' 2-Drive Cable $21 .00 

•4-Drive Cable $32.00 

•Dual Case, Horiz. or Vert. 

(w/o P/S) $24.95 

•Single Case. Horiz. (w/o P/S) . . . $1 8.95 
•Shugart 5Va Disk Drive $204 95 

SA 405 — 6ms T-T. SS. SD or DD 




Terms: Personal checks allow 14 days, COD, 
M.D., Certified Checks. ..Credit Cards add 3% 
Shipping and Handling: $3.00 West and $6.00 
East states. All shipping USP surface other 
means extra. 

Send to: 

C.P.R. 

P.O. Box 834, 

Oak Harbor, WA 98277 
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(206) 679-4797 
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TIRED OF NO DISK SOFTWARE? 



TRS-80 




TOLL FREE 
ORDERS ONLY 

800-426-1830 



Flexplus 

Compatible 

Software 

Sleuth Disassembler ■ A program which 
allows user to examine, modify and dis- 
assemble object program files on disk or in 
memory on 6809 systems. Will convert an 
object file in RAM to a text file on disk. 

Tabularasa (Electronic spread sheet) - These 
programs enable the user to generate and 
maintain tabular computation schemes, pro- 
viding a simple user interface and sophisti- 
cated report - generation. 

Cross Assembler • A set of modules for 
6800/1. 6805. 6802. 8080/5. and Z 80 
micro processors which will enable the user 
to convert a master assembly module to 
assemble code for any of the above micros. 

PASCAL 



FLEXPLUS DOS 



EXCEPT WA. HI, AK 



FLEXPLUS is a powerful, easy-to-use disk operating system Spectral Associates has adapted 
TSC's FLEX to the best DOS completely compatible with Radio Shack software for use on the 
Color Computer Eiiminate the need for Radio Shack s TRS DOS use FLEXPLUS with 
Editor Assembler and have the options of a full range of utilities FLEXPLUS works on the 32K 
Radio Shack disk system with 64K memory chips with a High Resolution multi screen format that 
supports a 24 line by 51 character display! Also included are special enhancements to Radio 
Shack's Disk system when you are running FLEX with single or double sided single or double 
density. 35. 40 and 80 track dnves 

Advantages of FLEXPLUS are: 

• Best price anywhere 

• Easy start-up — just type "RUN FLEX+" 

• Allows you to save RS compatible disk files from FLEXPLUS 

• All FLEX compatible software will run including INTERRUPT 
DRIVEN SOFTWARE 

• NO HARDWARE MODIFICATIONS NEEDED 

• Warranty will not be voided — no need to open computer 

• Wide range of available software 

• Requires Supercharger board 

• $149.95 for FLEXPLUS. Editor/ Assembler and Supercharger 



SPECTRAL 
ASSOCIATES 

145 Harvard Ave. 

Tacoma, Washington 98466 

(206) 565-8483 

WRITE FOR COMPLETE 
CATALOG 

ADD 3% FOR SHIPPING NO COD 

VISA OR MASTERCHARGE ACCEPTED 



sSee List of Advertisers on Page 435 



AVAILABLE ON DISK: 

• Editor Assembler 

• Super Monitor 

• Color Text Star Word 
Processor 

• Sound Source 

• Compuvoice 



Call or write us for price information 
and for a complete list of Flexplus 
Compatible Software. 



SUPERCHARGER - Allow machine language access 
to all 64K RAM in a Series E PC board. 
No hardware mods. $39.95 

DISK BASED EDITOR/ASSEMBLER • MACROS 
CONDITIONAL ASSEMBLY • will work with Super- 
charger. $49.95 



FANTASTIC BARGAIN 

FLEXPLUS. Editor/Assembler and Supercharger 
ALL FOR ONLY $149.95 
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ics, video reverse, and so forth. Using 
OUT 254,N commands, I discovered 
that normal and reverse video modes 
worked properly, and the high-resolu- 
tion graphics appeared. But the hi-res 
dots were blinking on and off random- 
ly. I tried POKEing to the screen 
memory locations, but to no avail. That 
was the first mistake; I had let my ex- 
pectations deceive me. No, you cannot 
write to high-resolution memory from 
Basic on a stock LNW computer. 

Here's how the high-resolution mode 
is organized: The hi-res memories are 
addressed at the same location as the 
Basic ROMs. This means that the screen 
circuitry can read them at any time, but 
the CPU cannot — trying to do so would 
put the Basic ROMs in conflict with the 
hi-res memory. In other words, reading 
the information in graphics memory 
must be done from machine language 
or machine-language subroutines, be- 
cause the Basic ROMs are turned off 
during the time hi-res memory is being 
read. However, my good sense told me 
that since you can't write to the Basic 
ROMs, the write circuitry would always 
be left enabled. That way Basic could 
clear the hi-res screen, draw lines, 
circles, and so on at all times. Since 
reading the hi-res memory is a less fre- 
quent task, machine-language routines 
could be used effectively in that case. 

Wrong. LNW has designed its ma- 
chine to require disabling the Basic 
ROMs whenever high-resolution graph- 




Photo 3. The expansion board is oriented upside 
down and bolted above the main CPU board. 
Off-size washers and close traces shorted out the 
system several times before I discovered the 
physical problem. 
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ics are required. The incomprehensible 
and disorganized section of the manual 
describing hi-res obscures this fact in 
gibberish, but 1 finally confirmed it. So 
my next step was to write a short hi-res 
routine to switch in hi-res mode and 
clear the hi-res screen. Nothing hap- 
pened. The randomly blinking memory 
continued. I checked and rechecked the 
software. It should have worked; I 
transferred to the other machine (some 
dots were blinking there, too) and it 
did work. 

If you recall, in my last column I 
described the bleariness that forced me 
to give up examination of the printed 
circuit board. It was a bad move, as I 
was to learn after several hours of frus- 
tration with this problem. The hi-res 
video write line (WRT4116) simply 
evaporated in mid-trace. It just faded 
out for a while (sort of like a Vermont 
road), and then returned a quarter-inch 
later. Moral #1: Check every trace 
on the board before assembling a sin- 
gle part! 

My routines now successfully cleared 
the hi-res screen. But many dots still 
blinked back on and off, worse as I put 
my hands nearby. I assumed the bypass 
capacitors (all those 0.1 mF parts, and 
the tantalum electrolytics) were misbe- 
having. I was short on tantalums, so I 
had substituted aluminum electrolytics 
in a few spots; my new supply of tan- 
talums (they look like small blue, green, 
or red beads) had just arrived. Some of 
the blinking cleared up when the better 
capacitors were installed. Moral #2: Use 
high-quality bypass capacitors, and 
don't leave any out. 

The memory is specified as 250 ns for 
the high-resolution video. Mine were 
sold as 200-250 ns, so I switched them 
with some guaranteed 150 ns memory. 
The flickering dots disappeared. Not 
having worked out the actual access 
time for these memories, I can't say that 
the 250 ns specification is inaccurate, or 
if I just had a bunch of memories that 
leaned past the 250 ns access time. 
Moral #3: Respect or exceed designer 
specifications in this project; there is lit- 
tle leeway. Good memory is cheap now, 
so get guaranteed 200-ns types. 

Now hi-res was working, and I have 
to commend LNW on the detail in this 
resolution. With the 9-inch Motorola 
monitor I am using, the detail on diago- 
nal lines and curves is exceptional, pos- 
sibly the best of any small computer in 
its price range. And this detail also 



makes possible an 80-character-by-24- 
line screen display, for which LNW has 
devised software. It isn't provided with 
the LNW, but make sure you request it 
when ordering if you're a long-line 
freak. It will be off-center with respect 
to the normal text screen (the hi-res ex- 
tends an additional 128 dots through an 
area to the right of the usual screen), but 
that can be adjusted via the internal 
horizontal positioning control R144. A 
full-size potentiometer can also be 
mounted on the back panel of the com- 
puter. Use the shortest wires possible 
from the PC board. 

But one thing still bothered me: How 
could I write to that hi-res memory with 
Basic intact? I just liked the idea, be- 
cause creating machine-language pro- 
grams for everything wasn't interesting 
to me. After two hours of searching 
through the schematic, I located all the 
signals that control the relationship be- 
tween high-resolution graphics and 
Basic. 

Here's how it works now: U67 is a 
latch that holds the status of port 254; 
data line 3, when latched into U67, de- 
termines the state of the graphics-read- 
enable (GRRDEN*) signal. Find this 
circuit on sheet 2, lower left quadrant, 
center. When GRRDEN* goes high, the 
output of OR gate U66 (graphics lower 
16K, GLWR16K*) is held high, which 
in turn holds the output of NAND 
gate U51 low (read-write disable, 
RDWRDIS). Find this circuit on sheet 
1, lower right quadrant, center right. 

When RDWRDIS is low, then the 
bus enable lines read-out (RDOUT*) 
and write-out (WROUT*) are gated low 
through OR gate U36. Find this on 
sheet 1, upper center. RDOUT* and 
WROUT* are in turn gated through 
buffer U18 by ENABLE*, the external 
bus-request line, to create the 
computer's completed read (RD*) and 
write (WR*) signals ... sheet 1, upper 
right quadrant, center. Up to this point, 
the normal operation of the computer's 
ROM and RAM are guaranteed by the 
presence of the completed RD* and 
WR* signals. 

When OUT 254,8 is commanded, 
however, GRRDEN* goes low. It trig- 
gers RDWRDIS high, disabling the 
ROM. It also sends GLWR16K* low. 
GLWR16K* is gated through OR gate 
U152 together with internal-read 
(IRD*) and internal-write (IWR*) to 
create graphics memory enable 
(GRAMEN*) and graphics RAM write 
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(GRAMWRT*). Find this process on 
sheet 2, upper right quadrant, lower 
right. GRAMEN* is used to allow the 
CPU's data bus to read the high- 
resolution graphics RAM, and GRAM- 
WRT* goes through a few more per- 
mutations before it is permitted to write 
CPU data to the hi-res RAMs. 

My concern is twofold: First, con- 
tinue to disable the ROM during 
graphics read. Second, enable the ROM 
during graphics write. No change is 
necessary to achieve the first goal. 

The second task, however, is tricky 
unless the goal is turned around . . . not 
"enable the ROM" but rather "stop 
disabling the hi-res write." OUT 254,8 
should still work as specified in order to 
keep full compatibility with all LNW 
software. Instead, the solution lies in 
enabling the hi-res write. By working 
back from GRAMWRT*, it is possible 
to gate IWR* together with some new 
signal to create an always-active 
GRAMWRT*. This is done by discon- 
necting the offending GLWR16K* 
(created from A15, A 14, and GR- 
RDEN*, and dependent on OUT 
254,8), and replacing it with a new 
signal — I called it new graphics write 
(NEWGRWR*)— obtained from the 
gating of A15 and A14 at U66. 

So here's the process, in order: 

• Identify U152 pin 9 from the bottom 
of the board, and note that a trace leads 
in two directions from this pin. 

• Cut the trace leading from U 1 52 pin 9 
to U152 pin 12. 

• Cut the other trace leading to U152 
pin 9 (from U66 pin 11). 

• Connect a wire from U 152 pin 12 to 
U66 pin 11. This restores GLWR16K*. 

• Connect a wire from U 1 52 pin 9 to 
U66 pin 8. This creates NEWGRWR*. 

• Cut the trace leading to U139 pin 2 
(from U141 pin 16). This frees 
LGRAMWRT*. 

• Connect a wire from U141 pin 16 to 
spare gate U151 pin 9. This gates 
LGRAMWRT*. 

• Connect a wire from U67 pin 14 
(HRES*) to spare gate U168 pin 9. 

• Connect a wire from U67 pin 6 (GR- 
RDEN*) to U168 pin 10 

• Connect a wire from U151 pin 8 to 
U139 pin 2. LGRAMWRT* gates on 
either HRES* or GRRDEN*. 

If you get into trouble with some 
software and need a defeat switch, 
here's how: 

• Obtain a double-pole, double-throw 
switch. 



• Take the wire off U66 pin 8 (still con- 
nected to U 152 pin 9). Connect it to the 
center left terminal of the switch. 

• Hook a new wire from U66 pin 8 to 
the lower left terminal. 

• Hook a new wire from U 1 52 pin 1 2 to 
the upper left terminal. 

• Take the wire off U151 pin 8 (still 
connected to U 139 pin 2). Connect it to 
the center right terminal of the switch. 

• Hook a new wire from U 1 5 1 pin 8 to 
the lower right terminal. 

• Hook a new wire from U 1 4 1 pin 1 6 to 
the upper right terminal. 

• Switch up is modified; down is 
normal. 



"Notice that lines 

HID0-HID5 don 't seem 

to come from anywhere. " 



The modification is complete. You 
can write to the high-resolution graphics 
screen during display hi-res and activate 
hi-res modes (OUT 254,N where N =2, 
3, and 6 through 15). There are subtle 
timing changes that should not affect 
the operation of your machine, but the 
mod is easy enough to try and remove if 
there are any difficulties. 

Postscript to this mod: It was made 
infinitely more difficult by the layout of 
the LNW schematic. In the next column 
I hope to make available "schematic 
maps" for the LNW computer and ex- 
pansion board, identifying parts and 
signal lines by mnemonic, description, 
purpose, source, and direction. In the 
meantime, notice that lines HID0- 
HID5 don't seem to come from any- 
where; they are sourced at the outputs 
of hi-res memories U105, U107- 
Ulll, the DOUT lines. 

Also next time: Model I /1 1 1 compari- 
sons, the success of the 4 MHz mode, 
questions of weight and heat, thoughts 
on reliability, and how to operate your 
LNW-80 from the auto. (That's what I 
got mine for.) And — for the desper- 
ate — sources for all parts that LNW 
doesn't supply. Also coming up in the 
future: More music for the Model I, the 
long-delayed EPROM programmer, 
and some software trinkets that I've 
been collecting. 

Updates, Corrections, and Thoughts 

• I've gotten the word from Fort 



Worth: Leave us alone, since there are 
no more leftover Model I keyboards ! If 
you want to do the Color Computer 
modification I presented in January, 
1982 you'll have to buy a new keyboard 
from Radio Shack National Parts at 
about $80 or, cheaper, from Jameco 
(1355 Shoreway Road, Belmont, CA 
94002, (415) 592-8097; part number 
K62, $34.95). 

• The way I described the 32K memory 
upgrade for the Color Computer two 
columns ago was a little sloppy. Let's 
try again: 

1. Open the case and remove the 
metal lid. 

2. Move all the jumpers from their 
current position to the 32K position. 

3. Jumper the pins marked R83 (left 
of the 6883 SAM chip U10) with a 
33-ohm resistor. 

4. The HI/LO jumper can be in 
either position. 

5. Here's the important one I forgot 
to mention: 

Remove (cut or break off) capacitors 
C31, C35, C45, C48, C61, C64, C67, 
and C70. These sit across what used to 
be a power -supply line and is now an 
address line. 

6. Insert the 64K chips. 

7. Reinstall the cover and case, and 
power up. 

Many thanks to all those who wrote 
(at least those who were civil). 

• I submitted an incorrect early version 
of the CoCo ROM Pack printed circuit 
layout in August Applications. (See "80 
Input" next month for more.) Readers 
wishing a corrected layout can write to 
me at Roxbury, Vermont 05669. Since 
this is my fault, forget the SASE. Just 
send your address; I'll pay the postage. 

• Important note: The source for the 
Micro Front Panel, Word Processing 
Lowerkit, CoCo ROM Pack, CoCo- 
Port, and other projects featured in this 
column is no longer MSB Electronics, 
which fell victim to the current econom- 
ic recession. You can obtain my proj- 
ects from Hometronics International, 
7701 Fifth Ave., Brooklyn, NY 11209, 
(212) 680-9757. Owners of any projects 
purchased from MSB Electronics 
should write to Michael Barton, 25 
Park Street, Barre, VT 05641 for infor- 
mation. 

• Langley-St. Clair Instrumentation 
Systems has a treat for Model I, II, and 
III owners — colorful picture tubes for 
your video display. I've had green tubes 
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in various computers for a while, so I 
decided to try out the Langley orange 
unit, a color that is popular in Europe. 
The results are impressive, not only 
because the image is crisp and well de- 
fined, but also because of a subtlety in 
the phosphor itself — it decays (fades 
from the screen) slower than the screen 
is refreshed. This means that the usual 
screen flicker is gone, and your eyes and 
brain can relax through more hours of 
computing. Also, the annoying screen 
glitches (due to CPU accessing) are 
significantly reduced. 

The tubes are not very expensive ($80 
for green, $90 for orange, and more for 
the soon-to-be-released blue and red) 
and are shipped with excellent instruc- 
tions. I installed my unit in less than a 
half hour. There is no soldering, only 
the removal and replacement of a few 
bolts and the tube socket. 

One caution (mentioned in the newer 
Langley documentation): Don't leave a 
menu on the screen continuously for a 
few days with the brightness way up. 
You can burn the image into the screen, 
causing permanent dim spots in some 
areas. Also, expect a bit of a disappoint- 
ment if you switch often from normal 
to reversed screen images — ghost im- 
ages do appear on the screen if you've 
spent a long time in normal mode and 



switch to a reverse mode. They fade in a 
few minutes, longer if you've been us- 
ing lines of text. Ghosted horizontal 
blurs can last an hour or more after I 
use a word processor for an afternoon. 
But now that I have the orange tube, I 
don't plan to give it up — unless I decide, 
just for fun, to get the red one. 
• I received a letter from Larry Holmes 
of Holmes Engineering. I've recom- 
mended the Holmes Engineering inter- 
nal memory boards, and am anxiously 
waiting for some of his other products. 
All seem extremely reliable and very 
well thought through. I would like to 
quote some interesting information 
from Larry's letter regarding the use of 
64K RAM chips in a Model I keyboard: 

"Although the 64K RAM chips do 
not draw any more power than the 16K 
chips they replace, the 64K chips draw 
all their power from the +5-volt sup- 
ply. The 16K chips draw very little power 
from the + 5-volt supply; most of their 
operation is drawn from the + 12-volt 
supply. The 16K chips use the + 5-volt 
supply only for their output buffers to 
obtain TTL levels at the outputs. 

"I am concerned that 64K chips can 
cause enough of an increased load on 
the + 5-volt regulator inside the key- 
board unit to cause problems in some 
systems, especially if other hardware 




Photo 4. The finished LNW-80. The monitor and single drive are fastened to the case below with strips 
of foam tape, making a secure and transportable — thoughfquite heavy — system. 
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mods are present (such as The Patch 
lowercase mode, which draws a lot of 
+ 5-volt power). Eight RAM chips plus 
nine TTL chips is not a trivial load! This 
is why Holmes Engineering did not pur- 
sue a 64K board. Especially when run- 
ning at double speed (which increases 
the power drawn by the RAM and to 
some extent the entire computer), you 
could draw 300 mA or more from the 
+ 5-volt supply. Add another 200 mA 
from other mods, and you will have a 
problem. 

"One solution to this problem: The 
+ 12-volt regulator in the keyboard unit 
can easily handle 500 mA of current. By 
placing a 7805 regulator in series with 
the + 12-volt regulator, you can pro- 
duce a second + 5-volt supply in the 
keyboard unit. If you aren't using 41 16 
(16K) RAMs, you don't need the + 12- 
volt supply. It would probably be best 
to place a capacitor on both the input 
and output of the 7805, as shown in the 
data manuals, and heat-sink the 7805. 

"It is the extra capacity of the 
+ 12-volt regulator, as opposed to the 
+ 5-volt regulator, which allows the 
Holmes Internal Memory to operate re- 
liably even though it triples the number 
of RAM chips inside the keyboard." 

As readers know, I reviewed the Ex- 
atron MM-800 memory board favor- 
ably in my last column. I installed it 
inside a machine without any modifica- 
tions other than lowercase, so there was 
fully reliable operation. However, 
Larry's letter prompted me to reread 
the 64K RAM data sheet. I found that a 
set of eight chips draws approximately 
560 mA when active. Since the chips are 
active about half the time, Larry's 300 
mA estimate is reasonable. By contrast, 
the 16K chip specification is a com- 
parable 240 mA from the + 12-volt sup- 
ply for eight chips (less than 1 50 m A on 
average); however, just 34 mA per set is 
drawn from the + 5-volt supply (all out- 
puts low), and only during the read 
cycle — an effective drain of about 15 
mA. Therefore, using 64K RAMs de- 
mands about 300 mA from +5 volts, 
whereas four sets of 16K RAMs (the 
same total memory) requires only about 
60 mA. At worst, the 64K worth of 16K 
chips uses less than half the power than 
one set of 64K chips. As usual, I leave 
the final evaluation to the readers; 
please write if you experience any 
power-supply or heat-related problems 
with the Exatron MM-800 in a machine 
with other modifications. ■ 
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plus much, much more. . . 



FOR YOUR MODEL I & III 



NOW— create color 
graphics and play color 
games on your TRS-80* 
MOD 1 & MOD 3. 
CHROMAtrs Kit 




UNRETOUCHED PHOTO 



CHROMAtrs assembled & tested 5 169 



WITH 15 VIVID COLORS 



IMow be first! CHROMAtrs lets you create color graphics with capabilities never before possible on 
TRS-80*. You'll be able to play color games with such brilliant effects your friends will be green with envy — 
or any other color of your choice — and all this on your own TRS-80* MOD 1 & MOD 3! 



CHROMAtrs includes: 

•15 vivid colors 

• High resolution graphics (192 x 256) 

•Atari® joystick and paddle interface 

•Audio and video outputs 

•3 Dimensional simulation through 36 prioritized 

display planes 



• Routines to provide high speed color 
graphics capability through Basic 

• Operating manuals 

• One complimentary game 

• 16K RAM on board 



The TRS-80* memory is not used and there is no modification necessary (warranty not voided). This 
uncomplicated system is so simple to connect you'll be amazing your friends with your color powers immedi- 
ately. 

South Shore Computer Concepts, Inc. 



Please send 

□ CHROMAtrs KIT *99 

D CHROMAtrs assembled & tested . $ 169 

D TRS-80* MOD 1 cable $ 12 

'TRS-80" is a product of Tandy Corp. 



□TRS-80* MOD3cable $ 14 

□ Modulator with cables & switch box . $ 25 

Sub Total 

N.Y.S. residents sales tax 7% % 

Handling & shipping $ 5 

Total amount order 



Check one: 

Check or M.O. enclosed 

Master Charge Visa 



Account # 

Signature _ 
Name (Print) 

Address 

City 



expiration . 



.State. 



-ZiP- 



SOUth Shore Computer Concepts, Inc. • 1590 Broadway, Hewlett, N.Y. 11557* Phone Orders Taken (516) 5694390 
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MORE THAN JUST ANOTHER PRETTY FACE 



Says who? Says ANSI. 

Specifically, subcommittee X3B8 of the American 
National Standards Institute (ANSI) says so. The fact 
is all Elephant™ floppies meet or exceed the specs 
required to meet or exceed all their standards. 

But just who is "subcommittee X3B8" to issue such 
pronouncements? 

They're a group of people representing a large, 
well-balanced cross section of disciplines— from 
academia, government agencies, and the computer 
industry. People from places like IBM, Hewlett-Packard, 
3M, Lawrence Livermore Labs, The U.S. Department 
of Defense, Honeywell and The Association of Com- 
puter Programmers and Analysts. In short, it's a bunch 
of high-caliber nitpickers whose mission, it seems, in 
order to make better disks for consumers, is also to 



make life miserable for everyone in the disk-making 
business. 

How? By gathering together periodically (often, 
one suspects, under the full moon) to concoct more 
and more rules to increase the quality of flexible 
disks. Their most recent rule book runs over 20 single- 
spaced pages— listing, and insisting upon— hundreds 
upon hundreds of standards a disk must meet in 
order to be blessed by ANSI. (And thereby be taken 
seriously by people who take disks seriously.) 

In fact, if you'd like a copy of this formidable docu- 
ment, for free, just let us know and we'll send you 
one. Because once you know what it takes to make 
an Elephant for ANSI . . . 

We think you'll want us to make some Elephants 
for you. 



ELEPHANT. HEAVY DUTY DISKS. 
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For a free poster-size portrait of our powerful pachyderm, please write us. 

Distributed Exclusively by Leading Edge Products, Inc., 225 Turnpike Street, Canton, Massachusetts 02021 

Call: toll-free 1-800-343-6833; or in Massachusetts call collect (617) 828-8150. Telex 951-624. 



READER SERVICE 

Please help us to bring you a better magazine— 
by answering these questions. 
This card valid until February 28, 1 983 



Reader Service: To receive more information from any of the advertisers in this issue of 80 
Micro circle the number on the postage-paid Reader Service Card that corresponds with the 
Reader Service number on the ad in which you are interested. You will find numbers, preceded 
by a y*, near the logo of each advertiser. Complete the entire card, drop into a mailbox and in 
4-6 weeks you will hear from the advertiser directly. 
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6 Modoms 

6 PMC4LNW micros 



B. Ho* much interest do you have m articlos orUho lollo 
5 a much interosll 

I, Printers „ . .3 PtoitO'S 

2 Disk drives ,4 Hard disk drives 

C. 'I you plan lo buy a new printer during iho noxl year, how much do you expect to spend 7 
:i UndorS2SO .4 S75I-S1.000 ~> 52.0O1-J2.5O0 
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D. II you plan to buy a plotter during the next year, how < 
I Under S250 4 J761-SI.00O 

.2 S251-J500 5. J1.001 -J1.5O0 

3 S501-J750 _6.J1.501-J2.000 

E If you plan lo buy a new modem during the next year, how much do you expect to spend? 
1. Under J250 4 J751-J1.000 7 J2.001-J2.500 

. 2. J251-S50C :.5. SI.001Jl.500 . .8 Over J2.500 
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F. II you were planning to purchase an additional microcomputer, would you buy another 
TRS-60? 

11. Yes 2. No 

G. What is your maior application lor your TRS-dO' 
_ 1. Wed processing 5. Games 





2. Business 
. .3 Freelance clerical 
4. Education 


6. Hobby 

7. Other home use 
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1. Word processing 

. 2 Business 
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• .4 Education 
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i Yes 
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5 Games 
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7. Other home use 
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2 No 
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Whore do your childicn 

1 At home 

2 At school 


use a microcomputer? 

. 3. Both of the above 5. Don't use a micro 
4. Other : 
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edited by Eric Grevstad 
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TDK Floppy Disks 



TDK Debuts Disks 



TDK, a familiar name in audio and 
video recording, has entered the com- 
puter arena with two 8-inch and three 
5!4-inch floppy disks and two data 
cassettes. 

The disks, certified error free for 
double-density encoding, are sold with 
individual envelopes in boxes of 10. 
They are designed for rigorous business 
use and backed by an extended warranty. 

The 8-inch disks are single-sided and 
single density ($7.20), formatted for 128 
bytes in 26 sectors; and double-sided, 
double density ($8.90), formatted for 
1,024 bytes in 8 sectors. The 5 Va -inch 
disks, all double density, are single- 
sided ($5.50), double-sided ($7.85), and 
double-sided 96 tpi ($8.90). The 
HR-300 cassette ($6.80) is for non- 
ANSI applications, while the HR-850 
($7.85) meets ANSI, ECMA, and ISO 
standards. 

The disks and cassettes are sold 
through dealers. For more information, 
write TDK Electronics Corp., 12 Har- 
bor Park Drive, Port Washington, NY 
11050. 

Reader Service «^586 

Programming Utility 

ULTPLS is a monitor and utility for 
Assembly-language programmers. It 
lets you load, test, and modify pro- 
grams, and make and verify tapes with- 
out using a reset switch or starting 
through system mode. 

Memory can be loaded by file name 
or first file, and up to six files verified 



on tape. A find data feature locates up 
to 25 bytes and displays starting ad- 
dress, while a clean tape command 
writes zeroes to tapes with leaders. 

In addition, the utility can dump 
memory to tape, assign a file name, dis- 
play and allow change of memory at 
any address, and interface to and from 
EDTASM. A user monitor converts 
ASCII keyboard data to hexadecimal 
and saves it in buffers. 

ULTPLS for the Model I or III is 
priced at $19.95 for tape and user's 
manual. For more information, contact 
Bulldog Software, 2706 Bentwood, 



Palestine, TX 75801, (214) 723-0942. 
Reader Service »^551 



Model II Accounting 

A new general-ledger package for the 
Model II records transactions and bal- 
ances and provides accurate statements 
of your financial position. With 
accounts-receivable, accounts-payable, 
and payroll programs, it forms an in- 
tegrated double-entry accounting 
system. 

The ledger's departmental and sum- 
mary income statements show current 
and year-to-date amounts, percentages 
by category, and comparative data with 
the previous year. The chart of accounts 
contains a five-digit account number; 
description; and current, year-to-date, 
and budget balances. For format flexi- 
bility, you can specify account type, a 
master/subaccount code, and a bal- 
ance-sheet column code. 

The accounting programs run on the 
64K Model II with dual disk drives, and 
cost $149 each. Hard-disk versions are 
available for $199, and a set of all four 
on hard disk for $717. For more infor- 
mation, contact Micro Architect Inc., 
96 Dothan St., Arlington, MA 02174, 
(617) 643-4713. 

Reader Service «^571 

Power Loss Insurance 

Integrated Devices' DSV1 disk-saver 
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DOES STRING COMPRESSION HAVE YOU 
TIED UP IN KNOTS? 

LET TRASHMAN CLEAN UP THE MESS! 

TRASHMAN is a machine language utility for the TRS-80 Models I and III. It was written by Glenn 
Tesler, the author of FASTER, and can reduce BASIC'S string compression time by 95% (see table below). 

WHAT'S STRING COMPRESSION? 

When a BASIC program changes a string (words, names, 
descriptions), it moves it to a new place in memory, and leaves a hole in 
the old place. Eventually, all available memory gets used up and BASIC 
has to push the strings together to free up some space. This takes 
time. Lots of time. The computer stops running for seconds or minutes, 
and you may even think it's "crashed". The keyboard won't work, and 
until all the strings have been collected, you just have to sit and wait. 
Then things run for a while, until string compression is needed again. 
And again. 

If you're using your computer for business, that wastes your money. If 
you're using it personally, it wastes your time. 

WHAT'S THE SOLUTION? 

As soon as you start using TRASHMAN, those delays almost 
disappear. It uses less than 600 bytes of memory, plus 2 bytes for each 
active string. It works with other machine language programs and with all 
major operating systems. It's easy to use, comes with complete 
instructions, and can be copied to your own disks. 

WHAT'S THE CATCH? 

If a BASIC program uses only a few strings, very little time is wasted 
in string compression, and TRASHMAN won't be helpful. But. if 
hundreds of strings, including large string arrays, are used. TRASHMAN 
is just what you need. 

TRASHMAN is available on disk 
for just $39.95. 

(All timings done on TRS-80 Model I. Model III 15% faster, but pet. improvements identical. Listing of timing program available on request.) 




# 


SECONDS DELAY 


PERCENT 


STRINGS 


NORMAL 


TRASHMAN 


IMPROVEMENT 


250 


11.8 


0.7 


94 


500 


45.8 


1.6 


96.5 


1000 


179.6 


3.5 


98 


2000 


713.2 


7.8 


98.9 



SAVE TINE WITH FASTER 




You can 



"FASTER" speeds up 
most TRS-80 BASIC programs 
by 20-50%. It's helped hun- 
dreds of satisfied people and 
it can help you. Detailed in- 
structions make it easy to 
use. FASTER analyses your 
BASIC programs while they 
run. then displays a simple 
change, usually one line, 
that sequences program vari- 
ables so the ROM will find 
them faster, 
speed up programs you've 



bought, as well as programs of your own. Since it isn't a 
compiler, your BASIC programs can be read and changed 
afterwards. FASTER works on business programs, models, 
and games. The more complex your program, the better the 
results. 

Does FASTER really work? Yes! Just check the reviews in 
Personal Computing, May, 1981, p. 116: "FASTER is effec- 
tive and easy to use"; 80 U.S. Journal April, 1982, p. 106: 
"I recommend FASTER to everyone"; and 80 MICRO (April. 
1982. p. 40): "If you.. .would like a significant increase in 
the run-time speed, then buy FASTER." 

FASTER runs on the TRS-80 Models I and III- 16-48K tape 
or disk, and all major operating systems. $29.95 

"QUICK COMPRESS" takes only 276 bytes of 
memory, and removes the blanks and remarks from even 
the largest BASIC program in less than 3 seconds. It pro- 
duces smaller, faster programs without altering their logic. 

$19.95 

SPECIAL: FASTER and QUICK COMPRESS: $39.95 




erratic disk drM&? 

You can avoid unnecessary disk 
errors and repair bills by using 
RPM. This easy-to-use program 
measures the rotational speed and 
fluctuations of your disk drives, and 
warns you if they are running too 
fast, too slow, or unevenly. 

Incorrect or erratic speed is a 
common cause of unexplained disk 
errors and loss of data. RPM's docu- 
mentation explains how to detect and correct these problems 
quickly and easily. As 80 MICRO (April, 1982. page 41) 
said: "If your drives have problems I recommend RPM 
before paying to get it repaired." 

RPM is supplied on diskette for the TRS-80 Models I and 
III. We suggest you order a copy before you need it. 

$24.95 

ORDER FROM YOUR LOCAL SOFTWARE 
DEALER, OR CALL NOW, TOLL-FREE: 

(800) 824-7888, Operator 422 
CALIF: (800) 852-7777. Oper. 422 
ALASKA/HAWAII: (800) 824-7919 

FOR TECHNICAL INFORMATION CALL: 
(213) 764-3131, or write to us. 




TERMS:Wc accept VISA. MasterCard, checks, or eve 
C.O.D. charge is $2.00 in U.S. only. We ship within 



1 cash. Please add $2.00 shipping 
:>ne day ol receiving orders. 



Dept. G, Box 560, No. Hollywood, CA 91603 



handling within U.S.A. or Canada, and $5.00 overseas. 
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module protects disks from power-loss 
crashes. Now you can leave your disks 
in the drives all the time. 

The module mounts inside the Model 
I or III, needing no software drives or 
changes of any kind. The Model I 
($29.95) requires some soldering; the 
Model III version ($34.95), which 
protects internal drives only, simply 
plugs in. 

The DSV1 is available from Integrat- 
ed Devices Inc., P.O. Box 8385, Hale- 
don, NJ 07538, (201) 956-8496. 

Reader Service <^583 



Telex Access for 
CP/M Conversions 

If you have the conversion hardware 
to run CP/M programs on your 
TRS-80, MicroTLX lets you turn your 
system into a fully-featured Telex 
machine. 

With this software package, you can 
directly send and receive Telex, TWX, 
and International Telex messages; send 
Mailgrams, telegrams, or overseas 
cables; and have immediate access to 
news, sports, and weather, as well as 
stock and bond (updated hourly) and 
commodities (updated twice daily) 
prices. 

The MicroTLX CP/M package re- 
quires 24K of memory. Priced at $150 
including documentation, it is available 
from Advanced Micro Techniques, 
1291 E. Hillsdale Blvd., Suite 209, 
Foster City, CA 94404, (415) 349-9336. 

Reader Service <^570 



Low-Profile Disk 
Drive Accessories 

Ann Arbor Precision has introduced 
enclosures and power supplies for the 
new half-height Teac FD-55A and 
2/3-height Canon MDD-6108 disk 




Low-Profile Drive Enclosures 
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drives. The enclosures can be purchased 
with or without drives installed. 

In addition to the stackable single- 
drive horizontal mount enclosure, a 
dual-drive vertical model is also avail- 
able for the Teac. Both styles offer mar- 
resistant white or silver finishes. 

The half-height model with installed 
FD-55A is priced at $269. For more in- 
formation, contact Ann Arbor Preci- 
sion, 7536 Jackson Road, Ann Arbor, 
MI 48103, (313)426-5477. 

Reader Service «^577 



Read All About It 

The Computer Newsletter Publisher's 
Directory is a list of over 1 ,000 newslet- 
ters from user groups, clubs, manufac- 
turers, individuals, and educational in- 
stitutions. Newsletters are in zip-code 
order, with Canadian entries listed by 
province and city, and foreign countries 
listed alphabetically. 

The Directory is in a loose-leaf for- 
mat. The annual subscription rate of 
$70 ($60 if payment accompanies order) 
includes corrections and updates sent at 
least every 90 days. 

A cross index by computer type is in- 
cluded, and cross listings by profession 
will appear in updates. Sections are be- 
ing added to show over 300 computer- 
related periodicals and a guide to 
public-access bulletin boards. A special 
listing mentions free newsletters. 

The Directory is published by An- 
drew R. Alaways, 306 West 46th St., 
New York, NY 10036, (212) 799-9190. 

Reader Service «^550 



Color Computer Mailing List 

C. C. Mailer is a mailing-list program 
available on disk or cassette for the Col- 
or Computer. The program holds from 
90 to 800 records depending on version 
and available memory, listing name, 
two-line mailing address, city, state, zip 
code, phone number, and user-defined 
code fields for extracts and label print- 
ing. The larger disk version sorts files in 
zip-code order to allow presorted mail 
rates. 

The C. C. Merger option permits the 
merging of selected addresses with let- 
ters from the C. C. Writer word proces- 
sor. C. C. Mailer is priced at $20, with 
the merger option an additional $15. 

For more information, contact 
Transformation Technologies, 194 



Lockwood Lane, Bloomingdale, IL 
60108. 

Reader Service ^575 

Model 16 Spreadsheet 

Datamate's widely used spreadsheet 
system, Finanswer + , is now available 
for the Model 16. 

The only spreadsheet package that 
will run in 16-bit mode on the 68000 
CPU, the Model 16 version supports 12 
spreadsheets per data file, with 1,200 
figures each. Spreadsheets can be linked 
or consolidated for a total of up to 
14,400 figures. Operating features in- 
clude menu-based processing, automat- 
ic saving and restoring of spreadsheets, 
password protection, sorting, and 
graphing. 

Loading a full 30-by-40 spreadsheet 
and calculation rules takes approxi- 
mately five seconds using floppy disks. 
Processing the spreadsheet with row 
and column totals takes less than 25 
seconds. 

Finanswer + can print the entire 
spreadsheet or display and print the en- 
tire set of calculation rules. A help com- 
mand lists possible options at each step. 

The system sells for $395, with main- 
tenance after the first 90 days $60 per 
year. For more information, contact 
Datamate Company Inc., 4135 S. 100th 
East Ave., Suite 101, Tulsa, OK 74145, 
(918) 664-7276. 

Reader Service ^561 



Talkprocessor 

The Talkprocessor is a simple, inex- 
pensive voice-output program for the 
Color Computer with 16K Extended 
Basic. 

Twenty-six words are digitally re- 
corded and displayed on the screen, 
with a two-letter code for each word. 
The user enters the codes in any combi- 
nation to form a statement. When the 
command is given to speak, the state- 
ment comes out of the video display's 
speaker in one of three voice pitches. 

The cassette program is priced at 
$14.95 plus $1 for shipping. It can be 
ordered from H 1 B, 3505 Hutch Place, 
Chevy Chase, MD 20815. 

Reader Service ^560 

Lab Management Software 

Downeast Digital, a subsidiary of 
Fairview Hospital Inc., announces the 




. TRS-80 Disk 
& Other Mysteries 

by H.C. Pennington 

This book is the definitive 
authority on data recovery 
for the TRS-80 Model I disk 
system. In almost every case, 
lost data can be recovered 
and this book tells you how 
to do it. From clobbered dir- 
ectories to parity errors, this 
profusely illustrated data 
recovery cookbook includes 
examples and step-by-step 
instructions for both begin- 
ners and professionals. 
132 pages. $22.50 



Microsoft BASIC Decoded 
& Other Mysteries 

by James Farvour 

This book is the only one of 
its kind. You will learn how 
the TRS-80 Model I BASIC 
interpreter works , from 
power-up to power-down, It 
has the complete disas- 
sembled Microsoft BASIC 
Level II interpreter with over 
13,000 lines of detailed com- 
ments in one volume. The 
math, arithmetic and utility 
routines are fully explained 
with examples on how to use 
them. An incredible learning 
aid for the beginner and a 
valuable reference for the 
professional. 
312 pages. $29.95 



The Custom TRS-80 
& Other Mysteries 

by Dennis Bathory Kitsz. 

A comlete hardware/soft- 
ware how-to-do-it like reverse 
video, high res graphics, aud- 
ible keystrokes, 8-track mass 
storage music synthesizer, 
and real time clock Dozens 
of project hints, tips, and fixes 
complete with the interface 
software. If you are a begin- 
ner, there are chapters on 
wire-wrap, soldering and con- 
struction methods. If you are 
a professional, there is a 
wealth of technical detail. 
332 pages. $29.95 



BASIC Faster and Better 
& Other Mysteries 

by Lewis Rosenfelder 

BASIC is not nearly as slow 
as you think! This book shows 
you how to make it faster and 
better with techniques and 
tricks that you never dreamed 
of for Model I, II and III 
disk systems. You won't find 
trivial, poorly designed "check- 
book" programs here- only 
useful BASIC techniques 
and code ready for use in 
YOUR programs. Tutorial for 
the beginner, instructive for 
the advanced, and invaluable 
for the professional. All rou- 
tines are available on disk 

290 pages. $29.95 



Learn about your TRS-80 computer- it's as easy as 1-2-3-4. These books are easy to read and understand because they are 
written for you by people just like you. Here are answers and solutions without jargon. There are no end of chapter "tests" - no 
incomprehensible math formulas- no textbook explanations - just straightforward, plain English. 

You will learn how to recover "lost data" on disk, how the BASIC interpreter works, how to make BASIC run faster and better, and 
how to modify and interface your TRS-80. In other words, you will learn how to make your computer do all the things you want it to 
do. It's as easy as 1-2-3-4. 



Available at computer stores, B. Dalton Booksellers and independent book 
dealers. BASIC Faster and Better is also available at all RADIO SHACK Computer 
Centers and selected RADIO SHACK stores. (Cat. No. 62-1 002) If your dealer is out of 
stock order direct. Include $4.00 for shipping and handling. Foreign residents add 
$1 1.00 plus purchase price, in U.S. funds. trs-80 trademark Tandy Corp. 
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new LabManager series of programs 
for medical laboratories. 

LabManager Quality Control ($600) 
performs immediate precision, trend, 
and shift analysis and stores data for 
current operations, year to date, and 
previous month. Mean, coefficient of 
variation, number of assays, and upper 
and lower limit are continuously up- 
dated, and graphs are displayed on 
command. 

The Workload and Finance program 
($500) provides year-to-date and cur- 
rent workload by department, per test, 
for inpatients, outpatients, noncharge- 
ables, and quality control, with revenue 
charged per test for inpatients and out- 
patients. LabManager Test Pricing 
($150) rapidly determines the cost of 
tests, recalculating all costs as supply 
prices change. A calculator mode allows 
hypothetical changes. 

All programs require a Model I or III 
with DOSPLUS, two disk drives, and 
48K, and are available from Downeast 
Digital, P.O. Box 286, Solon, ME 
04979, (207) 643-2437. 

Reader Service »s 566 



Graphics from Your Printer 

The Printer Graphist converts your 
dot-addressable printer to a plotter, 
transforming all kinds of data into 



high-resolution graphics using the IDS 
460G/560G, Epson MX-80 with Graf- 
trax, MX- 100, or Centronics 123. The 
IDS Prism color printer permits eight- 
color graphics. 

With a few instructions — a new Basic 
verb, Dot, is provided — and your data, 
graphics work can be generated in sec- 
onds. The Printer Graphist can produce 
plots as wide as four pages and as long 
as 10 feet. With IDS printers, there is no 
limit to the possible number of lines per 
plot; with the other printers, the limit is 
approximately 3,000 lines depending on 
the size of the user's program. No hard- 
ware modification or additional soft- 
ware is needed. 

The Printer Graphist works on most 
DOSes (send exact configuration when 
ordering), and requires a Model I or III 
with 32K or 48K and two disk drives. It 
is available for $194.50 from Printer 
Graphist Ltd., P.O. Box 603, Newport, 
VT 05855, (802) 564-7704. 

Reader Service *>574 

Mainframe Replaces 
Expansion Interface 

The Holmes Expansion Mainframe 
upgrades the Model I with gold con- 
nectors, buffers for high-speed opera- 
tion, and room for four peripherals, as 
well as a power supply and sturdy metal 
enclosure. 




Holmes Expansion Mainframe 



It is the heart of a $3 1 9 system adding 
double-density and 8-inch drive capaci- 
ty to the Model I, including the main- 
frame, Holmes' DX-1S disk controller 
and DX- 1 D double-density adapter, an 
LSI data separator, parallel printer 
port, and keyboard-to-mainframe con- 
nector cable. The use of 8-inch double- 
density drives requires a speed-up pe- 
ripheral such as Holmes' Sprinter II. 

The DX-1D adapter can be pur- 
chased alone for $129.50. Other 
peripherals, including 80-character 
video and extended memory, are 
available or will be soon. 

For more information, contact 
Holmes Engineering Inc., Dept. 15, 
3555 South 3200 West, Salt Lake City, 
UT 84119, (801)967-2324. 

Reader Service «^ 564 



Rail Runner 

Rail Runner is a new graphics game 
for the Color Computer featuring 
sound, fast action, and many levels of 
difficulty. 

Your railroad engineer must scurry 
over the tracks of the busy switchyard, 
dodging speeding trains and handcars, 
to rescue the hoboes on the other side of 
the tracks. And you've got only so 
much time to save them — the real-time 
clock keeps ticking. 

The game costs $21.95 on cassette 
and $26.95 on disk, plus $2 shipping 
and handling. It is available from Com- 
puterware, Box 668, Encinitas, CA 
92024, (714)436-3512. 

Reader Service ts 573 

Paysoft 

An enhanced version of the Paysoft 
payroll system is now available for the 
Model III. 

The system calculates gross and net 
pay and deducts withholdings for any 
number of employees, providing com- 
pany and employee payroll summaries 
and reports with current, month-, quar- 
ter-, and year-to-date totals. With a pin- 
or tractor-feed printer, it will print and 
number payroll checks. 

Eight deduction categories, including 
federal, state, and FICA taxes, can be 
custom-labeled. In addition, Paysoft 
handles bonus pay and overtime. An 
auto-run feature makes operation easy, 
enabling the user to select only those 
employees whose hours change every 
payday. 
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The program requires 32K TRSDOS 
and dual disks. It sells for $199 from 
Business Micro Products, 311 Vi 8th 
St., Suite 400, Glen wood Springs, CO 
81601,(303)945-8166. 

Reader Service ^ 576 

Programming the 
Color Computer 

A Byte of Color Basic from Com- 
puter Island (227 Hampton Green, 
Staten Island, NY 10312) teaches pro- 
gramming on the Color Computer to 
children and beginners of all ages. 

The book has three units — Basic, 
graphics, and sound. There are 24 chap- 
ters, each with examples, illustrations, 
programs, and practice exercises. An 
instructor's manual and answer key is 
included. 

Its price is $5.95 plus 50 cents for 
postage. Discounts are given to schools. 

Reader Service «^559 



DISnDATa 

DISnDATa 1.1 is a two-pass disas- 
sembler that converts a machine-lan- 
guage program to fully labeled source 
code using standard Z80 mnemonics. 
Output can be directed to video dis- 
play, line printer, cassette, or disk. 

Unlike other disassemblers, this pro- 
gram discriminates between instruc- 
tions and data areas within the original 
machine language. Other disassemblers 
treat all areas of the program as instruc- 
tions, causing them to output meaning- 
less information upon encountering 
data items. In contrast, DISnDATa 
translates as instructions only those 
areas that are directly executed from 
one or more specified entry points. All 
other areas are output as data at the 
correct place within the program and 
with appropriate pseudo-operations 
attached. 

DISnDATa 1 . 1 is also capable of re- 
locating itself to any available area of 
RAM, moving up or down by a single 
byte or as many bytes as desired to dis- 
assemble programs located elsewhere in 
memory. 

This product sells for $24.95 on 
Model I or III cassette, or $29.95 on 
Model III disk. Each requires an addi- 
tional $1 .50 shipping and handling, and 
is available from Pro/ Am Software, 
220 Cardigan Road, Centerville, OH 
45459, (513)435-4480. 

Reader Service «^580 



Morse Code for Color Computer 

Prof. J. C. Sprott, author of a pop- 
ular Morse code program for the Model 
l/III, has introduced a version for the 
Color Computer. 

Translated into 16K Extended Color 
Basic, the W9AV Morse code translator 
allows you to send and receive Morse in 
most cases simply by connecting the 
computer cassette plugs to the transmit- 
ter key and receiver phone jacks. Send 
to 60 wpm and receive to 30 wpm, auto- 
matically adjusted. The translator has 
nine programmable message memories 
of 240 characters each, and a random- 
character practice mode. 

Priced at $14.95 for a cassette and 
$7.95 for a source list, the program is 
available from J. C. Sprott, 5002 She- 
boygan, Madison, WI 53705, (608) 
273-0627. 

Reader Service «^*582 

Data-File Management System 

Filemate is a software package con- 
taining six modules for the creation and 
management of a data base for almost 
any personal or business requirement. 
Using hashing techniques for instant ac- 
cess to any record, regardless of file 
size, it also provides computation capa- 
bility on any numeric field and storage 
of algorithms for repeated use, as well 
as editing, sorting, and printout of up to 
2,000 records. 

An auto-adaptive system, Filemate 
permits easy conversion of existing se- 
quential files to its random format. 
Once a file has been established and 
loaded, one can still add, delete, or 
change the size of any field, or expand 
the total file capacity without losing or 
having to reenter any data. 

It is available on disk for Models I 
and III with 48K and either TRSDOS or 
NEWDOS80 2.0 operating systems. 
With instruction manual included, 
price is $95 from Datafile Systems, 
801 Welch Road, Palo Alto, CA 
94304, (415) 326-1447. 

Reader Service ^ 557 



Home Is Where the Hearth Is 

Computer-Assisted Home Energy 
Management by Paul E. Field enables 
readers with limited knowledge of digi- 
tal electronics and microprocessors to 
build and operate a residential energy 
monitoring system. 

Details given for the hardware re- 



quired include a buffered microcom- 
puter interface, an interrupt-driven 
time-of-day clock, and a thermometer 
port for measuring eight separate tem- 
peratures. For software, five Basic 
programs are discussed: a machine-lan- 
guage monitor loader, residential heat- 
loss calculator, thermometer calibrator, 
nine-option time and temperature data 
manager, and statistical-analysis pro- 
grams. A final chapter suggests varia- 
tions and refinements for the completed 
system. 

The 182-page paperback refers pri- 
marily to the 16K Model I. It is available 
for $15.95 plus $1 shipping and han- 
dling (Virginia residents add 4 percent 
sales tax) from Group Technology Ltd., 
P.O. Box 87, Check, VA 24072, (703) 
651-3153. 

Reader Service «^562 

Dinosaurs and Dungeons 

Two new fantasy/adventure games 
for the Model I and III are available 
from Software Magic. 

In Marooned in Time (16K Level II), 
the Institute of Temporal Studies has 
selected you as the first person to be- 
come a chrononaut and test drive the 
time machine. However, not only has 
the chronosphere pitched you back to 
the age of dinosaurs, it's landed without 
you somewhere in the area. Between 
searching for it and dodging Tyranno- 
saurus Rex, you'll have quite a time try- 
ing to get home. 

Lair of Evil (32K Level II) casts you 
as Kiron the mercenary, hired by the vil- 
lage of Selira to rid them of the wicked 
Lord Lainem. You have 1,200 silver 
pieces and a choice of four characters, 
four weapons of different qualities, and 
five magic spells, but you will face 13 
types of monsters or allies in exploring 
the Lair of Lainem. Needless to say, 
there is treasure galore — if you are suc- 
cessful. 

Each game sells for $14.95 from Soft- 
ware Magic, P.O. Box 2184, Bramalea, 
Ontario, Canada L6T 3S4, (416) 
451-9452. 

Reader Service »^581 

Computer Dietitian 

Nutri-Man, a nutritional manage- 
ment system employing a data base of 
750 common foods, monitors and 
creates dietary menus according to 
one's specific nutritional needs. 

After you enter personal file data, the 
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LABORATORY SOFTWARE 
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DOWNEAST 



DIGITAL 



LabManager QUALITY CONTROL 

LabManager WORKL OAD and FINANCE 

LabManager TEST PRICING 

TRS-80 Model I or III 
Call or write for brochures. 

DOWNEAST DIGITAL 

P. O. Box 286 • Solon, Maine 04979 

(207) 643-2437 

Versions for other computers 

under development. 

^167 
TRS-80 is a regisler<>d trademark of Tandy Corporation 



HUGE DISCOUNTS 



CAMEO 10MB Hard Disk 
Drives for TRS-80 Model II 



*Also discounted prices on all 

TRS-80 computers, peripherals, 

and software. 



WE WILL NOT 
BE UNDERSOLD 



The Computer & Electronics Source 
1160 Bosque Farms Blvd. 
Bosque Farms, NM 87068 

^202 

505/662-5545 



80-M/CRO 
READERS 

If you read Dennis Kits*' December column then you 

know that we are the new distributors of his projects. 

These are completely assembled. 

COLOR COMPUTER 

Lower Case Conversion $69.95 

RAM/ROM Expansion Module . . . empty $39.95 

16KRAM $79.95 

single 2732EPROMs $7.50 

Dual I/O Port Expander $39.95 

NOTE: Unlike some I/O Expanders, this one Is 
completely transparent to DOS and your disks. 

MODEL I 

Front Panel Board $49.95 

Dynamic display of all 16 address and 8 data 
lines with single stepping control. 

SOFTWARE •SOFTWARE •SOFTWARE 

MAIL LABEL Model III Disk $19.95 

Works from Profile Database - Many options! 1 1 

INVOICE Model III Disk $19.95 

Prints invoice and packing label Profile 

WORLD ELECTRONICS 

177 27th Street 
Brooklyn, N.Y. 11232 "" 234 
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program compares your present diet 
with the nutritional requirements of 
your age/sex category and prints suit- 
able menus, taking your food prefer- 
ences into consideration. The system 
accommodates special factors or dietary 
restrictions, even for individual mem- 
bers while printing menus for an entire 
family. 

In addition, it automatically main- 
tains a food inventory, prints shopping 
lists, performs nutritional analysis of 
recipes, manages the ingredients ratio 
for varying batch size, and reduces food 
costs by consolidating purchases. 

Written in Assembly code for speed 
and efficiency, Nutri-Man requires a 
Model I or III with 32K and two disk 
drives. It can be ordered for $250 from 
Quant-m Corp., P.O. Box 55, New- 
fane, NY 14108, (716) 778-9384. 

Reader Service «^ 553 

Cassette for Backup Storage 

The Micro-Comp 450 digital cassette 
is an economical back-up for floppy- 
disk storage. A four-track cassette with 
450 feet of high-density tape, it holds 
over one megabyte at the standard two- 
track 800-bpi rate. 

It sells for $5 from Magnetic Infor- 
mation Systems, P.O. Box 806, Shel- 
ton, CT 06484, (203) 735-6477. 

Reader Service »^567 



Stock Market Data 

Twenty years of daily and weekly 
(1962-1982) Dow Jones and Standard & 
Poor's 500 averages are now available 
on Model III disks and Model I/III 
cassettes. 

The Dow Jones includes utilities, 
transportations, and industrials. Typi- 
cal running average and cyclic analysis 
programs, as well as a user's manual, 
show usage of the data. Utility pro- 
grams for maintaining and updating the 
averages are also included. 

Other software is available for finan- 
cial analysis, curve-fitting data, and 
plotting. For more in formation, contact 
Young Ideas Inc., 555 N. New Ballas, 
Suite 310, St. Louis, MO 63141, (314) 
569-8534. 

Reader Service «^585 

Fractions 

Fractions, a sequence of 24 interac- 
tive programs, guides students in grades 
five and up through the concepts and 



operations of fractions. 

For each of 1 1 topics, concept devel- 
opment and skill building is followed by 
an exploration program. The series also 
includes concept overview and place- 
ment or review test programs. 

The Fractions package is available on 
Model III 32K disks for $175. For more 
information, contact Quality Educa- 
tional Designs, P.O. Box 12486, Port- 
land, OR 97212, (503) 287-8137. 

Reader Service ^ 568 

Color Computer 
to Model III 

Color III is a set of plans for up- 
grading the Color Computer to Model 
III capability at a cost of approximately 
$300. 

Builders can convert their computer 
to a 65-key keyboard with 12-key nu- 
meric pad, front reset button, and tele- 
vision or color CRT display in a Model 
III enclosure. The unit includes RS-232, 
cassette, and joystick jacks, a ROMpak 
hatch door, disk-mounting capacity, in- 
ternal sound, power-on indicator, and 
(with TV option) channel selector, 
telescopic antenna, and up to 
256-by-192 resolution display. Once the 
Color III is built and your Color Com- 
puter installed, you can use your old en- 
closure as a remote terminal for home 
or office. 

The $15 plan package includes a 
complete bill of materials, tool and 
manufacturing lists, step-by-step in- 
structions, illustrations, wiring dia- 
grams, and sheet-metal templates. A kit 
consisting of plans and materials may 
be offered in the future. 

For more information, contact L & E 
Electro Sales Co., 7017 Hazeltine Ave., 
Suite 10, Van Nuys, CA 91405, (213) 
994-3110. 

Reader Service ^556 

Model 11/16 Hard-Disk CP/M 

Aton International has introduced 
CP/M 2.2 on Radio Shack's hard-disk 
drives for the Models II and 16. It is the 
first CP/M operating system available 
for Tandy's hard disks, which were in- 
troduced last January. 

The system uses only 16K controller 
RAM and 2K of CPU memory, leaving 
62K RAM for user processing. For pro- 
grams requiring dual floppies or dual 
hard disks, the total formatted capacity 
of eight megabytes can be divided into 
user-specified logical drives that sim- 
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*BUY BY DIRECT-MAIL* 



1-800-841-0860 

CONVENIENT ORDER ENTRY 



MICRO MANAGEMENT SYSTEMS INC. 



TRS-80 COLOR COMPUTER 

DISCOUNT PRICED 
FROM 




26-3004 



TRS-80 MODEL III COMPUTER 

DISCOUNT PRICES 




% 



FROM 



BUY DIRECT 



588 



26-1061 



TRS-80 MODEL 16 COMPUTER 



DISCOUNT PRICED 




BUY DIRECT 



26-6001 



FRANKLIH 

ACE 1000 

COMPUTER 

DISCOUNT PRICED 

FROM $ CALL 



SMITH CORONA TP-I 
DAISY WHEEL PRINTER 

DISCOUNT PRICED 



FROM 



$ 



559 




BUY DIRECT 



A ATARI 

HOME COMPUTERS 

DISCOUNT e/tjtjt 

PRICED *h/M 

FROM Vfc*/ 



TRS-80 MODEL II COMPUTER 

DISCOUNT PRICED 
FROM 




TRS-80 l/lll 

HARD 
DRIVES 



$ 



1988 



TRS-80 PRINTERS 



MFG BY 
RADIO SHACK 



26-1130 



CALL 



& 



BUY DIRECT 



26-4002 



w commodore 
TEXAS INSTRUMENT 
CALL FOR PRICES 



DWP-410 $1287.00 

DMP-100 $339.00 

DMP-200 $679.00 

DMP-400 $1015.00 

DMP-500 $1525.00 



PLEASE WRITE US FOR 

FREE 

•COPY OF OUR CUSTOMER DIS- 
COUNT PRICE LIST UPON RE- 
QUEST 

•COPY OF MANUFACTURERS WARRANTY 
UPON REQUEST 



MICRO MANAGEMENT 
SYSTEMS INC. 

PARCEL DIVISION 
DEPT. NO. 4- 
2803 THOMAS VILLE RD. EAST 
CAIRO, GA. 31728 



*-* 96 



OKIDATA EPSON 



,SPo 912-377-7120 

TM - TANDY CORPORATION 



TRS-80 SOFTWARE 

VISICALC, PROFILE. 

SCRIPSIT & MORE 

SAVE MONEY 

PRICES AND PRODUCTS SUBJECT TO 
CHANGE WITHOUT NOTICE. ORDERS 
SUBJECT TO VERIFICATION AND AC- 
CEPTANCE. 




i^See List of Advertisers on Page 435 
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ulate multiple drives. This partitioning 
also lets the user back up data on un- 
used portions of the same or a different 
hard disk. 

Another utility allows files as large as 
eight megabytes to be backed up onto 
multiple floppy disks. Flawed sectors, 
bad tracks, and other problems are 
automatically detected and fixed. 

Users can boot up either TRSDOS or 
CP/M, accessing programs formatted 
for either system that are stored on dif- 
ferent parts of the same hard disk. The 
system can also bootstrap directly from 
the rigid platter, in minicomputer 
fashion, without the need of floppy- 
disk intervention. 

The CP/M 2.2 package, including 
the hard-disk adaptation and full 
documentation, lists for $279. Present 
Aton CP/M owners can purchase the 
hard-disk upgrade for $125. For more 
information, contact Aton Interna- 
tional Inc., 260 Brooklyn Ave., San 
Jose, CA 95128, (408) 554-9922. 

Reader Service »^563 

Breakout Box 

The Model 50 Breakout Box sim- 
plifies interfacing of RS-232 periph- 
erals. 

Two sets of 24 test points and six 
jumper plugs let you reconfigure any 
combination of the 24 interface signals. 
When more than two points have to be 
connected, patch to one of the four 
common bus areas. 

The Model 50 has one female and one 
male D-type RS-232 connector. Its alu- 
minum case measures 3 !4 by 3 !4 by 1 
inches, and the rear cover has a signal 
list description of the RS-232 interface. 
Six jumpers are included. 

Price is $79 from Remark Datacom 
Inc., 4 Sycamore Drive, Woodbury, 
NY 11797, (516)367-3806. 

Reader Service ^ 554 
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The Soul of Wit 

Brevi-T, a new software package for 
NEWDOS 80 Version 2.0 owners, lets 
you create and use abbreviations for 
common or complicated DOS and Ba- 
sic command sequences. 

It can be used for simple, multi-posi- 
tional, multi-parameter, or conditional 
abbreviations, the number limited only 
by the space on your disk. You can add, 
delete, list, print, verify, and test ab- 
breviations. Files for Basic and DOS are 
maintained separately, allowing an ab- 
breviation to be used at two levels. 

Brevi-T is available for $19.95 from 
SofTrends Inc., 26111 Brush Ave., 
Euclid, OH 44132, (216) 289-2002. 

Reader Service »^579 



Independent EMAIL Modem 

The Visionary 100, a 300-baud pro- 
grammable modem, can send and re- 
ceive electronic mail while your com- 
puter is being used for other purposes or 
even while it is turned off. 

With its internal real-time clock, cal- 
endar, and 8085 microprocessor, the 
modem can automatically distribute a 
message to a number of different desti- 
nations, redialing any numbers that are 
busy, and send or receive messages at 
any time or date specified. Messages are 
stored in 2K of memory (expandable to 
24K) and given a time-and-date stamp 
for output. 

The unit uses the standard RS-232 in- 
terface and is compatible with any Bell 
100 series modem. It sells for $595 from 



Visionary Electronics Inc., 141 Parker 
Ave., San Francisco, CA 94118, (415) 
751-8811. 

Reader Service ^555 



Engineers' and 
Architects' Spec System 

Compuspec is an office master sys- 
tem for use by engineers and architects 
in preparing project specifications. 
Using the CSI format, the system con- 
tains over 150 sections, consisting of 
more than 1,000 pages of bidding re- 
quirements, contract conditions, and 
forms used in every stage of design. 

Written by professional engineers, 
the specifications have been used for 
over 10 years in EPA, HUD, and 
FMHA construction. Most sections are 
usable as is, while others must be cus- 
tomized to individual projects. 

Specifier's notes, section schedules, 
special codes, and a global replace fea- 
ture allow owner and project names, 
titles, bid opening dates, and other in- 
formation to be automatically inserted 
throughout the specifications in min- 
utes. Proofreading time is virtually 
eliminated, and output is camera-ready 
for production. 

Compuspec is available for Model II 
and 16 micros with a Daisy Wheel II 
printer; licensees must show proof of 
purchase of Radio Shack's Scripsit 2.0, 
or purchase it as an option. The price of 
$1,250 includes updates for one year. 

For more information, contact Eber- 
hard Engineering, P.C., 27 Pine Ridge 



FREE! 

Brand New Catalog 
With Over 150 PrograiAs 



Best 

Software 

Under The 

Sun 



r 



Instant Software's new catalog is free and it offers 150 of the finest 
programs you can find. At reasonable prices. . .and a variety 
you've never seen before in one catalog. And they're all contained in 
the new 16 page 1983 Instant Software catalog. You'll find: 



ASSEM/ZSIM— 2 great utilities in 
one super package. Assembly lan- 
guage programmers, this package 
solves all your programming prob- 
lems from ASSEM to ZSIM. 

Super Utility Plus — the most 
powerful program of its kind. A 
must for every serious TRS-80* disk 
installation. 

Geography Explorer Series — the ex- 
citing, attention-holding series that 
teaches your children essential geo- 
graphical facts. 

Phaser Blast — phaser-armed 
robots, enemy Hovertanks . . . pre- 
pare for a journey into the war of 
the future. 



Columbia through launch, 
re-entry and landing. 



orbit. 



Plus dozens of other practical, 
mind-boggling or spine-tingling 
programs. 

And now you can get the new 1983 
Instant Software Catalog absolutely 
free. You don't even have to pay for 
the phone call. Just dial toll free: 



1-800-258-5473 

and ask for your free copy of Instant 
Software's 1983 Catalog. 
It could be the smartest call you'll 
make all year. 



Space Shuttle — experience the ulti- Instant Software. The best software 
mate flight as you pilot America's under the sun. 

Instant Software 

(a subsidiary of Wayne Green Inc.) Route 101 & Elm St. Peterborough, NH 03458 

"TRS-80 is a registered trademark of the Radio Shack division of Tandy Corp. 




Yes, I want a free catalog! Name 

Please send my free copy to: 

Address. 

Instant Software city — 



.State, 



.Zip. 



Peterborough, N.H. 03458 USA A subsidiary ot Wayne Green In 



The best software under the sun. 



I have a 



computer 



NC018 
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Drive, Smithtown, NY 11787, (516) 

543-7777. 

Reader Service ^572 

School Attendance Monitor 

Attendance is a menu-driven soft- 
ware package designed to maintain stu- 
dent records at a small high school or 
junior high. Students are handled as 
names, not numbers; data is checked 
for accuracy when entered; and arrow 
keys are used for easy correction. A 
password feature prevents unauthor- 
ized system entry. 

Reports for individuals or groups can 
be displayed or printed. Students in 
groups can be listed alphabetically, 
by grade, or according to a mixture of 
the two. 

The system allows a user to set grade 
breaks (e.g., one absence and two tar- 
dies is the lowest A); whenever a student 
crosses one of these grade breaks (slip- 
ping from a B to a C, for example), his 
or her name is printed and the attend- 
ance officer notified. 

Two versions are available, each able 
to track students by date, absent or tar- 



dy, and excuse. Version 2.0 also tracks 
by period and teacher, and can accom- 
modate up to 1,000 students. Version 
3.0 tracks by specific class name, ac- 
commodating 750 students and 350 
classes. 

The Attendance package requires a 
48K, two-disk Model III and an 
80-column printer. It is available for 
$275 from Schoolhouse Software, 5302 
33rd SE, Auburn, WA 98002. 

Reader Service »^569 

Color Data Base 

The Colour Data Management pro- 
gram allows Color Computer users to 
custom design data bases. Up to 10 
user-named fields can be created, either 
character or numeric. Records can be 
sorted by any field, and a search made 
for any specific string or number. A 
sum command adds all the values in a 
numeric field. A list feature is included, 
with a selective list optional. Records 
can be added or deleted at any time. 

The program will operate with either 
16K or 32K Extended Basic. It is modi- 
fiable by the user and transferable be- 



tween disk and cassette. Files may be 
stored on either medium. 

Colour Data Management sells for 
$20.95 from Computer-Mate Business 
Service, P.O. Box 3082, Station F, 
Scarborough, Ontario, Canada M1W 
3P5, (416) 494-1862. 

Reader Service «^552 

Educational Software Library 

Educational Software Library, a 
nonprofit mail-order organization, re- 
views, evaluates, and distributes a wide 
range of software available for pre- 
school to high-school students. 

A one-year membership fee of $25 
entitles the member to ESL's review cat- 
alog of Model I and III programs and a 
bimonthly newsletter evaluating recent 
library additions. Members can borrow 
software for two weeks for $2 per pro- 
gram, or buy programs at discount 
prices. 

The review catalog of over 1 50 pro- 
grams (most on cassette) is available 
separately for $4.95. For a free sample 
newsletter, send a stamped, self-ad- 
dressed long envelope to Educational 




FINALLY! PROFESSIONAL QUALITY PERSONAL INCOME TAX PROGRAM 

FOR UNDER $30 



• Don't wait until April 15. Use SUPERTAX to develop your 
tax strategy NOW. 

• An ABSOLUTE MUST for every personal software library 

• Extremely easy to use AND fully deductible on Schedule 
AorC 

• Invaluable for year-end tax planning or for tax return 
preparation 

• Written by C.P.A with Master's degree in tax 

SUPERTAX I: Ideal for tax planning and return checking, this program is 
simple, comprehensive and very fast. Answer all those "what if" ques- 
tions throughout the year, and at the same time make your tax return 
computer-accurate. Using either screen or printer output, it generates 
summaries of Page 1 and 2 and Schedule A of Form 1040. This program 
also prints an overall summary of the return showing Adjusted Gross 
Income, Itemized Deductions, Taxable Income, Regular Tax, Income 
Averaging Tax, both Minimum taxes, and Payment Due or Refund (all of 
which are calculated by the program). SUPERTAX I also calculates the 
moving expense deduction, investment credit, taxable capital gains, poli- 
tical and child care credits, medical limitations and more. 

SUPERTAX II: This 2-disk set includes the efficient SUPERTAX I program 
as well as the more detailed SUPERTAX II program which makes all of the 
SUPERTAX I calculations, but which also PRINTS THE INCOME TAX 
RETURN! This program prints Page 1, Page 2, Schedules A, B, and G 
(income averaging) of the FORM 1040 as well as the Form 3468 (invest- 
ment tax credit) using tractor-feed income tax forms (one of each is 
supplied with the program). 



• Undeniably one of today's greatest software values 

• Available for 2 drive, Radio Shack Models I, II, III and 16, 48K o 
larger systems. 

• Also available on standard 8" CP/M 

• Data can be saved on disk 

• Subsequent year updates available at 20% discount 

• Programs are fully prompted and include manual loaded 
with valuable tax information and guidance 

SUPERTAX III: A 2-disk set which includes both the SUPERTAX I and 
SUPERTAX II programs PLUS a program to calculate and print Schedule C 
of the FORM 1040. Also included is a stand alone depreciation program 
which calculates and prints your depreciation schedule using both the old 
rules and the new ACRS rules. Output from the depreciation program is 
designed to serve as a supplement to IRS FORM 4562. 



SUPERTAX I - 


- $24.00 


SUPERTAX II - 


- $31.50 


SUPERTAX HI 


- $36.50 



8" diskettes $2.00 higher Add $1.50 for postage & handling 

... ROCKWARE DATA CORPORATION 

DEPT. 80M ■ PO BOX 401710 ■ DALLAS, TX 75240 ■ (214) 596-0588 

CP/M, Radio Shack & Apple II + are trademarks of Digital Research, Tandy Corp. and Apple Computers, 
Inc. 
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WAYNE GREEN BOOKS 




KILOBAUD KLASSROOM 

by George Young and Peter Stark 

Makes learning electronics fun and easy. First published as a series in Kilobaud Microcomputing, the 
book combines the learning of essential theory with practical, hands-on experience. The course begins 
with basic electronic projects and culminates in the construction of your own programmable 
microcomputer. The direct instructional methods of authors Young & Stark make KILOBAUD 
KLASSROOM a simple way for you to acquire a solid background in digital electronics. 
BK7386 (419 pages) $14.95 




-i««^ 



THE SELECTRIC INTERFACE by George Young 

You need the quality print that a daisy wheel printer provides but the thought of buying one makes 
your wallet wilt. The SELECTRIC™ INTERFACE, a step-by-step guide to interfacing an IBM 
Selectric I/O Writer to your microcomputer, will give you that quality at a fraction of the price. 
George Young, co-author of Kilobaud Microcomputing magazine's popular "Kilobaud Klassroom" 
series, offers a low-cost alternative to buying a daisy wheel printer. The SELECTRIC INTERFACE 
includes: stcp-by-step instructions, tips on purchasing a used Selectric. information on various Selectric 
models, including the 2740. 2980. and Dura 1041, driver software for Z80, 8080. and 6502 chips, tips 
on interfacing techniques. With The SELECTRIC INTERFACE and some background in electronics, 
you can have a high-quality, low-cost, letter-quality printer. Petals not included. 
BK7388 (125 pages) $12.97 



TEXTEDIT 

A Complete Word Processing System in Kit Form 

by Irwin Rappaport 

TEXTEDIT is an inexpensive word processor that can be adapted to suit your differing needs — from 
form letters to lengthy texts. Written in TRS-80 Disk BASIC, the system consists of several modules, 
permitting the loading and use of only those portions needed. A disk is also available which provides 
the direct loading of the modules, however, the book is required for documentation. For Model I and 
III with TRSDOS CON VEBT. , one disk drive (2 disk drives or copy utility needed to transfer to system 
disk). Buns under TBSDOS 2.2/2.3. May not function under other systems. 

BK7387 (book, 90 pages) $9.97 

DS7387 (disk) $19.97 

Disk is manufactured by Instant Software, a division of Wayne Green Inc. 



TEXTEDIT 

a complete 
word^proces^ng 
system in kit 
5g0m. 



by 
Irwin Rappaport 



A WAYNE GREEN 
PUBLICATION 




If 
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ANNOTATED BASIC 

A New Technique for Neophytes 

Put your BASIC knowledge to work for you with this 2- volume set of TRS-80 Level II BASIC pro- 
grams. Gain a better understanding of the elements and techniques involved in programming. AN- 
NOTATED BASIC'S uniquely designed format breaks each program down for you to include: initial 
documentation and instruction, definitions of New BASIC Concepts, flowchart, annotations of sec- 
tions, showing how each part fits into the whole, and explaining why certain BASIC commands are 
chosen over similar ones. 

Using the programs as they are or modifying them to sharpen your programming skills, ANNOTAT- 
ED BASK] is a helpful tool for any BASIC programmer. 

BK7384(Vol. 1,152 pages) $10.95 

BK7385 (Vol. 2, 136 pages) $10.95 




COMPUTER CARNIVAL by Richard Ramella 

Your child can become a crackerjack computerist with the sixty TRS-80 Level II pro- 
grams in COMPUTEB CARNIVAL. This large-type, spiral bound book for beginners 
is a veritable funhouse of games, graphics, quizzes and puzzles. Written by HO Micro 
columnist Richard Ramella, the programs are challenging enough to ensure contin- 
ued learning, yet short enough to provide your child with the immediate delight and 
reward of mastering basic computing skills. And for even greater enjoyment, get the 
CARNIVAL COMPANION, a 30-minute cassette containing all the programs in the 
book. Eliminates tiresome typing and lets your child spend more time enjoying the 
programs. 

BK7389 Book (218 pages) $16.97 

CC7389 Book & Cassette "Carnival Companion" $24.97 





FOR TOLL-FREE ORDERING CALL 1-800-258-5473 
WAYNE GREEN BOOKS* PETERBOROUGH NH 03458 

Itemize your order on a separate piece of paper and mail to Wayne Green Books, Att: Sales, Peterborough, NH 03458. Be sure to include check or detailed 
credit card information. (Visa, MC or AM EX accepted.) No CO. 13. orders accepted. All orders add $1.50 for the first book, postage and handling; $1.00 each 
additional book; $10.00 per book foreign air mail. Please allow 4-6 weeks after publication for deliver)'. Questions regarding your order? Please write to 
Customer Service at the above address. 
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Software Library Inc., 262 Park Lane, 
King of Prussia, PA 19406. 
Reader Service *^578 

C Language For Model 16 

While Radio Shack has not yet deliv- 
ered its Basic or Fortran languages for 
the Model 16, Softworks Limited has 
introduced a complete C compiler for 
the new machine. 

Based on Whitesmith's compiler of 
the Bell Laboratories-developed lan- 
guage, Softworks C is the first higher- 
level language for the Model 16. Oper- 
ating in full 16-bit mode, it links mod- 
ules together and generates standard 
IEEE assembler code. Sample pro- 
grams are included; cross-compilers are 
available for developing Model 16 C 
programs using different computers. 

The language is priced at $950, with a 
documentation package selling for $30. 
For more information, contact Soft- 
works Limited, 607 W. Wellington, 
Chicago, IL 60657, (312) 327-7666. 

Reader Service ^565 

Copy-Not 

Copy-Not is a copy protection 
scheme that permits Basic software 
authors to save their creations from 
pirates. It is designed to alter the for- 
mat of a target TRSDOS 2.3 system 
disk to make it readable only by itself, 
only if programs are assigned identical 
serial numbers, and copyable only by 
Copy-Not. One or more of the Basic 
programs on the disk can also be data- 
encrypted to provide maximum pro- 
tection. 

After creating a master disk, the sys- 
tem can be used to mass-produce copies 
for marketing. Like the original, each 
copy will boot and run correctly, but 
will not be readable by any other oper- 
ating system except Copy-Not. 

This product requires a Model I with 
48K, two disk drives, and TRSDOS 2.3. 
It sells for $275 from HPB Vector Co., 
130 Center St., E. Stroudsburg, PA 
18301. 

Reader Service *^587 

Bazul's Quest 

King Rifraf, ruler of an enchanted 
land filled with magical objects, strange 
riddles, and friendly and hostile crea- 
tures, is deathly ill. To make a healing 
potion, the Alchemist needs 26 
items— dragon teeth, a witch's broom, 
a silver acorn, a Griffon egg, and more. 
Can you, as Bazul, find the ingredients 
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Once A Tree 



or will the kingdom fall under the con- 
trol of the Evil Jester? 

Bazul's Quest is a text adventure de- 
signed to challenge the experienced 
player. Written in machine language on 
a Model I or III disk, it features nearly 
200 items, a vocabulary of over 400 
words, split screen, and the capacity to 
save up to 18 games. 

It requires one disk drive and 32K, 
and sells for $29.95 from Swallow Soft- 
ware, P.O. Box 502, Florence, AL 
35631, (205)766-0030. 

Reader Service <^558 

Computer Furniture 

An alternative to plastic or processed 
wood scrap comes from Once A Tree, 
which has introduced a line of solid-oak 
furniture designed to be a comfortable, 
multi-function computer work space. 

All items are finished with a hand- 
rubbed Danish penetrating oil, and 
built for easy assembly and disassembly 
without losing quality or structural 
strength. They can be shipped via UPS. 



The basic computer desk is priced at 
$184.95, the printer stand at $139.95. 
For more information, contact Once A 
Tree/Amaro & Son Inc., 3192 Com- 
mercial St., San Diego, CA 92113, 
(714)421-0441. 

Reader Service »^584 



The November 1982 New Products 
listing for The Last One program- 
writing utility gave Southwest Micro- 
computer Systems (16885 West Ber- 
nardo Drive, Suite 220, San Diego, 
CA 92127) as the sole distributor. The 
northwestern U.S. distributor for The 
Last One is Krown Computing, 1282 
Conference Drive, Scotts Valley, CA 
95066, (408) 335-3133. 



New Products listings are based on in- 
formation supplied in manufacturers' 
press re/eases. 80 Micro has not tested 
or reviewed these products and cannot 
guarantee any claims. 



THE ULTIMATE IN COLORCOMPUTING 



For the TRS-80 Color Computer and TDP System 100 Personal Computer 

lor" Writer II Super "Color" Terminal 

lm Nelson By Dan Nelson 

of Word Processors The Ultimate in Smart Terminals 



THE COMPETITION 

4K 16K 32K 

N/A 2K 18K 

N/A N/A N/A 

N/A 0.5K 16.5K 

NO 

NO 

NO 

NO 



Super "Color" Writer II 

By Tim Nelson 

The Rolls Royce of Word Processors 

The Super "Color" Writer is a FAST, machine code, full featured, 
character (screen) oriented word processing system for the TRS-80*" 
Color Computer and ANY printer. The video display is styled after a 
professional phosphor (green characters on black background) display 
for hours of use without eye fatigue (optional orange on black). The 
unique print WINDOW frees you from 32, 51 or 64 character lines 
FOREVER! This window can be moved anywhere in the text file, up, 
down, left or right to display the text as it will be printed without wasting 
paper. You can create or edit Super "Color" Terminal files, ASCII files, 
BASIC programs or Editor/Assembler source listings. It's simple enough 
for beginners with 4K and ... for the professional writer with a 32K disk 
system and a lot to say, there's plenty of room to say it! 

COMPARISON CHART SUPER COLOR WRITER THE COMPETITION 

System Size 4K 16K 32K 4K 16K 32K 

TAPE: Text space N/A 7K 23K N/A 2K 18K 

ROMPAK: Text space 2.5K 16K 31K N/A N/A N/A 

DISK: Text space N/A 5.5K 21 5K N/A 0.5K 16.5K 

Right Justify YES NO 

Video Window YES NO 

Edit any ASCII File YES NO 

Programmable Function YES NO 

The figures speak for themselves and with professional features like 
PROGRAMMABLE function string commands to perform up to 28 
commands automatically. PROGRAMMABLE text file chaining, 
PROGRAMMABLE column insert & delete, and right hand 
JUSTIFICATION with punctuation precedence, the choice is clear but 
there's still more! In their September '82 issue, "80 MICRO" says, "The 
Color Computer has finally come of age. Nothing illustrates that coming 
of age better than this offering (SUPER "COLOR" WRITER) by Nelson 
Software". The Super "Color" Writer takes full advantage of the new 
breed of "smart printers" with Control codes 1-31, 20 Programmable 
control codes 0-255 for special needs. Works perfectly with all Epson, 
Radio Shack, Okidata, NEC, IDS, Centronics, Citoh, Smith Corona, 
Diablo Etc., Matrix, or Letter Quality Printers. 

CHECK THESE FEATURES!! 

User friendly • Easy commands • 32K Compatible • Window • Key beep • 
HELP table • 128 character ASCII & graphics • Mem left and Mem used • 
Full cursor control • Quick paging • Scrolling • Word wrap around • Tabs 
• Repeat all functions • Repeat last command • Insert character & line • 
Delete character, delete to end of line, line to cursor, line & block • Block 
move, copy & delete "Global Search, Exchange & Delete • Merge or 
Append files • Imbed Control Codes in text • Underline • Superscripts • 
Subscripts • Headers, Footers & 2 Auxiliary footnotes on odd, even or all 
pages definable position • Flush right • Non-breakable space • 4 
centering modes: 5, 8.3, 10 & 16.7 (CPI) • Full page & print formatting in 
text • Single sheet pause • Set Page length • Line length, Line spacing, 
Margins, Page numbers • Title pages • Printer baud: 110, 300, 600, 1200, 
2400 • Linefeeds after CR • Soft & hard formfeed • Works with 8 bit 
printer fix • and more! 

Super "Color" Writer II Disk 

The Disk version of the Super "Color" Writer works with the TRS-80C 
Disk System and has all the features listed above plus many more! Use 
with up to four Disk Drives. Includes an extended HELP table you can 
access at any time. Call a directory, print FREE space, Kill disk files and 
SAVE and LOAD text files you've created all from the Super "Color" 
Writer. Print, merge or append any Super "Color" Terminal file, ASCII 
file, BASIC program or Editor/Assembler source listing stored on the 
Disk or tape. The Super "Color" Writer Disk version has additional for- 
matting and print features for more control over your printer and 
PROGRAMMABLE chaining of disk files for "hands off" operation. Print 
an entire BOOK without ever touching a thing! Includes comprehensive 
90 plus page Tutorial manual. 

TAPE $49.95 ROMPAK $74.95 DISK $99.95 

Tutorial only $15.00 (Refundable with purchase) 

ORDERING INCLUDE $3.00 for shipping in the U.S. & Canada, 
$6.00 for Foreign orders. C.O.D. add $2.00. 



NELSON 

SOFTWARE 

SYSTEMS 
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9072 Lyndale Avenue So. 612/881-2777 



A Division of Softlaw Corporation Minneapolis, Minnesota 55420 U. S. A. 



The Super "Color" Terminal turns the Color Computer into a Super-smart 
terminal with all the features of VIDEOTEX 1 " plus much more. 
COMMUNICATE with Dow Jones & CompuServe and with computers like 
the TRS-80" MODEL I, II, III, APPLE etc., via moden or RS-232 direct! 
Save the data to tape or print it! Reduces ON-LINE cost to a minimum! 
FEATURES 

10 buffer size settings from 2-30K • Buffer full indicator • Prints buffer 
contents • Full 128 ASCII keyboard • Compatible with Super "Color" 
Writer files • UPLOAD & DOWNLOAD ASCII files, Machine Language & 
Basic programs • Set RS-232 parameters • Duplex: Half/Full • Baud Rate: 
110, 300, 600, 1200, 2400, 4800 • Word Lengths 5, 6, 7 or 8 • Parity: Odd, 
Even or None • Stop Bits: 1-9 • Local linefeeds to screen • Tape save & 
load for ASCII files, Machine code & Basic programs • Unique clone 
feature for copying any tape. 

Super "Color" Terminal Disk 

The disk version of the Super "Color" Terminal works with the TRS-80C 
Disk system and has all the features listed above plus many more! Use 
with up to four Disk Drives • Call a directory, print FREE space, kill disk 
files, save and load text files or BASIC programs • Echo ability in full 
duplex • Lower case masking • 10 Keystroke Multiplier (MACRO) buffers 
that can be saved on disk to perform repetitive log-on tasks and send 
short messages (up to 250 characters each) • Programmable prompt or 
delay for send next line • Selectable character trapping • Set printer 
Baud rate to 110, 300, 600, 1200, & 2400 • Operators Manual. 
TAPE $39.95 ROMPAK $49.95 DISK $69.95 

Operators manual only $10.00 (Refundable with purchase) 

^jw Super "Color" Mailer 

** Correspondence-Mailmerge 

The Super "Color" Mailer is a powerful multi-purpose file merging 
program that uses files created by the Super "Color" Writer II. One of 
Super "Color" Mailer's most popular uses is producing customized form 
letters — at a fraction of the time and expense of individually typed 
letters. With Super "Color" Mailer you can combine a Super "Color" Writer 

11 file containg a form letter with a file containing a list of names and 
addresses. You can even insert special words and phrases — unique to 
each addressee — into the body of the letter. Other Super "Color" Mailer 
uses include creating invoices, printing mailing labels, addressing 
envelopes, and producing "boiler plate" legal documents out of many 
different paragraphs. Features include: the ability to selectively print 
mailing lists by any of up to 10 user definable fields • automatically prints 
current date • address • salutation • closing • P.S. etc. • prints any ASCII 
file • justification. 

TAPE $39.95 DISK $59.95 



The Ultimate in Disk Repair Utilities 

A must for ALL Color Computer Disk system owners. A high-speed 
machine code Disk Utility that can copy sectors and tracks • repair 
directory tracks and smashed disks, etc. Super "Color" Dlsk-ZAP has a 
special screen display that displays sector, track and memory contents in 
HEXADECIMAL and ASCII at the same time with double cursors that can 
be moved in any direction. With Super "Color" Disk-ZAP you are able 
to verify or modify disk sectors at will. You can even type right onto the 
Disk! You can send sector contents to the printer or any other RS-232 
device in either ASCII or HEXADECIMAL listing. Search the entire 
Diskette for any ASCII or HEXADECIMAL string. Comes complete with 
comprehensive manual. 

DISK ONLY $69.95 

ctiSSjS Super "Color" Calc 

S" Electronic Spread Sheet 

The finest electronic spread sheet and financial modeling program 
available for the Color Computer — A sophisticated yet easy to use, 
calculating and planning tool. Project figures into the future to answer 
the "What if?" questions you face. Create files compatible with the 
Super "Color" Writer II. Combine spread sheet tables with your 
documents to create ledgers, projections, statistical & financial reports 
& budgets. 

AVAILABLE AT DEALERS EVERYWHERE. IF NOT, ASK WHY!! 

TRS-80 Is a registered trademark of the Tandy Corp. 
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Keep track of maintenance records for a fleet of 
vehicles. (Model I/III) 


CC — Color Computer or 


Adcock 
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Using the Color Computer as a business machine. 


Chamber of 








Commerce 








Discriminating Pallets 


Eaton 


1/82:98 


Plot prices for increasing material costs. (Model I) 


Financial Wizard 


Perelman 


5/82:326 


Figure compound interest, annuity, and amortization. 
(Model II) 


Forms Maker 


Perelman 


12/82:356 


Make business forms. (Model II) 


High Finance 


Byrne 


10/82:324 


Program to use with all-saver savings accounts. 
(Model I/III) 


Industry Saver 


Leichtman 


10/82:156 


How a TRS-80 improved production-line efficiency. 


Invoice 


Hack man 


10/82:342 


Organize your billing procedures. (Model I/III) 


One Twelfth of a Misery 


Krapf 


4/82:298 


Loan-amortization program. (Model I) 


Order Form 


Wright 


9/82:270 


Produce custom-designed forms. (Model I/III) 


Phonfind 


Eldridge 


6/82:358 


See Home/Hobby. 


Pocket Portfolio 


Dethlefsen 


1/82:94 


Investment-analysis program. (PC) 


Portal-to-Portal Report 


Keneipp 


6/82:300 


Keep track of air miles traveled. (Model 1) 


Production Learning 


Jeffrey 


10/82:316 


Program to track production costs per unit. 


Curve 






(Model I/III) 


Profit Prognosticator 


Nottingham 


2/82:268 


Estimate business profits. (Model III) 


Questions, Questions, 


Rutledge 


1/82:102 


Tabulate and average survey results for business. 


Questions 






(Model I/III) 


Queue Up! 


Clapp 


12/82:333 


Analyze waiting lines. (Model I) 


QuickCalc 


Leaf stand 


10/82:114 


VisiCalc clone. (Model I/III) 


Rule of 300 


Zimmerman/Conrad 


1/82:116 


Figure interest payments on loans. (Model I/III) 


Spanning of Mod II Disks 


Keen/Dischert 


1/82:110 


See Programming Techniques. 


Survey 


Wells 


6/82:248 


Telemarketing program. (Model I/III) 


Tax Relief for the Rich 


Perelman 


3/82:176 


Figure taxes after the Economic Recovery Act. 
(Model II) 


Trade Wins, The 


Finkelstein 


2/82:238 


Stock Market simulator. (Model I/I II) 


EDUCATION 








Title 


Author 


Issue /Page Debug Annotation 


80 in the Apple, An 


Radin 


2/82:68 


About a teacher in NYC using 80s in the classroom. 


Anything Jodi Can Do. . . 


Tallman 


2/82:60 


Code game written by 9-year old and comments from 
her dad on teaching kids to program. (Model I) 


BIPED 


Leichtman 


4/82:112 


Story on a program using micros to train handi- 
capped people. 


CIE — Computers in 


Radin 


6/82:254 


How a school district uses computers. 


Education 








Classroom Crystal Ball 


Keough 


2/82:94 


The future of computers and education, and how 
programmers should view educational software. 


Computer Etch-a-sketch 


Mustico 


2/82:70 


See Programming Techniques. 


Do Not Pass 


Wood 


6/82:352 


Teach road signs in driver-education class. (CC) 


Dynamic Item Scheduling 


Wyckoff 


5/82:316 


Write educational programs that interest and teach 
students. (CC) 
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Earth to Class, Listen Up 


Fish 


2/82:120 


Classroom networking. (Model I) 


Elementary, My Dear 


Vanderburgh 


2/82:256 


Use randomly generated text to study language syn- 


Primate 






thesis. (Model I) 


Extra-terrestrial 


Wells 


2/82:112 


Program to teach the solar system. (Model I) 


Fret No More! 


Louis 


5/82:164 


Learn how to play the guitar with your 80. (Model I) 


Future in Miniature, The 


Mello 


2/82:53 


The micro in the classroom. 


Grade Book 


Pugsley 


3/82:184 


Keep students' grades on the computer. (Model I) 


King (Computer 


Allison 


4/82:302 


Program to teach kids how to read a ruler. 
(Model I/III) 


Learning the Elements 


Wood 


2/82:116 


Program to teach chemical elements. (Model I/III) 


Making More Possible 


Leichtman 


2/82:128 


How micros help the handicapped. 


Moby Dick Touch 


Brown 


9/82:139 


Learn touch typing. (Model I/III) 


Typing Tutor 








Model II Math Skills 


Kilroy 


11/82:292 


Teach your kids to add and subtract. (Model II) 


Music Marvel 


Blyn 


11/82:308 


Teach retarded people to play music. (CC) 


OJT 


Tymon 


6/82:326 


Program to build your own educational programs 
from. (Model I) 


Put Them to the Test 


Davis 


2/82:104 


Program that generates quizzes. (Model I/III) 


Roll Call 


Henderson 


2/82:100 


Using computers to keep track of student records. 


RS-80Tay, 


Stratton 


2/82:142 


Program to teach a foreign language. (Model I) 


Aysay Hatway? 








Sound OFF! 


Thiel 


11/82:422 


Add sound to your education programs. (Model I) 


Ten-key Tutor, The 


Knoyle 


2/82:192 


Program to teach typing on the ten-key pad. 
(Model I) 


Time to Make 'cm Sweat 


Hawkes 


5/82:332 


Generate multiple-choice, true-false, short-answer, or 
completion tests. (Model I) 


To Comma, or Not 


Perron 


2/82:82 


Punctuation-teaching program. (Model I) 


to Comma 








Vocabulary Test 


Kalkstcin 


4/82:294 


Match a word with a definition. (Model I) 


You Light Up My Life 


Wood 


3/82:330 


Teach the physics of light. (CC) 


GAMES 








Title 


A uthor 


Issue /Page Debug Annotation 


Acrostic Generator 


Falk 


8/82:240 


Create puzzles. (Model I/III) 


Alien Attack 


Perry 


8/82:282 


Arcade game, with joysticks. (CC) 


Amazing Cardoni II 


O'Connor 


8/82:302 


Card trick. (Model I/III) 


Assignment 46 


Albino 


8/82:66 


Adventure game. (Model I) 


Aslro-Scrambler 


Long 


12/82:252 


Dodge ball in space. (Model I) 


Birthday Party 


Zuckerbraun 


10/82:262 


Games for kids' birthday parties. (Model I) 


Casino Draw Poker 


Balewski 


11/82:246 


Play cards against your computer. (Model l/III) 


Casino Slot Machine 


Balewski 


11/82:222 


Simulate a Las Vegas slot machine. (Model I) 


Color Breakaway 


Grossbach 


8/82:268 


One -on-one hockey simulation. (CC) 


Color Maze 


White 


8/82:188 


Maze game. (CC) 


Color Reversi 


Ledger 


3/82:90 


Reversi on the Color Computer. 


Computer Repeat 


Fontenot 


4/82:222 9/82:32 Memory game. (Model I) 


Conquest of Memory 


Myers 


8/82:254 


Colonize the universe. (Model I/III) 


Alpha 








Cram 


Brothers 


8/82:234 


Draw the line without going back or into it. 
(Model I/III) 


Cube-80 


Washington 


8/82:106 10/82:30 Rubik's Cube on the computer. (Model I/III) 


Enter the Dragon 


Hadlock 


8/82:248 


Kung-fu adventure. (Model I/III) 


Flip-a-piece 


Cominio 


3/82:252 


Othello-like game. (Model III) 


Fortran Puzzler 


Yehle 


6/82:227 


Figure out the secret code. (Model I) 


Four in One 


Becker 


8/82:202 10/82:3 1 Four games and a utility for the CC. 


Plus Another 








Game of Kalah, The 


Victor 


8/82:132 


Similar to Reversi. (Model I) 


Game of Sim, The 


Radin 


9/82:276 


Similar to tic-tac-toe. (Model I/III) 


Intellectual Somnambulism Keller 


8/82:296 


Arcade game. (Model I) 


Invader 


Fisher 


11/82:450 


Destroy the K'taabas. (Model I) 


Kings and Catapults 


Adams 


2/82:232 9/82:32 Two feudal kings battle it out. (Model I/III) 


Kwikmaze 


Rollins 


11/82:318 


Generate mazes. (Model I/III) 


Loco Motion 


Ridgway 


8/82:286 


One-player to align objects into a pattern. (Model 1) 


Martian Missile Attack 


Gillen 


1/82:265 


Save cities, destroy Martians. (Model I) 


Master Muses, The 


Heath 


8/82:186 


See Tutorials. 
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Maze XIX 


Teter 


12/82:341 


Maze game. (Model I) 


Micro Puzzle Box 


Moews 


1 /82:302 3/82:28 Put the numbers in the right order in a grid. 








(Model I) 


Model III Microchess 


Embar 


11/82:300 


Modify Microchess for the Model III. 


More Color Conversions 


Freeman 


11/82:164 


Some Model I games converted to the CC. 


Naval Wars 


Byrnes 


8/82:114 


Battleship with two computers. (Model I/III) 


Outdoor Computer 


Adams 


8/82:80 


Play spy vs. spy outdoors with your computer. 


Games? 






(Model I/III) 


Pitty Pat 


Barnes 


8/82:270 


Variation of draw poker. (Model I/III) 


Save All Humans 


Boothe 


3/82:154 


Save people from flying saucers. (Model I/III) 


Save Our Ship 


Hawkins 


8/82:174 


Star Trek adventure. (Model I/III) 


Ski Slalom 


Commander 


8/82:112 


Hit the slopes on the 80. (Model I/III) 


Space Chase 


Gillen 


5:82:292 10/82:30 Arcade space game. (Model I) 


Space Duel 


Edick 


8/82:260 


Arcade game. (Model I/III, CC) 


Square Game 


Kanach 


8/82:264 


Merlin-like game. (CC) 


Stanley 


Black 


8/82:300 


Out stare your VDT. (Model I) 


Sub Destroy 


Steele 


8/82:212 


Arcade game for the Model II. 


Tee for Six 


Bevington 


8/82:156 


Tee-jumping board games for the computer. 
(Model I/III) 


Termites 


Weindorf 


8/82:274 




GENERAL 








Title 


Author 


Issue /Page Debug Annotation 


Basic Misinterpreter 


Busch 


4/82:86 


Humor — change Basic keywords to misspelled words. 
(Model I) 


Bob Rosen — 


Leichtman 


6/82:174 


Personality piece on Bob Rosen. 


A Colorful Story 








Broadening the 


Busch 


3/82:298 


Thoughts on expanding your system. 


TRS-80 Horizon 








Calculating Genius, Pt. I 


Cook 


11/82:130 


The story of Charles Babbage, inventor of the digital 
computer. 


Calculating Genius, 

Pt. II 
Cassbox 


Cook 


12/82:88 


See Part I. 


Gillen 


11/82:282 


Print out cassette-box cards. (Model I) 


CCCQ 


Chuck 


12/82:200 


Use your Color Computer with your ham rig. 


Celluloid CPUs 


Nadeau 


5/82;98 


Micros in the movies. 


CompuServe, MicroNet, 


Maquire 


1/82:74 


TRS-80 users and CompuServe 


TRS 








Computer Creationists 


Rose 


5/82:80 


How micros are used in sound studios. 


Computer-Assisted 


Harper 


11/82:372 


Use your computer to design circuit boards. 


Electronic Design 






(Model I/III) 


Confessions of a 


Keller 


5/82:320 


One user's life after buying a TRS-80. 


Microholic 








Dateline: Sri Lanka 


Mello 


4/82:128 


Personality piece on David Busch. 


Divine Dementia 


Nadeau 


5/82:176 


Personality piece on Dennis Kitsz. 


Dream Team 


Wangsness 


2/82:196 


Put together an ideal team with this program. 
(Model I) 


Family Tree, The 


Castor 


11/82:398 


Genealogy program. (Model I) 


Gabby the Space 


Ramella 


5/82:322 


This space cowboy won't shut up. (Model I) 


Cowbum 








Graphics King, The 


Frann 


8/82:120 


Personality piece on Leo Christopherson. 


Jake's Wampeters 


Mello 


3/82:162 


Profile on Jake Commander. 


Kryha Cipher Machine 


Deavours 


5/82:272 


Use Tiny Pascal in cryptology. (Model I) 


Little Byte Music, A 


Levine 


5/82:128 


History of digitally synthesized music. 


Make Those Headlines 


Ramella 


11/82:260 


Know if a headline will fit in a space before you 


Fit 






typeset it. (Model I) 


Memory Map — Level II 


Goodwin 


12/82:298 


Level II memory map. 


Night on the Town, A 


Gunn 


4/82:124 


Humor — take your computer out on a date. 


Northern Lights 


Latamore 


5/82:104 


How a sculptor uses a micro to play his designs. 


Ohio Electronic News 


Chidsey 


6/82:100 


Progress report on the Tiffen, OH, newspaper's 


Experiment 






electronic news experiment. 


Out of Thin Error 


Adcock 


5/82:258 


Humor — what error messages' "really" mean. 


Philly Phiasco 


Gunn 


5/82:140 


Commentary on the Philadelphia Computer in the 
Arts Symposium. 
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Radio Shack vs. IBM 


Van Ghent 


3/82:168 


Model II compared to the IBM 5150. 


ROM Bibliography 


Secord 


4/82:76 


Annotated list of literature on the ROM. 
(Model I/III) 


Shopping with 


Stolker 


10/82:88 


A look at the Federal DP Expo in Washington, DC. 


Uncle Sam 








Terminal Case, A 


Latamore 


1/81:66 


A look at the Canadian videotext system, Telidon. 


Tracking Lobsters 


Kaczor 


12/82:150 


Plot maps to locate lobster pots, or anything else. 
(Model I) 


TRON: Man in the 


Mello 


8/82:124 


Piece on the movie, Tron. 


Computer 








Vexed by the Void 


Resnick 


4/82:262 


An alien's view of TRS-80 users — humor. 


Videotex! for the Masses 


Nadeau 


1/82:60 


What videotext means to the home computerists. 


When the Postman 


Averill 


3/82:308 


Thoughts on mail order. 


Doesn't 








GRAPHICS 








Title 


Author 


Issue /Page Debug Annotation 


3-D Graphics 


Fogelin 


3/82:138 


Get 3-D geometric shapes on the screen. (Model I/III) 


Alpha-graphics 


Basch 


1/82:190 


See Programming Techniques. 


Back to the Drawing 


Rappaport 


3/82:120 


See Utilities. 


Board 








CC on Parade, Pt. I 


Barden 


10/82:82 


Using graphics on the CC. 


Color from a Model II? 


Ward/Deininger 


3/82:240 


Use the DMP-3 digital plotter to get color graphics. 
(Model II) 


Colorful Computer, Pt. I 


Miller 


8/82:94 


Twenty-one graphics programs. (CC) 


Colorful Computer, 

Pt. II 
Colorful Computer, 


Miller 


9/82:152 


See Part I. 


Miller 


10/82:254 


See Part I. 


Pt. Ill 








Computer Etch-a-sketch 


Mustico 


2/82:70 


See Programming Techniques. 


Conversion 


Osborne 


9/82:238 


Bob Boothe's graphics on the CC. 


Different Perspective 


Nielsen 


5/82:242 


Use shadows to gain perspective in graphics. 
(Model I) 


Editor's Choice, The 


Gesamte/Commander 


3/82:78 


Graphic patterns. (CC) 


Epson Airfoils 


Boothe 


11/82:230 


Plot airfoils for planes on your Epson printer. 
(Model I) 


Flaky 


Garrison 


12/82:94 


Graphics techniques. (CC) 


Is a Rose in Color/ 


Green 


3/82:142 6/82:26 Earlier 80 Micro graphics programs converted to 


a Rose 






the CC. 


Joystick Paintbrush 


Sprouse 


9/82:230 


Draw on the screen with joysticks. (CC) 


Mirror Imagining 


Boothe 


3/82:112 


Plot spheres, paraboloids, and other high-resolution 
shapes for the Epson. (Model I) 


Paper Graphics 


Rosenberg 


3/82:270 


See Utilities. 


Pictures at a Mod II 


Baker 


3/82:280 6/82:26 Bob Boothe's techniques on a Model II. 


Exhibition 








Pixel Print 


Gillen 


11/82:364 


Send screen graphics to the printer. (Model I) 


POKE Graphics 


Schaefer 


12/82:384 


Speed up Basic displays. (Model I) 


Polar Generator 


Webb 


2/82:204 


See Programming Techniques. 


Random Picture 


Swarts 


2/82:194 


Let the computer be the artist. (Model I) 


Shady Characters 


Ramella 


3/82:258 6/82:26 Get silhouette printouts. (Model I) 


Smooth Graphics 


Goodman 


3/82:304 


See Programming Techniques. 


Spiromania, Pt. I 


Commander 


5/82:88 


Draw spirographs on the Color Computer. 


Spiromania, Pt. II 


Commander 


6/82:106 


See Part I. 


Sublime Simulations 


Keough 


4/82:258 


How computer simulation/modeling works. 


Super Banner 


Balewski 


5/82:282 


Print out banners on a Centronics 737. (Model I) 


When Black Is White 


Tache 


3/82:294 


Reverse graphic printouts. (Model I/III) 


HARDWARE 








Title 


Author 


Issue /Page Debug Annotation 


Bare-bones 


Hart 


6/82:128 


Get a communications system without the expansion 
interface or RS-232 adapter, with software. 
(Model I) 
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Battery Back-up 


Batie 


2/82:126 


Build a battery back-up unit. 


Building an M-80 


Hawkes/Reese 


3/82:172 


Build a single-board microprocessor with the Z80. 


Cablebrew 


DeFrancis 


11/82:287 


Make your own MX-80 cable. 


Cheaper Upgrade 


Tucker 


9/82:186 


Install the Extended Color Basic ROM yourself. (CC) 


Color Computer 


Murphy 


3/82:102 


Go from 4K to 16K. (CC) 


Upgrade 








Color from a Model II? 


Ward/Deninger 


3/82:102 


See Graphics. 


Computerized Engraving 


Joffe 


5/82:318 


Drive a pantograph with your 80. (Model III) 


Cybernetics and Jelly 


Davids 


10/82:190 


Build a robot to detect jelly beans. (Model I) 


Beans, Pt. I 








Cybernetics, Pt. II 


Davids 


11/82:264 


See Part I. 


Cybernetics, Pt. Ill 


Davids 


12/82:312 


See Part I. 


Digital Doodles 


Sehmer 


1/82:244 9/82:30 Build a graphics plotter. (Model I) 


Do-it-yourself Disks 


Shaefer 


1/82:172 


Install your own disk drives in a Model III. 


Double Your Density 


Domuret 


1/82:294 


Adding double density to your system. (Model I) 


Four Into One Will Go, 

Pt. I 
Handy Dandy Tandy 


Hawkes/Reese 


2/82:226 


Put a 4K program in IK by bank section. (Model 1) 


Langston 


4/82:328 


Build a desk for your computer. 


Table 








Hardware Hacker, Pt. I 


Van Praag 


10/82:216 


Connect a Centronics-compatible printer to the 
Model I. 


Hardware Hacker, 

Pt. II 
Hardware Hacker, 


Van Praag 


11/82:112 


Add 32K RAM. (Model I) 


Van Praag 


12/82:173 


Add a disk-drive controller. (Model I) 


Pt. Ill 








Hydra-disk 


Robins 


3/82:206 6/82:26 Add dual-headed drives. (Model I) 


Joy of Interfacing, The 


Batie 


3/82:242 


Joystick interface. (Model I) 


Juicing Pin 18 


Gorodetzer 


9/82:288 


Use pin 18 on the MX-80 printer connector with the 
buffered cable. (Model I) 


Look into Disk Drives, A 


staff 


1/82:179 


Buyer's guide to disk drives. 


Modem Auto-answer 


Westbrook 


6/82:229 


Build an auto-answer device. 


Multi-programming/ 


Genovese 


1/82:278 


See Programming Techniques. 


Micro 








Networking on a 


Mcinke 


2/82:184 


Build your own networking system. (Model I) 


Shoestring 








New Generation of 


Park 


4/82:220 


Install the AXX3027 character generator chip. 


Characters 






(Model I) 


Programmable Baud 


Cottle 


5/82:306 


Device for the LNW interface to get a programmable 


Rate 






baud rate. (Model I) 


RAM Wars 


McClenahan 


3/82:156 


Get 64K RAM on the CC. 


Singer Printer Interface 


Mailhot 


6/82:374 


Interface the Singer printer. 


Sixteen Channel A/D 


Haan 


6/82:310 


Interface eight joysticks. (Model I) 


Board 








Smarten Up, Color 


Esposito/Thiel 


3/82:126 


Add memory to the CC. 


Computer 








Straight Shooter, The 


Quindry 


1/82:318 10/82:30 Build an inexpensive light pen. (Model I) 


Telephone Dialer 


Hickey 


6/82:160 


Device to let your computer dial phone numbers. 
(Model I) 


$30 System Desk 


Asman 


12/82:166 


Build a desk for your computer. 


Those CLOAD Blues 


Hartjes 


1/82:288 


Build a data compensator and audio amplifier. 
(Model I) 


Video Snow Shovel 


Smith 


3/82:290 9/82:30 Get rid of those black streaks against white 








characters. (Model I) 


Voice-Controlled 


Rigsby 


12/82:72 


Use your computer and printer as a sound-activated 


Typewriter 






typewriter for the handicapped. (Model 1) 


We Interrupt This 


Workman 


11/82:396 


Build interrupt capabilities into your Model I. 


Where There's a Will . . . 


McClenahan 


3/82:84 


Device to let the Color Computer print while on 
CompuServe. 


HOME/HOBBY 








Title 


Author 


Issue /Page Debug Annotation 


Bringing the Supermar- 


Kraynak 


4/82:270 


Grocery-list program. (Model I) 


ket to Its Knees 
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Computer Racing Form 


Bobo 


5/82:252 


Handicap horse races on your micro. (Model I/III) 


Family Medical History 


Diaz 


11/82:90 


Keep your family's medical records. (Model I /I II) 


Fore! Scorekeeper 


Wells 


5/82:298 


Keep track of your golf scores. (Model I/III) 


Gentle Reminder, A 


Rosen 


6/82:348 


Schedule your work projects. (Model I/III) 


Home Budgeteer — 


Pablo 


5/82:238 


Keep track of household expenses. (Model I/III) 


Reprise 








Homebrew Librarian 


Hamilton 


11/82:436 


Keep track of your books. (Model I) 


If This Is Tuesday, 


Atkins 


1/82:308 5/82:26 Date program. (PC) 


It Must Be. . . 








Income Tax Estimator 


Stark 


10/82:168 


Figure your income tax on the CC. 


Model III Biorhythms 


Anderson 


5/82:280 


Find out what your good and bad days will be. 
(Model 11) 


No More 90-lb. 


Stevens 


1/82:174 


Exercise log program. (PC) 


Phonfind 


Eldridgc 


6/82:358 


Phone-log program. (Model I/III) 


To Catch a Thief 


Kuhn 


4/82:274 


Home-inventory program. (Model III) 


Trick or TRS-80 


Keller 


10/82:104 


Have a jack-o-lantcrn on your screen greet trick-or- 
treaters. (Model I/III) 


Two Stroke a Side 


Avery 


5/82:264 


Figure your golf handicap. (Model l/III) 


Ultimate Parts Manager 


McCalley 


1/82:140 


Keep inventory of Model T parts. (Model I) 


You're in the Money 


Montgomery 


10/82:140 


Project the impact of personal savings and borrowing 
plans. (Model III) 


PROGRAMMING TECHNIQUES 






Title 


A uthor 


Issue /Page Debug Annotation 


Add That Professional 


Stcclhammer 


1/82:258 


Make DBMs easier to use. (Model I/III) 


Touch 








Alpha-graphics 


Basch 


1/82:190 


Technique to build graphic strings. (Model I/III) 


Basic Word Processing 


Cutrona 


9/82:140 


See Utilities. 


CCon Parade, Pi. I 


Barden 


10/82:82 


See Graphics. 


CCon Parade, Pt. II 


Bardcn 


11/82:80 


Learn how to use Line, Circle, Draw, Paint, Get, and 
Put. (CC) 


Colorful Computer, Pt. I 


Miller 


8/82:94 


See Graphics. 


Colorful Computer, 

Pt. 11 
Colorful Computer, 

Pt. Ill 
Computer Etch-a-sketch 


Miller 


9/82:152 


See Part 1, Graphics. 


Miller 


10/82:254 


See Part I, Graphics. 


Mustico 


2/82:70 


Add graphic routines to educational programs. 








(Model I) 


Conversion 


Osborne 


9/82:238 


See Graphics. 


Different Perspective 


Nielsen 


5/82:242 


See Graphics. 


Dizzy Decimals 


Shore 


3/82:326 


Eliminate round-off errors. (Model I/III) 


Do-it-yourself DB, Pt. I 


Townsend 


6/82:176 




Homebrew, Part II. 


Townsend 


9/82:242 


See Do-it-yourself DB, Part I. 


Homebrew, Part III 


Townsend 


10/82:332 


See Do-it-yourself DB, Part I. 


Easy Picture Editor 


Ginger 


12/82:388 


See Utilities. 


Editor's Choice, The 


Gesamte/Commander 


3/82:78 


See Graphics. 


Flasher, The 


Mickey 


1/82:276 


Flash prompts. (Model I) 


Graftrax Tricks 


Schneider 


12/82:118 


New things to do with your MX-80. (Model I) 


I Have a Secret 


Dcmberger 


10/82:296 


See Utilities. 


I Program, Therefore 


Adcock 


5/82:302 


Use the indexed sequential addressing mode. 


ISAM 








Mirror Imagining 


Boothe 


3/82:112 


See Graphics. 


Model I Do Files 


Jackisch/Knapp 


4/82:254 


Ease program operation by using Do files. (Model I) 


Model III Machine- 


Koch 


12/82:320 


Tricks to convert Model I programs to Model III 


Language Mods 








Multi-programming/ 


Genovese 


1/82:278 


Execute several programs simultaneously. (Model I) 


Micro 








On Break GOTO 


Donais 


11/82:390 


Another way to use break. (Model 1) 


Ordered Chaos 


Webb 


1/82:310 


Using randomness in programs. (Model I/III) 


PC LEAR 


Heusinkveld 


9/82:282 


Make high-resolution graphics use high memory. 
(CC) 


PEEK of Its Career, The 


Wilson 


6/82:308 


Simulate PEEK and POKE on the Model II. 


Performance Analysis 


Ballard 


2/82:240 


Detail the execution path of your programs. 
(Model I/III) 
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POKE Graphics 


Schaefer 


12/82:384 


See Graphics. 


Polar Generator 


Webb 


2/82:204 


Generate a map of the Arctic on the screen. (Model I) 


Priming the Data Base 


Ring 


3/82:152 


Use prime numbers for labels in DBMs for fast 
sequential searches. (Model I /1 1 1) 


Printer Color Art 


Kalinowski 


9/82:168 


Get color printouts on your MX-80 using colored 
ribbons. (Model I/III) 


Programmers for Hire 


Gillig 


1/82:274 


Techniques of a professional programmer. 


Programming Pitch, 


Davis 


5/82:142 


How to program pitch in music-generation programs. 


Pt. I 






(Model I) 


Programming Pitch 

Pt. II 
Programming Pitch, 


Davis 


6/82:362 


See Part I. 


Davis 


10/82:228 


See Part I. 


Pt. Ill 








ROM Breakout 


Sprott 


6/82:350 


Use the interpreter's build-in exits to make 
modifications. (Model I/III) 


Screen Strings 


Davidson 


12/82:360 


Make efficient screen routines. (Model I) 


Sling Some Hash 


Knecht 


9/82:124 


Use hashing to store and retrieve items in an unsorted 
list. (Model I/III) 


Smooth Graphics 


Goodman 


3/82:304 


Add precision to animation. (Model I/III) 


Sound OFF! 


Thiel 


11/82:422 


See Education. 


Spanning of Mod II 


Keen/Dischert 


1/82:110 


Link files with multi-disk Model lis. 


Disks 








Stewise Refinement 


Boasso 


6/82:232 


Exercise using psuedo-code. 


STRINGS's the Thing, 

The 
Subchaser! 


Knight 


6/82:298 


Use STRINGS to pack strings. (Model I/III) 


Steiner 


3/82:106 


See Games. 


Super Banner 


Balewski 


5/82:282 


See Graphics. 


To Baffle a Pirate 


Hawkins 


11/82:404 


See Utilities. 


To Err Is. . .Okay 


Adcock 


3/82:230 


Use On Error GOTO to work out of programming 
problems. 


Total Recall 


Bender 


4/82:332 


Get direct access to anything in memory with Fortran. 
(Model I) 


Using Print Using 


Rende 


1/82:290 


Tips on using the Print Using command. 


Worm Pills for Basic 


Keen/Dischert 


4/82:290 


Find the most efficient way to use Basic keywords. 


SCIENCE/MATH 






Title 


Author 


Issue /Page Debug Annotation 


Algebraic Archery 


Duffin 


11/82:426 


Polynomial factoring on your TRS-80. (Model I/III) 


Analysis of Variance 


Gille 


11/82:392 


Use this statistical method from IBM on your 
TRS-80. (Model I) 


Astrodynamics for 


Fowler 


11/82:205 


Explore the laws of gravitation. (CC) 


Beginners 








Bemusing Triangle, The 


Honess 


2/82:210 


Use the TRS-80 to implement the trapezoidal rule. 
(Model I/III) 


Colorful Titrations 


Wood 


2/82:202 


Isolate specific elements in chemical solutions. (CC) 


DIGRAPH Digressions 


Gorney 


6/82:192 


Use a directed graph to learn graph theory. 
(Model I/III) 


Extra-terrestrial 


Wells 


2/82:112 


See Education. 


Find a Number's Roots 


Cecil 


11/82:440 


Five programs to give high-precision answers to roots 
of numbers. (Model 1) 


Heat Stress Index 


Heckenlively, et al 


11/82:148 


Determine if the heat generated at work is harmful to 
you. (Model I/III) 


Learning the Elements 


Wood 


2/82:116 


See Education. 


Micros in Medicine 


Vose 


11/82:74 


How micros are used in the medical profession. 


Micros in the Lab 


Hager 


11/82:174 


How micros are used in lab research. 


Model III Biorhythms 


Anderson 


5/82:280 


See Home/Hobby. 


Nike Sport Research Lab 


Larsen 


11/82:188 


How Nike uses computers in shoe design. 


Propagation Prediction 


Chipman 


6/82:272 


Predict high-frequency wave propagation. (Model I) 


Relativity and the 


Levin 


11/82:222 


See how the theory of relativity works via your 


TRS-80 






computer. (Model I/III) 


Sieve of Eratosthenes 


Cecil 


11/82:306 


Find prime numbers. (Model I/III) 


TRS-80 Laboratory 


Keller 


11/82:197 


How a hospital uses TRS-80s in the lab and day-to- 
day chores. 
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Two-way ANOVA 


McGarvey 


3/82:234 


Get two-way analysis of variance. (Model I) 


You Light Up My Life 


Wood 


3/82:330 


See Education. 


TUTORIALS 








Title 


Author 


Issue /Page Debug Annotation 


Another Sort of Sort 


Townsend 


12/82:276 


Position and chain sorts. 


APL Primer, Pt. I 


Grothman 


12/82:376 


How APL works. 


BBS Primer 


Wright 


6/82:284 


What you need to hook onto a bulletin board. 


Bit Smitten, Pt. II 


Chidsey 


9/82:268 


Formerly "For the Novice;" heat build-up, turn-on 
and turn-off shock, and more discussed. 


Bit Smitten, Pt. Ill 


Chidsey 


10/82:96 


What a baud is, screen-dump routines, and more. 


Bit Smitten, Pt. IV 


Chidsey 


11/82:92 


Learn how to use the Basic Read . . . Data function. 
(Model I/III) 


Bit Smitten, Pt. V 


Chidsey 


12/82:101 


Gain access to string data. (Model I/III) 


Boolean Logic Operators 


Crew 


12/82:366 


How they work in Basic and Fortran. 


Breaker 19 


Busch 


6/82:96 


How to use CompuServe's CB simulator. 


Color Computer Pointers 


Gilliland 


11/82:288 


Combine programs and save memory. (CC) 


Damping Cassette Output 


Sinclair 


5/82:324 


What to do when CLOAD problems are really 
CSAVE problems. 


Data Communications — 


Derfler 


6/82:82 


How to set up your TRS-80 as a data-communica- 


TRS-80 Style 






tions terminal. 


Do-it-yourself DB, Pt. I 


Townsend 


6/82:176 


See Programming Techniques. 


Do-it-yourself DB, Pt. II 


Townsend 


9/82:242 


See Part I, Programming Techniques. 


Evolution of the 


Walljen 


11/82:359 


How a language works with the hardware. (Model I) 


Language 








Extended Color Basic 


Miller 


6/82:266 


A look at Extended Color Basic. (CC) 


For the Novice, Pt. I 


Chidsey 


6/82:148 


What MEM SIZE?, high and low memory, high and 
low-level languages are all about. (See Bit Smitten 
for subsequent parts.) 


G raft rax 80 


McNamee 


9/82:190 


Use bit graphics on the MX-80. (Model I/III) 


Inside Scripsit, Pt. I 


Lindley 


9/82:222 


Learn how Scripsit works before you modify it. 
(Model I/III) 


Inside Scripsit, Pt. II 


Lindley 


10.82:276 


See Part I. 


Inside Scripsit, Pt. Ill 


Lindley 


12/82:130 


See Part 1. 


Learn a Little Pascal, 
Pt. II 


Grothman 


1/82:80 


Program using RS Tiny Pascal. 


Make Butterflies — Not 


Commander 


4/82:152 


Tips on using utilities. 


Bugs 








Master Muses, The 


Heath 


8/82:186 


Author of Master Reversi talks about computer 
Othello. 


Mod III Notes 


Ratzlaff 


2/82:200 


Model II monitors and cassette I/O. 


Model I, Meet Model III 


Barlow/Brydges 


1/82:316 


Convert programs from Model I to Model III. 


Model 11 Primer 


Baker 


5/82:260 


Tips for the new Model II owner. 


NEWDOS80 Files 


Resnick 


12/82:344 


How some NEWDOS files work. 


Open Cartridge Surgery 


Grout 


12/82:343 


Replace printer ribbon cartridge ribbons. 


Ordered Chaos 


Webb 


1/82:310 


See Programming Techniques. 


Plant a Binary Tree 


Knecht 


11/82:242 


Use a one-key binary tree in your random disk files. 
(Model III) 


Practical Regression 


Hinrichs 


11/82:96 


Use this method to get the most from your data. 


Analysis 






(Model I/III) 


Printing Perfection 


Phillip 


9/82:126 


Control print density and size options of the MX-80 
while in Scripsit. 


Radio Shack Repairs 


Kepner 


10/82:101 


What Radio Shack charges to repair specific things. 


Scripsit Makes It Easy 


Bennett 


11/82:456 


Merge a mailing list with a standardized letter. 
(Model I) 


Stewise Refinement 


Boasso 


6/82:232 


See Programming Techniques. 


Technological Destiny, 
Pt. I 


Dilllio 


4/82:264 


What a job in data processing requires. 


Technological Destiny, 

Pt. II 
Technological Destiny, 


Dilllio 


5/82:228 


See Part I. 


Dilllio 


6/82:186 


See Part I. 


Pt. Ill 








Technological Destiny, 


Dilllio 


9/82:260 


See Part I. 


Pt. IV 
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Technological Destiny, 


Dilllio 


Ft. V 




Things Still Crawl 


Marshall 


in the LII ROM 




TRS-80 Tongues 


Nicholas/Martel 


Using Print Using 


Rende 


Utilities Buyer's Guide 


staff 


Welcome to Cobol 


Keen/Dischert 


Worm Pills for Basic 


Keen/Dischert 


Z80 Bit Tables 


Robinson 


UTILITIES 




Title 


Author 



16, 10, 2, or 8— Which Sarnow 

Base Do We Appreciate 

Add CRC ASAP Baker 

Another Major Operation Graves 

on Scripsit 

Array I/O Neff 

As the Screen Scrolls Keller 

Autokey Rigg 

Back to the Drawing Rappaport 

Board 

BAM! Byrkit 

Base 2 Scrcenprintcr Kent 

Basic Communication McGarvey 

Basic Compiler in Basic Bertsekas 

Basic Translator Miller 

Basic Word Processing Cutrona 

Can You Get Me a Date? Phillipp 

Certify Your Cassettes Bigelow 

Checksum Batie 

Clean Up Your Rohdc 



10/82:246 

11/82:444 

12/82:216 

1/82:290 
4/82:135 

1/82:92 

4/82:290 

3/82:260 



Issue/Page Debug 

6/82:334 

1/82:204 

1/82:230 

1/82:200 5/82:26 

2/82:264 6/82:26 

12/82:280 

3/82:120 

4/82:167 

3/82:214 
6/82:324 
10/82:122 
6/82:194 

9/82:140 
2/82:220 

12/82:266 
11/82:410 

11/82:406 



See Part I. 

Why System loads crash. (Model I) 

Intro to Basic, Fortran, Cobol, Pascal, APL, and 

Forth. 
See Programming Techniques. 
Stats on various utilities for the TRS-80. 

(Model I/II/1II, CC) 
Introductory look at Cobol. 
See Programming Techniques. 
Op-code secrets revealed. (Model I) 



Annotation 

Decimal to octal to hex conversion. (Model I/I 1 1) 

Perform cyclical redundancy code checks for tape- 
based systems. (Model I) 
Add serial printer capabilities to Scripsit. (Model I) 

Machine-language routine for fast Basic data transfer. 
(Model I) 

Protect some of your screen from scrolling. (Model I) 

Modify Uni-key for the Model III. 

Design graphic displays on the screen and let the com- 
puter produce the code for it. (Model I) 

Change one-letter commands in your monitor pro- 
gram to a full word. (Model I) 

Get screen dumps on the Base 2 printer. (Model I) 

Terminal program in Basic. (Model I) 

(Model I) 

Translate different Basic dialects for communication 
with other computers. 

Basic word processor. (CC) 

Routine to let you enter a date in any format you 
like. (Model I) 

Eliminate bad saves. (Model I) 

Aid debugging by producing checksums for main 
listing. (Model I/I 1 1) 

A trace table to avoid a cluttered screen. (Mode! 1) 



TRON/TROFF 








Color Assembler 


Heusinkveld 


11/82:213 


Assembler for the Color Computer. 


Color Diskdump 


Knecht 


12/82:354 


Examine those files. (CC) 


Colormon 


Cook 


3/82:212 


Monitor program. (CC) 


Command Interpreter 


Alford 


4/82:244 


Directly access machine-language routines. (Model I) 


CP80 


Cameron 


4/82:306 


IBM-like monitor program. (Model I) 


Curse You, Cursor! 


Frese 


11/82:182 


Control your Model IPs cursor. 


Datagcn 


Heusinkveld 


6/82:346 


Convert machine code to Basic statements. (CC) 


Direct Access 


Fink 


4/82:214 


Access Disk I/O routines from Basic using string 
variables as input buffers. (Model I) 


Diskmap 


Harrell 


12/82:236 


Eliminate disk file placement worries. (Model 1) 


Does Format Get Your 


Hart 


1/82:217 


Use glitched disks. (Model I) 


Backup? 








Easy Picture Editor 


Ginger 


12/82:388 


Simple commands for art or games graphics. (CC) 


Error Code Expanded 


Alford 


2/82:260 


Get full error messages. (Model I) 


Expand It — Burn It In 


Alexander 


6/82:344 


Test program for memory upgrade. (Model III) 


Fill in the Blanks 


Schuldenfrei 


1/82:224 


Pack records before sending them to tape. 
(Model I/III) 


Forms Cleanup 


Barbarello 


12/82:125 


Printer driver. (Model II) 


Graphics for Profile 


Wood 


3/82:284 


Get graphics with Model 11 Profile. 


Half Duplexer 


McGarvey 


5/82:172 


Get screen echo for typed communications. (Model I) 


Hoodwinking TRSDOS 


Anderson 


6/82:296 


CP/M printer driver for Model 11 TRSDOS. 
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Horizontal Scrolling 


Foley 


6/82:318 


Scroll back and forth and up and down. (Model I) 


1 Have a Secret 


Demberger 


10/82:296 


Data encryption-decryption program. (Model I/III) 


JKL Minus Blanks 


Straw 


9/82:290 


Modify the NEWDOS + JKL so it doesn't print 
blank lines. (Model I) 


Liberated CPU 


Shield 


12/82:228 


Spooler. (Model I) 


Lpc-Editor 


O'Connor 


4/82:206 


A spelling checker for program listings. (Model I) 


Looking-for-Z$ Blues 


Hieber 


12/82:194 


Search function. (Model I) 


Lost and Found 


Athanasiou 


6/82:288 


Disk-directory program. (Model III) 


Lost in Basic 


Paxton 


1/82:304 5/82:26 Find variables in Basic programs. (Model I) 


Lots of Little Letters to 


Olsen 


2/82:262 


Convert upper to lowercase. (Model I) 


Litter Your Listings 








LP VII Patch for the CC 


Degler 


10/82:304 


Eight-bit printer driver. (CC) 


Matter of Compatibility 


Huston 


12/82:146 


Make your program compatible with more systems. 
(Model I/III) 


Memory Size? 


Jackson 


4/82:226 


Store machine-language routines as string variables in 
Basic programs. (Model I) 


Micro Melodies 


Gibbs 


5/82:234 


Music-generation program. (Model I) 


Model II Disassembler 


Faber 


4/82:182 


A disassembler for the Model II. 


Model II Terminal Driver 


Korenthal 


4/82:176 


Terminal driver for use with Lifeboat's CP/M. 
(Model 11) 


Model III Master Director 


Muehlig 


4/82:250 


A master-directory program in 32K. (Model III) 


Neatlist 


Ewart 


1/82:196 


Produce neat program listings. (Model 1) 


One-drive Bulletin Board 


Hodgson 


3/82:314 


Set up a CBBS with one disk drive. (Model I) 


Paper Graphics 


Rosenberg 


3/82:270 


Get graphics printouts on an LP IV. (Model I) 


Play a Trick on Profile 


Scott 


6/82:306 


Directly access profile files. (Model I) 


Prinput 


Mills 


11/82:386 


Get enhanced printouts from a limited system. 
(Model I) 


Print That Index 


Everett 


6/82:184 


Print out an address file. (Model I/III) 


Print Whiz 


Parker 


2/82:250 


Routine to use Electric Pencil and the RS LP IV to 
their full extent. (Model I) 


Program Begat, Son of 


Christensen/Sater 


6/82:320 


Self-reproducing program. (Model I) 


Program Begat 








Quicksort 


Brumm 


11/82:414 


Quick-sorting algorithm. (Model I) 


Rapid System Loader 


Hedinger 


4/82:188 


Software tape-load speedup. (Model I) 


Reading, Writing, 


Morgan 


3/82:318 


Routines for disk I/O. (Model I/III) 


and AL 








Recover 


Gobel 


9/82:256 


Recover from unwanted exits from Scripsit. (Model 1) 


Relocated ULCBAS 


Pincus 


11/82:420 


Protect high memory. (Model I) 


Screen Veil 


Keller 


9/82:286 


Temporarily hide your screen's contents. 
(Model I/III) 


Screenplay 


Merkey 


9/82:204 


Print out anything in memory. (Model I) 


Scroll Your Listings 


Paxton 


12/82:370 


Scroll listings. (Model 1) 


Search Them Strings 


Gunter 


12/82:262 


String-search utility. (Model I) 


Secrets 


Mills 


3/82:216 


Hide sensitive data and protect your software. 
(Model I) 


Show the Score 


Battista 


11/82:272 


Put numbers on the screen while in the graphics 
mode. (CC) 


Snapshot 


Rice 


2/82:272 


See how the values of your variables change during 
program execution. (Model I) 


Systemized Basic 


Browne 


4/82:234 


Save Basic programs in System format. (Model I) 


Tab Extender 


Hedinger 


2/82:248 


Put 127 more spaces on your tab limit. (Model I) 


Tape Spate 


Bowman 


1/82:240 


Shorten time for cassette data saves and recoveries. 
(Model I) 


TDRELO 


Kornfeld 


11/82:424 


Send Tape-Disk to high memory. (Model I) 


Test Patterns 


Kilmon 


11/82:304 


Adjust color and centering with this program. (CC) 


To Baffle a Pirate 


Hawkins 


11/82:404 


Make your programs difficult to copy. (Model I/III) 


Trick Your ROM 


Boothe 


11/82:190 


Use CHR$(0) for speedy bit graphics on your printer. 
(Model I) 


TRSDOS 2.0 Fix 


Mornini 


3/82:332 


Keep from exiting to DOS. (Model II) 


Two Transfers Please 


Hollins 


2/82:188 


Put Eliza and Micromusic on disk. (Model I) 


Using Test 1 A 


Moultrie 


4/82:240 


Use TRSDOS's memory test with other DOSes. 
(Model I) 


Varispeed 


Evans 


3/82:336 


Control the speed of your Basic interpreter. (Model I) 


Zubroutines 


Ashley 


4/82:209 


Fifty short subroutines to aid your programming. 
(Model I) 
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1 982 Re 

Books 


jview Inc 


Jex 


Product 


Manufacturer 


Issue/Page 


101 Color Computer Programs 


Arcsoft Publishers 




55 Color Computer Programs 


Arcsoft Publishers 


9/82:64 


6809 Assembly-Language Programming 


Osborne /McGraw Hill 


3/82:62 


8080/Z80 Assembly-Language Techniques 


John Wiley & Sons 


2/82:310 


Basic 2nd Edition 


John Wiley & Sons 


2/82:310 


Basic Adventures 


80-NW Publishing 


8/82:37 


Basic Conversions Handbook 


Hayden Books 


9/82:66 


Basic Faster and Better 


IJG Inc. 


5/82:37 


Basic for Home Computers 


John Wiley & Sons 


2/82:310 


Basic Handbook, The 


Compusoft Publishing 


2/82:312 


Bibliography of Computer Music 


University of Iowa Press 


5/82:36 


Computer Programming Basic Self Instruction 


Cambridge Learning Enterprises 


4/82:63 


CP/M Primer 


Howard W. Sams & Co. Inc. 


4/82:65 


Custom TRS-80 & Other Mysteries 


IJG Inc. 


10/82:66 


Data File Programming/Basic 


John Wiley & Sons 


2/82:310 


Don't 


Sybex 


9/82:72 


Elementary Basic/Pascal 


Random House 


12/82:44 


Fast Basic 


John Wiley Books 


11/82:62 


Graphic Software/Micros 


Kern Publications 


5/82:37 


How to Make Money 


Dilithium Press 


10/82:32 


Intro/8080/8085 Assembly Language Programming 


John Wiley & Sons 


2/82:310 


Learning TRS-80 Basic 1-16 


Compusoft Publishing 


11/82:40 


Learning with Computers 


Digital Press 


2/82:310 


Microcomputer Data Base Manager 


Howard W. Sams & Co. 


10/82:45 


Microcomputer Math 


Micro Applications Publishers 


3/82:64 


Microsoft Basic Decoded 


IJG 


1/82:38 


Murder in the Mansion 


Arcsoft Publishers 


2/82:326 


Pascal 


TAB Books 


1/82:27 


Pascal Handbook 


Sybex 


1/82:42 


Pascal Primer 


Howard W. Sams & Co. Inc. 


1/82:40 


Robot Intelligence/Experiments 


TAB Books 


6/82:51 


RS Model III Service Manual 


Tandy/Radio Shack 


3/82:65 


Starting Forth 


Prentice -Hall 


10/82:80 


TRS-80 Assembly Language Subroutines 


Prentice-Hall 


10/82:41 


TRS-80 Graphics 


Tandy/Radio Shack 


3/82:63 


TRS-80 Means Business 


John Wiley & Sons 


10/82:32 


Using CP/M 


John Wiley & Sons 


2/82:310 


Videotext, Coming Revolution 


Knowledge Industry Publications 


1/82:36 


Hardware 






Product 


Manufacturer 


Issue/Page 


AD-III Audio Amplifier 


Thomas Engineering/TCS 


2/82:316 


AJ 841 I/O Terminal 


Anderson-Jacobson 


4/82:56 


AN-551 Eprom Programmer 


Design Solutions Inc. 


6/82:68 


Base2 850 


Base2 


4/82:278 


C. Itoh Daisy Wheel Printer 


C. Itoh Electronics 


2/82:316 


C. Itoh 8510 Printer 


C. Itoh Electronics 


5/82:184 


Centronics 737 


Centronics 


4/82:278 


Cheaptalk 


Alan Saville 


5/82:54 


Color Computer Disk System 


Tandy/Radio Shack 


9/82:72 


Color Computer Disk System 


Tandy/Radio Shack 


6/82:48 


CPrint Parallel Printer Interface 


Micro Labs Inc. 


3/82:56 


Disk 80 


Micromint Inc. 


3/82:62 


Drive Control Unit 


Optronics Technology 


12/82:62 


EPS-80 Word Processor 


PMC Inc. 


9/82:78 


Epson MX-80 


Epson of America 


4/82:278 


Escon Selectric Interface 


Escon Products Inc. 


6/82:47 


ETF-80 Electric Typing Fingers 


PMC Inc. 


9/82:78 
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Floppy Disk Controller 


A.M. Electronics 


4/82:53 


Gold Plug 80 


E.A.P. Co. 


5/82:50 


Hayes Stack Smartmodem 


Hayes Microcomputer Products 


10/82:47 


IDS 445 Paper Tiger 


Integral Data Systems 


4/82:278 


IDS 460 Printer 


Integral Data Systems 


4/82:54 


Line Printer VII 


Tandy/Radio Shack 


4/82:82 


Line Printer VIII 


Tandy/Radio Shack 


4/82:70 


LN Doubler 5/8 


LNW Research Corp. 


12/82:104 


LNW-80 


LNW Research Corp. 


5/82:206 


LSI Soft-View CRT 


Langley-St. Clair Inst. 


12/82:51 


MDX-2 


Micro-Design 


4/82:58 


MDX-3 Interface PC Board 


Micro-Design 


10/82:60 


Memory Box, The 


Displayed Video 


5/82:224 


Micro Cue Print Buffer 


Microcompatible 


3/82:58 


Micro Mainframe Disk Controller 


Micro Mainframe 


11/82:58 


Microline 80 


Okidata 


4/82:278 


Microline 82A Printer 


Okidata Corp. 


5/82:56 


Micromouth 


Micromint 


4/82:59 


Modem 80 


ICROM Enterprises Ltd. 


6/82:45 


Modem I 


Tandy/Radio Shack 


1/82:51 


Novell Image 800 Printer 


Novell 


5/82:57 


Patch 2.0 


Cecdat Inc. 


6/82:62 


Percom Doubler II 


Percom Data Corp. 


12/82:104 


Percom SFD-51-A 


Percom Data Corp. 


12/82:104 


PI80C Parallel Printer Interface 


The Micro Works 


6/82:46 


Plotter Printer 


Tandy/Radio Shack 


1/82:122 


Plug 'N Power Controller 


Tandy/Radio Shack 


3/82:61 


PMC SFD-51-A 


Personal Microcomputers I 


12:82:104 


Power Pack ROM Package 


Computerware 


6/82:118 


Printer/Cassette Interface/PC 


Tandy/Radio Shack 


4/82:60 


QuCeS Hard Disk Subsystem 


Quality Computer Services 


10/82:154 


Selectronic 841 


Anderson-Jacobson 


4/82:56 


SK-2 


Mumford Micro Systems 


2/82:180 


Snapp Spooler 


Snapp Inc. 


9/82:80 


Sooperspooler 


Compulink 


9/82:66 


Sprinter II 


Holmes Engineering 


11/82:56 


Starbuck 8882 


Starbuck Data Co. 


8/82:42 


Strobe 100 Drum Plotter 


Strobe Inc. 


9/82:58 


Tandy 6-Pen Plotter 


Tandy/Radio Shack 


10/82:58 


TP-1 /Smith-Corona Printer 


Smith-Corona 


11/82:61 


TRS-80 Color Disk System 


Tandy/Radio Shack 


6/82:48 


TRZ-80 




1/82:218 


UPI-3, UPI-4 Serial Printer Interface 


Speedway Electronics 


2/82:314 


Video 1 


Archbold Electronics 


5/82:54 


Wolfbug 64K CC Upgrade 


Atomic City Electronics 


12/82:42 


Software 






Product 


Manufacturer 


Issue/Page 


ACCEL2 


Allen Gelder Software 


5/82:218 


Ace Automated Communications 


Ace Computer Products 


10/82:47 


Aircraft Instrument Approach 


J.C. Sprott 


2/82:318 


Alcatraz II 


Spectral Associates 


8/82:40 


Alien Defense 


Soft Sector Marketing 


8/82:50 


Ann Rose 


Sturdivant and Dunn 


5/82:42 


Ants 


Synergistic Solar Inc. 


4/82:46 


Arcade 80 


Datasoft Inc. 


2/82:320 


Armored Patrol 


Adventure International 


8/82:36 


ASPTCH 3.2 


Byte Miser Software 


2/82:322 


Asylum 


Med Systems Software 


5/82:41 


Attack Force 


Alpha Products 


1/82:51 


Auto-Writer 


Software Options 


9/82:110 


Autobasic 


Schneider Enterprises 


9/82:82 


Basic Compiler (BASCOM) 


Microsoft Consumer Products 


5/82:218 


Basicpro 


Softworx Inc. 


1/82:49 
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Bounceoids 


Cornsoft Group Inc. 


12/82:54 


C. C. Writer 


Transformation Technologies 


3/82:50 


Cassette Comm 


Tandy/Radio Shack 


1/82:44 


Cave Hunter 


Mark Data Products 


9/82:76 


CCForth 


Frank Hogg Laboratory Inc. 


11/82:45 


Check Register Plus 


Softco 


6/82:338 


Checkwriter 80 


Tandy/Radio Shack 


6/82:338 


Chextext 


Apparat 


9/82:119 


Chextext 


Apparat 


4/82:98 


Chromasette Magazine 


CLOAD Magazine 


3/82:52 


Codes II 


Nelson Software 


9/82:96 


Color Assembler 


Computerware 


6/82:116 


Color Berserk 


Mark Data Products 


9/82:76 


Color Editor 


Computerware 


6/82:116 


Color Pac Attack 


Computerware 


8/82:45 


Color Scripsit 


Tandy/Radio Shack 


10/82:40 


Color Space Invaders 


Spectral Associates 


3/82:48 


Colorforth 


Armadillo International 


12/82:80 


Colorterm 


Martin Consulting 


11/82:63 


Commbat 


Adventure International 


1/82:43 


Compiler Basic, I & III 


Tandy/Radio Shack 


2/82:164 


Compiler Basic, 11 


Tandy/Radio Shack 


2/82:148 


Computer Downs 


Ernest H. Fellows 


2/82:327 


Computer Major League 


Avalon Hill 


5/82:38 


Conflict 2500 


Avalon Hill 


8/82:46 


Copyart 


Simutek Computer Products 


9/82:108 


Crush, Crumble, and Chomp 


Epyx, Automated Simulations 


2/82:324 


Data Ace 


Computer Software Design 


10/82:266 


Datahandler 


Miller Microcomputer Services 


6/82:150 


Date-O-Base Calendar 


Custom Software Engineering 


12/82:61 


DBase II 


Ashton-Tate 


6/82:53 


Defense Command 


Big Five Software 


8/82:50 


Direct File Transfer/DFT 


Big Systems Software 


6/82:66 


Disk Doctor, The 


Superior Graphic Software 


12/82:54 


DOSPLUS 3.4 


Micro Systems Software 


10/82:244 


DOSPLUS 3.4 


Micro Systems Software 


12/82:104 


Dragons of Hong Kong 


Adventure International 


8/82:52 


Draw5 


Wilson Software Division 


1/82:42 


DSMBLR 


Misosys 


9/82:85 


Dynamic Report Generator 


Dynamic Software 


10/82:56 


Dynasoft Pascal 


Computerware 


6/82:198 


Edit 


Southern Software 


6/82:71 


EDTASM + /C.C. 


Tandy/Radio Shack 


11/82:142 


Electric Pencil 2.0 


IJG Inc. 


9/82:98 


Electric Spreadsheet 


Exatron 


1/82:49 


Electric Webster 


Cornucopia Software 


9/82:118 


Eliminator 


Adventure International 


8/82:54 


ENHBAS 


Cornsoft Group 


1/82:320 


Faster 1.2 


Prosoft 


4/82:40 


FED File Editor for LDOS 


Galactic Software 


12/82:53 


Finance Loans & Investment 


Computerware 


11/82:58 


Flextext/80 


Apparat 


9/82:100 


GEAP 


J.F. Consulting 


10/82:184 


Grammatik 


Aspen Software 


9/82:120 


Graphics Editor/Programmer 


J.F. Consulting 


3/82:57 


GRBasic 3.0 


Med Systems Software 


6/82:54 


Hexspell 


Hexagon Systems 


4/82:98 


Hexspell 2 


Hexagon Systems 


9/82:116 


HORKS 


Edu-Ware East 


9/82:70 


Hypergate Centurion/Patro 


Synergistic Solar Inc. 


12/82:60 


ICL 


XYZT Computer Dimensions 


6/82:64 


IDM/V 


Micro Architect Inc. 


6/82:150 


Institute, The 


Med Systems Software 


9/82:64 


INT ASM 2.0 


Singular Systems 


9/82:68 
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KWICOS 

Lablmaker 

Laser Defense 

Lazy Writer 

LCA-47 Lowercase Adapter 

LDOS5.1 

LDOS5.1 

Letter-Writer 

Life List 

LISP 

Litigation Support System 

Local Call for Death 

LZ Patcher 

Maces & Magic 

Macro-Mon, The Shadow 

Mailmerge 

Master Control 

Master Reversi 

Maxi Check Register Acct. 

Maxi Manager 3.1 

Maxprint 

Meteoroids 

Micro-Typit 

Microcosm III 

Microproof 

Microproof 

Microstat 

Mind Thrust 

Miz' Spell 

Miz' Spell 

Mod II Game Package 

Multidos 

muMATH/Extended 

MZAL 

New Starship Battles 

NEWDOS80 Ver. 2.0 

NEWDOS80 Ver. 2.0 

NewScript 

NewScript 6.0 

NewScript 7.0 

Newtalk 

Newtrieve 

Odin 

Omniterm 

On Her Majesty's Ship Impetuous 

Orchestra-85, 90 

Packer 1.5 

Parsector 8 

Pascal-80 

Pencil Plus 

Penetrator 

Pensawrite 1 

Pensawrite 2 

Personal Finance for C.C. 

PL/I-80 

Powerdraw 

Profile II 

Profile III Plus 

Profile Plus 

Proofreader 

Proofreader /Proof-Edit 

QSD Utility Disk #1 

Quest 



Kwik Software 

ETS Center 

Med Systems Software 

Soft Sector Marketing 

Micro Technical Products 

Logical Systems Inc. 

Logical Systems Software 

Astro-Star Enterprises 

Manhattan Software 

Supersoft 

Tandy/Radio Shack 

Adventure International 

Imaginuity Inc. 

Adventure Int. /Chameleon 

Advanced Operating Systems 

Micropro 

Soft Sector Marketing 

Instant Software 

Exador /Adventure Intnl. 

Adventure International 

Peggytronics 

Spectral Associates 

Coolidge & Associates 

Basics & Beyond Inc. 

Cornucopia Software 

Cornucopia Software 

Ecosoft 

Hayden Software 

Programs Unlimited 

Programs Unlimited 

Small Business Systems 

Cosmopolitan Electronics 

Microsoft 

Computer Applications Inc. 

Synergistic Solar Inc. 

Apparat Inc. 

Apparat Inc. 

Prosoft 

Prosoft 

Prosoft 

Star-Kits 

Unique Printing & Stationery 

Odesta Publishing 

Lindberg Systems 

Adventure International 

Software Affair 

Cottage Software 

Synergistic Solar Inc. 

New Classics Software 

Dan Robinson 

Melbourne House Software 

Pensadyne Computer Services 

Pensadyne Computer Services 

Tandy/Radio Shack 

Digital Research 

Powersoft 

Tandy/Radio Shack 

Small Computer /Tandy 

Tandy/Radio Shack 

Aspen Software 

Aspen Software 

Quality Software Distributors 

Aardvark-80 



2/82:322 
10/82:34 

8/82:39 
9/82:102 
12:82/56 
9/82:252 
12/82:104 
9/82:112 

5/82:46 
12/82:46 

6/82:50 

8/82:52 
9/82:104 

8/82:38 
9/82:292 

9/82:94 

3/82:49 
11/82:66 
6/82:338 
6/82:150 
10/82:33 

3/82:48 
9/82:114 

1/82:48 
9/82:116 

4/82:98 
6/82:280 

8/82:56 

4/82:98 
9/82:120 

5/82:52 

12/82:104 

11/82:42 

10/82:160 

4/82:46 
2/82:152 
12/82:10 
9/82:104 

3/82:53 
10/82:52 
10/82:38 
10/82:42 
11/82:66 

4/82:94 

8/82:52 
6/82:326 

6/82:60 

4/82:46 
12/82:210 

9/82:% 
9/82:112 

9/82:74 
9/82:106 
10/82:38 
6/82:122 
10/82:40 

4/82:48 
10/82:308 

4/82:48 

4/82:98 
9/82:118 

4/82:41 
12/82:48 
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Qwerty 


Med Systems Software 


10/82:34 


Qwerty 


Med Systems Software 


9/82:102 


Refware Thesaurus 


David C. Whitney Associates 


4/82:52 


Robot Attack 


Big 5 Software 


8/82:39 


RPM 


Prosoft 


4/82:40 


Scarfman 


The Cornsoft Group 


3/82:53 


Scrinput 


ACR Consultants 


4/82:44 


Scriplus 


Quality Software Distributors 


9/82:101 


Scripmod 


MG Products 


9/82:102 


Scripsit 


Tandy/Radio Shack 


9/82:98 


Scripsit Dictionary 


Tandy/Radio Shack 


9/82:120 


Scripsit, Mod II 


Tandy/Radio Shack 


2/82:222 


Scriptr 


Pioneer Software 


9/82:102 


SDS80C Editor /Assem/Mon 


The Micro Works 


6/82:70 


Sea Dragon 


Adventure International 


12/82:40 


Search and Sort 


Micro Pro Systems 


8/82:56 


SECS 


Datasoft Inc. 


3/82:52 


SFinks 3.0 


William Fink 


9/82:80 


Sigmon 


Datasoft Inc. 


3/82:52 


Smart Terminal Program, STERM 


Howe Software 


6/82:60 


Snapp III Extended Built-in Functions 


Snappware 


1/82:134 


Snapp IV Auto Map 


Snappware 


1/82:134 


Snapp V Extended File Map 


Snappware 


5/82:216 


Softext/Softscreen 


Aspen Software 


9/82:106 


Sole 


Misosys 


11/82:48 


Space Ace 21 


Synergistic Solar Inc. 


4/82:46 


Space War 


Spectral Associates 


3/82:48 


Space Waste Race 


Storybooks of the Future 


5/82:42 


Special Delivery 


Software Concepts 


9/82:110 


Spectaculator 


Tandy/Radio Shack 


11/82:49 


SpellGuard 


Innovative Software Applications 


9/82:95 


Spell 'N Fix 


Star-Kits 


11/82:68 


SpellStar 


Micropro International 


9/82:95 


Star Blaster 


Micro Works 


8/82:44 


Star Warrior 


Automated Simulations 


4/82:50 


Star fighter 


Adventure International 


2/82:320 


Statistical Analysis 


Tandy/Radio Shack 


6/82:280 


Stud5 


Wilson Software Division 


1/82:42 


Super Color Writer 1 .0 


Nelson Software 


9/82:62 


Super Micro Pro Football 


Micro Pro Systems 


6/82:54 


Superscript 


Acorn Software 


9/82:101 


Supersort 


Micropro International 


9/82:94 


Tanktics 


Avalon Hill 


4/82:63 


Tape Downloading System/TDS 


Big Systems Software 


6/82:66 


TASMON 


Alternate Source 


1/82:126 


Telewriter 


Cognitec 


5/82:208 


Temple of Apshai 


Automated Simulations 


2/82:323 


Tower of Orlandor 


Compu-Things 


8/82:46 


Two Heads of the Coin 


Adventure International 


8/82:52 


Uniterm 


B.T. Enterprises 


6/82:56 


UOLISP 


Far West Systems & Software 


12/82:46 


Utility Pack, The 


B.T. Enterprises 


4/82:42 


VisiGraph 


Micro Software Systems 


10/82:54 


Voyage of the Valkyrie 


Advanced Operating Systems 


5/82:44 


Word IV/Word V 


Micro Architect 


9/82:110 


Word Machine/The 


GB Associates 


9/82:112 


Wordslinger/The 


Instant Software 


9/82:114 


Wordsmith 


ABS Suppliers 


6/82:63 


Wordsmith 


ABS Suppliers 


9/82:112 


WordStar 


Micropro International 


9/82:92 


XBug 


Computer Applications Unlimited 


3/82:54 


XTEND40 


Prosoft 


4/82:40 


ZBasic 2.0 


Simutek Computer Products 


5/82:48 
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^ noo 




Month Year Program Name 


Page Number 




iyo^ 




June/ July 1982 SMPLZAPl 


232 




■ ^^ ^m^ mmmm 




SMPLZAP2 


232 


1 


z^nrl Qi 


r\ 


SURVEY 


248 


L 


OdQ O 1 


J 


QUESTION 


248 


■■■ 


■ x^ \^ v^ v^ 


Kr 


LOADFILE 


248 




1 wf^ ^m ^^ "%. Jf 




PPREDICT 


272 




inoGX 




DIRECTRY 


288 




III ^Jk w/\ 




AIRTRAVL 


300 








LEARNA 


326 


* 






MERLIN 
PROJCAL 
August 1982 HFLYNN46 
SPY 


330 

348 

66 

80 


Month Year Program Name 


Page Numbe 


SPYFIELD 


80 








CUBE80 


106 


January 1982 PALLETS 


98 


SLALOM 


112 




SURVEY 


102 


KALAH/SRC 


132 




RULE300 . 


116 


LUCKY 13 


156 




MODELT 


140 


ROUNDEND 


156 




ALPHGRPH 


190 


STAR 


156 




NEATLIST 


196 


DBLTRI 


156 




SCRIPGRAFT 


230 


SUBCHOP2 


216 




TAPESPTE 


240 


SLOTMACH 


222 




MARS 


265 


CRAM 


234 




VARMAP 


304 


ACROSTIC 


240 


February 1982 GSETTR 


70 


KUNGFU 


248 




PUNCTUAT 


82 


MEMALPHA 


254 




TESTMAKR 


104 


TERMITES 


274 




PLANETS 


112 


PITTYPAT 


270 




CAPCHEM 


116 


THRUASTR 


280 




BOGGLE 


166 


LOCO 


286 




GETTEAM 


196 


RAMMER 


296 




KINGSCAT 


232 


CARDONI2 


302 




SALECAST 


268 


September 1982 MOBYDICK 


139 




SNAPSHOT 


272 


COLORART 


168 


March 1982 THREEDEE 


138 


TRAINART 


168 




PRMSRCH 


152 


CHARTART 


168 




HUMANS 


154 


BTFLYART 


168 




GRADES 


184 


CSTLEART 


168 




SCRNPRNT 


214 


SNPYART 


168 




CENSOR 


216 


SCRNPLAY 


204 




OTHLLO80 


252 


ORDRFORM 


270 




RGRAPHIC 


294 


SIM 


276 




BLTNBRD 


314 


VEIL/SRC 


286 


(pub. in Dec. 1981) FLPYFIXR 


326 


HOTDOG 


330 


April 1982 BASICK 


86 


MTRMOUTH 


330 




BAM 


167 


PACHINKO 


330 




RSL 


188 


FUNHOUSE 


330 




ZUBRTNES 


208 


HAMMING 


342 




DISKRD3 


214 


MDOS1 


364 




COMMAND 


244 


MDOS2 


364 




MASDIR3 


250 


(pub. in Aug. 1982) SQUARE1 


358 




SHOPPING 


270 


SQUARE2 


358 




RULER 


302 


SQUARE3 


358 




CP80 


306 


SQUARE4 


358 


May 1982 MUSIC 


142 


October 1982 QUIKCALC 


114 




NAMESONG 


234 


BASICOMP 


122 




EXPENSE 


238 


AUTOTRK2 


203 




RACES 


252 


MUSIC 1 


228 




HANDICAP 


264 


MUSIC2 


228 




BANNER 


282 


SCRPTCH1/SRC 


276 




SPCCHASE 


292 


SCRPTCH2/SRC 


276 




GABBY 


322 


CRYPTO 


296 




MONEYDOS 


382 


INVENTRY 


342 
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a 



D 



LOAD 
80 

g|? s LOAD 80 

ELIMINATE HOURS OF 
TYPING AND 
AGGRAVATION 




In the April, 1981 issue of 80 Micro we introduced LOAD 
80 to save you the time and trouble of typing our programs 
yourself. LOAD 80 cassette tapes contain dumps of the 
major program listings in 80 Micro. 



If you have not yet ordered any LOAD 80 tapes and wish 
you had, don't worry. We are now offering a "back issue" 
cassette program. You can order any LOAD 80 cassette 
from April, 1981 to date for $9.97. Back issues of 80 
Micro are also available with the LOAD 80 cassettes for 
$3.50. With the complete documentation found in the com- 
panion magazine issue, you should have no difficulty 
loading any of 80's major programs. 



Please send me the following: 

month year month year 
Tapes Magazines 



ITEM 


COST 


QTY. 


TOTAL 


Load 80 Tapes 

August 1982 Double Issue 

add $1.50 per tape for postage & 

handling 


$9.97 
$17.97 






80 Micro 

add $.100 per magazine for postage 

and handling. 


$3.50 










TOTAL 





D Check Enclosed Bill my: □ MC D AE G VISA 

NAME 

ADDRESS 

CITY 

CARD* 

SIGNATURE 



STATE, 



ZIP_ 

EXP. DATE_ 

INTERBANK* 



Please allow 4-6 weeks (or delivery 

LOAD 80 • 80 Pine Street • Peterborough NH 03458 

Attn: Debra Boudrieau 



Month Year Program Name 



Page Number 



November 



1982 



December 



1982 



MEDH1ST 

REGRESS 

HEATSTRS 

EINSTEIN 

DRAWPOKR 

BABYCASS 

KWIKMAZE 

PIXLPRNT 

GENEOLOGY 

ANCESTRY 

FAMILY 

TRON/SRC 

QUIKSORT/SRC 

BKINVTRY 

KTAABA 

VOICE/BAS 

MAKEGFTX/BAS 

READGFTX/BAS 

SPOOLER/SRC 

DSPOOLER/SRC 

UNIPOKE/BAS 

LVL2SRCH/SRC 

DISKMAP/SRC 

SEARCH/SRC 

SEARCH 1/BAS 

AUTOKEY/SRC 

AUTOKEY/BAS 

POKEGPHS/BAS 

MAZE19/BAS 

SCROLL/SRC 



90 
96 
148 
222 
246 
282 
318 
364 
398 
398 
398 
406 
414 
436 
450 
72 
118 
118 
130 
130 
146 
194 
236 
262 
262 
280 
280 
296 
341 
370 



Sales Opportunity 

A few select territories available 



Join a fast growing company in- 
volved in the microcomputer in- 
dustry as a direct salesman. 
Sales involve our wide selection 
of books, four publications and 
software. We are looking for a 
non-smoking individual with a 
good sales background and a ba- 
sic understanding of microcom- 
puters. An excellent career 
awaits the person who wants to 
be "on his own." It will be the re- 
sponsibility of our direct sales- 
man to become familiar with all 
makes of computers and their 
sales outlets, amateur radio and 
electronic stores, book stores, 
and other outlets for our prod- 
ucts in your given territory. We 
will also add other lines as they 
become available. Arrangements 
are being made to coordinate ef- 
forts with some other firms in the 



area, including a major printer 
manufacturer. We offer an excel- 
lent growth potential with a high- 
ly motivated, young corporation. 
If you or someone you know is in- 
terested in the opportunities 
available at Wayne Green Inc., 
please submit your background 
in detail, including sales experi- 
ence, recent work history, knowl- 
edge of the microcomputing in- 
dustry, educational background 
and references to: 



Sales Manager 
Wayne Green, Inc. 
Peterborough, NH 03458 



All replies will be immediately ac- 
knowledged and held in the strict- 
est of confidence. 




WAYNE GREEN, INC. 
(E-1) Pine Street 
Peterborough, N.H. 03458 
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HOW TO USE YOUR EPSON 
WITHOUT WASTING 

COMPUTER 





Your computer is capable of sending data 
at thousands of characters per second but 
the Epson can only print 80 characters per 
second. 

This means your computer is forced to 
wait for the printer to finish one line before it 
can send the next. A waste of valuable time. 

THE NEW MICROBUFFER™ 
ACCEPTS DATA AS FAST AS 
YOUR COMPUTER CAN SEND IT. 

Microbuffer stores the data in its own 
memory buffer and then takes control of 
the printer. This frees your computer for 
more productive functions. 

PARALLEL OR SERIAL 

Microbuffer model MBP-16K is a 
Centronics-compatible parallel interface 
with 16,384 bytes of on-board RAM for 
data buffering. 

The MBS-8K is a full-featured RS-232C 
serial interface with both hardware and 
software (X-On/X-Off) handshaking, baud 
rates from 300 to 19,000 and an 8,192 byte 
RAM buffer. 

SIMPLY PLUG IT IN. 

Either model fits the existing auxiliary 
interface connector inside the Epson MX-80, 
MX-80 F/T or MX-100 without modification, 
and is compatible with standard Epson 
cables and printer control software, 
including GRAFTRAX-80. 

JUST $159.00* 

When you think how much time Microbuffer 
will save, can you afford not to have one? 
Call us for your nearest dealer. 




PRACTICAL PERIPHERALS, INC. 

31245 LA BAYA DRIVE, WESTLAKE VILLAGE, CA 91362 • (213) 991-8200 



^n 



"Suggested retail price for either r 







Pascal 

Basic 

Cobol 

Forth 

Pilot 

Fortran 

Spread Sheet 

Inventory 

Logo 



KEDIN 

Data Base Management 

Word Processor 

Communication Utility 

Accounts Receivable 

Accounts Payable 

Engineering Utility 

General Ledger 
Mailing List 
Macro Assembler 
Education 




TRSDOS 



Open your doors to a world of SOFTWARE with LNW 
computers. You'll get MORE PERFORMANCE' than with 
the IBM PC? the Apple II? TRS80 MODEL II or TRS80 
MODEL III" along with software support of TRSDOS or 
CP/M, the TWO MOST WIDELY USED OPERATING 
SYSTEMS. This means you, the user, can select from the 
largest base of business or personal software. 

Standard Features: A serial RS232 communication 
port, parallel printer port, Hi-Resolution (480x192) 
B/W and COLOR graphics, an 80 character- per- 
line screen display along with Quad -density 
interface for 5" or 8" floppy disk storage 
offering immediate access to 3.5 million 
characters, or optional Hard disk 




interface to 5 or 10 million characters. 

Standard Software: LNWBASIC and DOS PLUS operat- 
ing system packages, commanding all the above features, 
are included. 

The LNW computer will be the key to your success 
with the starting price at $1695.00, along with a full 6 
month warranty 

Dealers: You too can open the door to a successful 
product. Call for our special dealer programs: 
(714) 544-5745. 



LNW Computers 

2620 Walnut Avenue 
Tustin. California 92680 
(714)544-5744 ^30 




'TRSDOS is a trademark of Tandy Corp. 
"CP/M is a trademark of Digital Research Corp. 

1 Performance is based on bench mark test in the JAN 1982 issue of BYTE magazine, pg. 54, with LNW80 II as the comoarison 

2 IBM PC is a trademark of IBM CORP 

3. APPLE II is a trademark of APPLE COMPUTERS. 

4. TRS80 is a trademark of Tandy Corp. International orders please inquire for pricing/shipping cost. 



